下载文档原格式
超B:=L2_VOL(0,0)*VOL/CAPITAL;大B:=L2_VOL(1,0)*VOL/CAPITAL;中B:=L2_VOL(2,0)*VOL/CAPITAL;小B:=L2_VOL(3,0)*VOL/CAPITAL;超S:=-L2_VOL(0,1)*VOL/CAPITAL;大S:=-L2_VOL(1,1)*VOL/CAPITAL;中S:=-L2_VOL(2,1)*VOL/CAPITAL;小S:=-L2_VOL(3,1)*VOL/CAPITAL;净流入:=(超B+大B+中B+小B)+(超S+大S+中S+小S);超净:=超B+超S;大净:=大B+大S;中净:=中B+中S;散净:=小B+小S;大宗净流入:=(超B+大B)+(超S+大S);主力买力度:=LARGEINTRDVOL*100/VOL;主力卖力度:=LARGEOUTTRDVOL*100/VOL;AA:=CONST(MAX(ABS(净流入),MAX(ABS(大宗净流入),MAX(ABS(超净),MAX(ABS(大净),MAX(ABS(中净),ABS(散净)))))))*3,NODRAW; DRAWRECTREL(10,CONST(830-(ABS(大宗净流入)*500/AA)),50,945,IF(CONST(大宗净流入)>0,RGB(250,0,0),RGB(0,50,0))); DRAWNUMBER_FIX(CURRBARSCOUNT=1,0.01,0.88,0,INTPART(大宗净流入)),COLORYELLOW;DRAWTEXT_FIX(CURRBARSCOUNT=1,0.014,1,0,'大宗'),COLORYELLOW; DRAWRECTREL(55,CONST(830-(ABS(超净)*500/AA)),95,945,IF(CONST(超净)>0,RGB(255,0,0),RGB(0,50,0)));DRAWRECTREL(100,CONST(830-(ABS(大净)*500/AA)),140,945,IF(CONST(大净)<0,RGB(0,50,0),RGB(255,0,0)));DRAWRECTREL(145,CONST(830-(ABS(中净)*500/AA)),185,945,IF(CONST(中净)>0,RGB(255,0,0),RGB(0,50,0)));DRAWRECTREL(190,CONST(830-(ABS(散净)*500/AA)),230,945,IF(CONST(散净)<0,RGB(0,50,0),RGB(255,0,0)));DRAWTEXT_FIX(CURRBARSCOUNT=1,0.061,1,0,'超净大净中净散净'),COLORYELLOW;DRAWNUMBER_FIX(CURRBARSCOUNT=1,0.055,0.88,0,INTPART(超净)),COLORYELLOW;DRAWNUMBER_FIX(CURRBARSCOUNT=1,0.103,0.88,0,INTPART(大净)),COLORYELLOW;DRAWNUMBER_FIX(CURRBARSCOUNT=1,0.144,0.88,0,INTPART(中净)),COLORYELLOW;DRAWNUMBER_FIX(CURRBARSCOUNT=1,0.190,0.88,0,INTPART(散净)),COLORYELLOW;AAD:=CONST(MAX(ABS(主力买力度),ABS(主力卖力度)))*4,NODRAW; DRAWRECTREL(0,515,CONST(ABS(主力买力度)*500/AAD),568,IF(CONST(主力买力度)>0,RGB(255,0,0),RGB(0,50,0)));DRAWRECTREL(0,570,CONST(ABS(主力卖力度)*500/AAD),623,IF(CONST(主力卖力度)>0,RGB(0,50,0),RGB(255,0,0)));DRAWTEXT_FIX(1,0,0.512,0,STRCAT('主力买力度:',CON2STR(主力买力度,0))),COLORYELLOW;DRAWTEXT_FIX(1,0,0.57,0,STRCAT('主力卖力度:',CON2STR(主力卖力度,0))),COLORYELLOW。
MACD顶底背离通达信指标公式源码
MACD顶底背离通达信指标公式源码
软件介绍
本公式在日线，小时线，半小时线等周期中根据MACD红柱的缩小都能及时给我们的操作做出风险提示，尤其是在短周期中提示更有效。
此公式不是万能的，还需要结合其他操盘指标才更有效。
DIF:EMA(CLOSE,12)-EMA(CLOSE,26);
DEA:EMA(DIF,9);
MACD:(DIF-DEA)*2,COLORSTICK;
H1:=REF(MACD,1)<0 AND MACD>0,NODRAW;
H1T:=BARSLAST(H1)+1,NODRAW;
H2:=IF(MACD>0,H1T,0),NODRAW;
H3:=HHV(MACD,H2),NODRAW;
L1:=REF(MACD,1)>0 AND MACD<0,NODRAW;
L1T:=BARSLAST(L1)+1,NODRAW;
HJ:=(H1T+L1T),NODRAW;
H4:=REF(H3,HJ),NODRAW;
顶背离:H3<H4 AND C>REF(C,HJ) AND MACD>0 AND MACD<REF(MACD,1),COLORGREEN,NODRAW; STICKLINE(顶背离,0,MACD,2,0),COLORGREEN;
下载地址。
根据KDJ背离指标通达信指标公式源码
KDJ背离指标是一种技术分析工具，常用于股票和期货市场。
下面是通达信指标公式源码，可以用于计算KDJ背离指标。
公式源码：
J1:(C - LOWEST(LOW,N))/(HIGHEST(HIGH,N) -
LOWEST(LOW,N)) * 100
KDJ背离:interval=1;
KDJ背离支撑线:J2<=SUPPORTLINEDowncrossNum;
KDJ背离阻力线:J2>=RESISTLINEDowncrossNum;
背离K线买入信号:CROSS(K,J);
背离K线卖出信号:CROSS(J,K);
背离J线买入信号:CROSS(J,J2);
背离J线卖出信号:CROSS(J2,J);
上述源码中的K、N、M1、M2、SUPPORTLINEDowncrossNum和RESISTLINEDowncrossNum都是用户可以自定义的参数。
在使用该指标时，可以根据具体需求进行调整。
KDJ背离指标的计算方法主要是通过计算价格与KDJ指标之间的背离程度来判断市场的买卖信号。
背离是指价格与指标之间的不一致，当价格创新高而指标没有创新高时，被认为是背离。
KDJ背离指标可以作为辅助分析工具，帮助投资者判断买卖时机。
但需要注意，技术指标并不能保证100%的准确性，投资决策还需要结合其他因素进行综合考虑。
总结来说，根据KDJ背离指标通达信指标公式源码可以帮助投资者计算KDJ背离指标，辅助投资决策。
但在实际使用中，需要根据个人需求和市场情况进行参数调整和综合分析。
参考资料：。
通达信顶底背离（指标副图贴图）⽆未来，准确率90%使⽤多年的⼀个指标，KDJ,RSI,MACD,DMI等指标集成，在⼀张副图上显⽰，看盘⾮常⽅便明了，可以看出股票下⼀步的趋势，准确率⾮常⾼。
本⼈使⽤多年的⼀个指标，KDJ,RSI,MACD,DMI等指标集成，在⼀张副图上显⽰，看盘⾮常⽅便明了，可以看出股票下⼀步的趋势。
底:-50;顶:50;TRR := SUM(MAX(MAX(HIGH-LOW,ABS(HIGH-REF(CLOSE,1))),ABS(LOW-REF(CLOSE,1))),14);HD := HIGH-REF(HIGH,1);LD := REF(LOW,1)-LOW;PDM:= SUM(IF(HD>0 AND HD>LD,HD,0),14);MDM:= SUM(IF(LD>0 AND LD>HD,LD,0),14);PDI:= PDM*100/TRR;MDI:= MDM*100/TRR;A1:=BARSLAST(REF(CROSS("MACD.DIF"(12,26,9),"MACD.DEA"(12,26,9)),1));B1:=REF(C,A1+1)>C AND REF("MACD.DIF"(12,26,9),A1+1)<"MACD.DIF"(12,26,9) ANDCROSS("MACD.DIF"(12,26,9),"MACD.DEA"(12,26,9));A2:=BARSLAST(REF(CROSS("KDJ.K"(9,3,3),"KDJ.D"(9,3,3)),1));B2:=REF(C,A2+1)>C AND REF("KDJ.K"(9,3,3),A2+1)<"KDJ.K"(9,3,3) AND CROSS("KDJ.K"(9,3,3),"KDJ.D"(9,3,3));A3:=BARSLAST(REF(CROSS("RSI.RSI1"(6,12,24),"RSI.RSI2"(6,12,24)),1));B3:=REF(C,A3+1)>C AND REF("RSI.RSI1"(6,12,24),A3+1)<"RSI.RSI1"(6,12,24) ANDCROSS("RSI.RSI1"(6,12,24),"RSI.RSI2"(6,12,24));C1:=BARSLAST(REF(CROSS("MACD.DEA"(12,26,9),"MACD.DIF"(12,26,9)),1));D1:=REF(C,C1+1)<C AND REF("MACD.DIF"(12,26,9),C1+1)>"MACD.DIF"(12,26,9) ANDCROSS("MACD.DEA"(12,26,9),"MACD.DIF"(12,26,9));C2:=BARSLAST(REF(CROSS("KDJ.D"(9,3,3),"KDJ.K"(9,3,3)),1));D2:=REF(C,C2+1)<C AND REF("KDJ.K"(9,3,3),C2+1)>"KDJ.K"(9,3,3) AND CROSS("KDJ.D"(9,3,3),"KDJ.K"(9,3,3));C3:=BARSLAST(REF(CROSS("RSI.RSI2"(6,12,24),"RSI.RSI1"(6,12,24)),1));D3:=REF(C,C3+1)<C AND REF("RSI.RSI1"(6,12,24),C3+1)>"RSI.RSI1"(6,12,24) ANDCROSS("RSI.RSI2"(6,12,24),"RSI.RSI1"(6,12,24));C4:=BARSLAST(REF(CROSS(MDI,PDI),1));D4:=REF(C,C+1)<C AND REF(MDI,C4+1)>MDI AND CROSS(MDI,PDI);A4:=BARSLAST(REF(CROSS(PDI,MDI),1));B4:=REF(C,A4+1)>C AND REF(PDI,A4+1)<PDI AND CROSS(PDI,MDI);DMI底背:IF(B4>0,-50,0),COLOR0099FF,POINTDOT;DRAWTEXT(B4>0,-5,'DMI底背'),COLOR0099FF;DMI顶背:IF(D4>0,50,0),COLORBLUE,POINTDOT;DRAWTEXT(D4>0,15,'DMI顶背'),COLORBLUE;MACD底背:IF(B1>0,-50,0),COLORRED,POINTDOT;DRAWTEXT(B1>0,-15,'MACD底背'),COLORRED;KDJ底背:IF(B2>0,-50,0),COLORFF00FF,POINTDOT;DRAWTEXT(B2>0,-25,'KDJ底背'),COLORFF00FF;RSI底背:IF(B3>0,-50,0),COLORYELLOW,POINTDOT;DRAWTEXT(B3>0,-35,'RSI底背'),COLORYELLOW;MACD顶背:IF(D1>0,50,0),COLOR00FF00,POINTDOT;DRAWTEXT(D1>0,25,'MACD顶背'),COLOR00FF00;KDJ顶背:IF(D2>0,50,0),COLORFFCC66,POINTDOT;DRAWTEXT(D2>0,35,'KDJ顶背'),COLORFFCC66;RSI顶背:IF(D3>0,50,0),COLORFFFFFF,POINTDOT;DRAWTEXT(D3>0,45,'RSI顶背'),COLORFFFFFF;STICKLINE(B1>0,-50,0,0,0),COLORRED;STICKLINE(B2>0,-50,0,0,0),COLORFF00FF;STICKLINE(B3>0,-50,0,0,0),COLORYELLOW;STICKLINE(D1>0,50,0,0,0),COLOR00FF00;STICKLINE(D2>0,50,0,0,0),COLORFFCC66;STICKLINE(D3>0,50,0,0,0),COLORWHITE; STICKLINE(B4>0,-50,0,0,0),COLOR0099FF; STICKLINE(D4>0,50,0,0,0),COLORBLUE;。
结合你自己的指标抄底逃顶自由把握妖股不算中线:18.5,COLORLIRED;AA1:=BARSLAST(REF(CROSS("MACD.DIF","MACD.DEA"),1));MACD底背离:=REF(C,AA1+1)>C AND REF("MACD.DIF",AA1+1)<"MACD.DIF" AND CROSS("MACD.DIF","MACD.DEA")>0;AA2:=BARSLAST(REF(CROSS("KDJ.K","KDJ.D"),1));KDJ底背离:=REF(C,AA2+1)>C AND REF("KDJ.K",AA2+1)<"KDJ.K" ANDCROSS("KDJ.K","KDJ.D");AA3:=BARSLAST(REF(CROSS("RSI.RSI1","RSI.RSI2"),1));RSI底背离:=REF(C,AA3+1)>C AND REF("RSI.RSI1",AA3+1)<"RSI.RSI1" AND CROSS("RSI.RSI1","RSI.RSI2")>0;AA4:=BARSLAST(REF(CROSS("BIAS.BIAS1","BIAS.BIAS2"),1));BIAS底背离:=REF(C,AA4+1)>C AND REF("BIAS.BIAS1",AA4+1)<"BIAS.BIAS1" AND CROSS("BIAS.BIAS1","BIAS.BIAS2")>0;CC1:=BARSLAST(REF(CROSS("MACD.DEA","MACD.DIF"),1));MACD顶背离:=REF(C,CC1+1)<C AND REF("MACD.DIF",CC1+1)>"MACD.DIF" AND CROSS("MACD.DEA","MACD.DIF")>0;CC2:=BARSLAST(REF(CROSS("KDJ.D","KDJ.K"),1));KDJ顶背离:=REF(C,CC2+1)<C AND REF("KDJ.K",CC2+1)>"KDJ.K" ANDCROSS("KDJ.D","KDJ.K")>0;CC3:=BARSLAST(REF(CROSS("RSI.RSI2","RSI.RSI1"),1));RSI顶背离:=REF(C,CC3+1)<C AND REF("RSI.RSI1",CC3+1)>"RSI.RSI1" AND CROSS("RSI.RSI2","RSI.RSI1")>0;CC4:=BARSLAST(REF(CROSS("BIAS.BIAS2","BIAS.BIAS1"),1));BIAS顶背离:=REF(C,CC4+1)<C AND REF("BIAS.BIAS1",CC4+1)>"BIAS.BIAS1" AND CROSS("BIAS.BIAS2","BIAS.BIAS1")>0;{CCI}N:=60;DD:=C=LLV(C,N);{60日最低点}DDSJ:=BARSLAST(REF(DD,1));{上一低点时间}DDGJ:=REF(CLOSE,DDSJ+1)>CLOSE;{股价趋势}GD:=C=HHV(C,N);{60日最高点}GDSJ:=BARSLAST(REF(GD,1));{上一高点时间}GDGJ:=REF(CLOSE,GDSJ+1)<CLOSE;{股价趋势}TYP:=(HIGH + LOW + CLOSE)/3;CCI:=(TYP-MA(TYP,N))/(0.015*AVEDEV(TYP,N));CDZB:=REF(CCI,DDSJ+1)<CCI;{CCI指标趋势}CCI底背离:=DDGJ AND CDZB;CGZB:=REF(CCI,GDSJ+1)>CCI;CCI顶背离:=GDGJ AND CGZB;K值:="KDJ.K";KDZB:=REF(K值,DDSJ+1)<K值;{KDJ.K指标趋势}K底背离:=DDGJ AND KDZB{ AND K超卖};KGZB:=REF(K值,GDSJ+1)>K值;K顶背离:=GDGJ AND KGZB;MACD:="MACD.MACD";MDZB:=REF(MACD,DDSJ+1)<MACD;{MACD指标趋势}M底背离:=DDGJ AND MDZB;MGZB:=REF(MACD,GDSJ+1)>MACD;M顶背离:=GDGJ AND MGZB;RSI:="RSI.RSI1";RDZB:=REF(RSI,DDSJ+1)<RSI;{RSI指标趋势}R底背离:=DDGJ AND RDZB;RGZB:=REF(RSI,GDSJ+1)>RSI;R顶背离:=GDGJ AND RGZB;BIAS:="BIAS.BIAS1";BDZB:=REF(BIAS,DDSJ+1)<BIAS;{BIAS指标趋势}B底背离:=DDGJ AND BDZB;BGZB:=REF(BIAS,GDSJ+1)>BIAS;B顶背离:=GDGJ AND BGZB;DRAWTEXT(ISLASTBAR,19,' CCI底背离'),LINETHICK2,COLORGREEN;DRAWTEXT(CCI底背离,IF(ISLASTBAR,19,19),'I'),LINETHICK2,COLORGREEN; DRAWTEXT(ISLASTBAR,16,' RSI底背离'),LINETHICK2,COLORWHITE; DRAWTEXT(R底背离,IF(ISLASTBAR,16,16),'I'),LINETHICK2,COLORWHITE; DRAWTEXT(RSI底背离,IF(ISLASTBAR,16,16),'-'),LINETHICK2,COLORWHITE; DRAWTEXT(ISLASTBAR,13,' MACD底背离'),LINETHICK2,COLORMAGENTA; DRAWTEXT(M底背离,IF(ISLASTBAR,13,13),'I'),LINETHICK2,COLORMAGENTA; DRAWTEXT(MACD底背离,IF(ISLASTBAR,13,13),'-'),LINETHICK2,COLORMAGENTA; DRAWTEXT(ISLASTBAR,10,' KDJ底背离'),LINETHICK2,COLORRED; DRAWTEXT(K底背离,IF(ISLASTBAR,10,10),'I'),LINETHICK2,COLORRED; DRAWTEXT(KDJ底背离,IF(ISLASTBAR,10,10),'-'),LINETHICK2,COLORRED; DRAWTEXT(ISLASTBAR,7,' BIAS底背离'),LINETHICK2,COLORYELLOW; DRAWTEXT(B底背离,IF(ISLASTBAR,7,7),'I'),LINETHICK2,COLORYELLOW; DRAWTEXT(BIAS底背离,IF(ISLASTBAR,7,7),'-'),LINETHICK2,COLORYELLOW; DRAWTEXT(ISLASTBAR,4,' BIAS底背离'),LINETHICK2,COLORYELLOW; DRAWTEXT(ISLASTBAR,34,' BIAS顶背离'),LINETHICK2,COLORYELLOW; DRAWTEXT(B顶背离,IF(ISLASTBAR,34,34),'I'),LINETHICK2,COLORYELLOW; DRAWTEXT(BIAS顶背离,IF(ISLASTBAR,34,34),'-'),LINETHICK2,COLORYELLOW; DRAWTEXT(ISLASTBAR,31,' KDJ顶背离'),LINETHICK2,COLORRED; DRAWTEXT(K顶背离,IF(ISLASTBAR,31,31),'I'),LINETHICK2,COLORRED; DRAWTEXT(KDJ顶背离,IF(ISLASTBAR,31,31),'-'),LINETHICK2,COLORRED; DRAWTEXT(ISLASTBAR,28,' MACD顶背离'),LINETHICK2,COLORMAGENTA; DRAWTEXT(M顶背离,(ISLASTBAR,28,28),'I'),LINETHICK2,COLORMAGENTA; DRAWTEXT(MACD顶背离,(ISLASTBAR,28,28),'-'),LINETHICK2,COLORMAGENTA; DRAWTEXT(ISLASTBAR,25,' RSI顶背离'),LINETHICK2,COLORWHITE; DRAWTEXT(R顶背离,(ISLASTBAR,25,25),'I'),LINETHICK2,COLORWHITE; DRAWTEXT(RSI顶背离,(ISLASTBAR,25,25),'-'),LINETHICK2,COLORWHITE; DRAWTEXT(ISLASTBAR,22,' CCI顶背离'),LINETHICK2,COLORGREEN; DRAWTEXT(CCI顶背离,(ISLASTBAR,22,22),'I'),LINETHICK2,COLORGREEN;{超买超卖}K超买:="KDJ.K">=80 OR "KDJ.D">=80 OR "KDJ.J">=100;K超卖:="KDJ.K"<=20 OR "KDJ.D"<=30 OR "KDJ.J"<0;{RSI:="RSI.RSI1"; }R超买:=RSI>=80;R超卖:=RSI<=20;C超买:="I">=100;C超卖:="I"<=-100;{BIAS:="BIAS.BIAS1";}B超买:="BIAS.BIAS1">3.5 OR "BIAS.BIAS2">5;B超卖:="BIAS.BIAS1"<-3 OR "BIAS.BIAS2"<-4;{超卖超买显示}{DRAWTEXT(B超买,IF(ISLASTBAR,34,34),'○'),LINETHICK2,COLORYELLOW; DRAWTEXT(K超买,IF(ISLASTBAR,31,31),'○'),LINETHICK2,COLORRED; DRAWTEXT(R超买,(ISLASTBAR,25,25),'○'),LINETHICK2,COLORWHITE; DRAWTEXT(C超买,(ISLASTBAR,22,22),'○'),LINETHICK2,COLORGREEN;} {DRAWTEXT(C超卖,IF(ISLASTBAR,19,19),'○'),LINETHICK2,COLORGREEN; DRAWTEXT(R超卖,IF(ISLASTBAR,16,16),'○'),LINETHICK2,COLORWHITE; DRAWTEXT(K超卖,IF(ISLASTBAR,10,10),'○'),LINETHICK2,COLORRED; DRAWTEXT(B超卖,IF(ISLASTBAR,7,7),'○'),LINETHICK2,COLORYELLOW;} {BAIS买入}BIAS5:=(C-MA(C,6))/MA(C,6)*100;BIAS6:=(C-MA(C,12))/MA(C,12)*100;BIAS7:=(C-MA(C,24))/MA(C,24)*100;BIAS8:=(BIAS5+2*BIAS6+3*BIAS7)/6;乖离:=MA(BIAS8,6);STICKLINE(CROSS(BIAS8,乖离) AND 乖离<-9,18,20,1,0),COLORRED;超卖O背离I:1,NODRAW,COLORWHITE;顶背比底背更准:1,NODRAW,COLORGREEN;红方点BIAS买点:1,NODRAW,COLORRED;。
A:=IF((CLOSE>126.32),(AMOUNT)/(100000),VOL);主力:MA(A,4),LINETHICK0,COLORYELLOW;游资:MA(A,8),LINETHICK0,COLOR00FF00;大户:MA(A,16),LINETHICK0,COLORRED;散户:MA(A,32),LINETHICK0,COLORF0F000;主比:ABS(((主力)/(主力+ 游资+ 大户+ 散户))*(100)),LINESTICK,COLORYELLOW; 游比:ABS(((游资)/(主力+ 游资+ 大户+ 散户))*(100)),LINESTICK,COLOR00FF00; 大比:ABS(((大户)/(主力+ 游资+ 大户+ 散户))*(100)),LINESTICK,COLORRED;散比:ABS(((散户)/(主力+ 游资+ 大户+ 散户))*(100)),LINESTICK,COLORF0F000; 警戒线:MA(A,180),COLORFF66FF,LINETHICK1;STICKLINE((主力> 0),0,主力,3,0),COLOR009CFF;STICKLINE((主力> 0),0,主力,2.8,0),COLOR009CFF;STICKLINE((主力> 0),0,主力,2.5,0),COLOR00C0FF;STICKLINE((主力> 0),0,主力,1.5,0),COLOR00D1FF;STICKLINE((主力> 0),0,主力,1,0),COLOR00EAFF;STICKLINE((主力> 0),0,主力,0.7,0),COLORYELLOW;STICKLINE((游资> 0),0,游资,3,0),COLOR00C100;STICKLINE((游资> 0),0,游资,2.8,0),COLOR00CA00;STICKLINE((游资> 0),0,游资,2.5,0),COLOR00D300;STICKLINE((游资> 0),0,游资,1.5,0),COLOR00DB00;STICKLINE((游资> 0),0,游资,1,0),COLOR00EA00;STICKLINE((游资> 0),0,游资,0.7,0),COLORGREEN;STICKLINE((大户> 0),0,大户,3,0),COLOR1020AA;STICKLINE((大户> 0),0,大户,2.8,0),COLOR1020BB;STICKLINE((大户> 0),0,大户,2.5,0),COLOR1020CC;STICKLINE((大户> 0),0,大户,1.5,0),COLOR1020DD;STICKLINE((大户> 0),0,大户,1,0),COLOR1020EE;STICKLINE((大户> 0),0,大户,0.7,0),COLORRED;STICKLINE((散户> 0),0,散户,3,0),COLORFF7700;STICKLINE((散户> 0),0,散户,2.8,0),COLORFF8800;STICKLINE((散户> 0),0,散户,2.5,0),COLORFF9900;STICKLINE((散户> 0),0,散户,1.5,0),COLORFFAA00; STICKLINE((散户> 0),0,散户,1,0),COLORFFBB00;STICKLINE((散户> 0),0,散户,0.7,0),COLORLIBLUE;。
DIF:MACD.DIF(12,26,9),LINETHICK2;DEA:MACD.DEA(12,26,9);MACD:(DIF-DEA)*2,COLORSTICK;DRAWICON(REF(DIF,1)>REF(DIF,2) AND DIF<REF(DIF,1) AND DIF>0 AND DIF>DEA,DIF*1.1,2),COLORGREEN;DRAWICON(CROSS(DEA,DIF) AND DIF>0,DIF,37),COLORGREEN;DRAWICON(REF(DIF,1)<REF(DIF,2) AND DIF>REF(DIF,1) AND DIF<0 AND DIF<DEA,DIF*1.1,1),COLORRED;DRAWICON(CROSS(DIF,DEA) AND DIF<0,DIF,36),COLORRED;XA_1:=MACD<0 AND MACD>REF(MACD,1) AND REF(MACD,1)<REF(MACD,2) AND REF(MACD,2)<REF(MACD,3) AND REF(MACD,3)<REF(MACD,4);STICKLINE(XA_1,0,MACD,0.3,0),COLORRED;XA_2:=MACD>0 AND MACD<REF(MACD,1) AND REF(MACD,1)>REF(MACD,2) AND REF(MACD,2)>REF(MACD,3) AND REF(MACD,3)>REF(MACD,4);STICKLINE(XA_2,0,MACD,0.3,0),COLORGREEN;XA_3:=100-100*(HHV(HIGH,34)-CLOSE)/(HHV(HIGH,34)-LLV(LOW,34))-50;XA_4:=EMA(XA_3,3);NOTEXTLU:IF(XA_4>24.99,DIF,DRAWNULL),COLORRED,LINETHICK2;NOTEXTLU2:IF(XA_4<(-40.009998),DIF,DRAWNULL),COLORGREEN,LINETHICK2; NOTEXT0:0,DOTLINE,COLORLIGRAY;XA_5:=IF(PERIOD=0,0.7,IF(PERIOD=1,1.2,IF(PERIOD=2,2,IF(PERIOD=3,2.5,IF(PERIOD =4,3,IF(PERIOD=5,5.5,IF(PERIOD=6,6,IF(PERIOD=7,7,IF(PERIOD=8,3.5,4)))))))));XA_6:=BARSLAST(CROSS(MACD,0));XA_7:=REF(XA_6,1)>0 AND XA_6=0;XA_8:=BARSLAST(XA_7);XA_9:=REF(XA_6,XA_8+1);XA_10:=HHVBARS(MACD,XA_8+XA_9);XA_11:=IF(XA_10>XA_8,REF(MACD,XA_10),0);XA_12:=IF(XA_10>XA_8,REF(HIGH,XA_10),0);XA_13:=IF(REF(HIGH,1)=HHV(HIGH,XA_8+XA_9),REF(HIGH,1),0);XA_14:=(XA_13-XA_12)/XA_12*100;XA_15:=COUNT(CROSS(0,MACD),XA_8+XA_9);XA_16:=MACD>0 AND MACD<XA_11 AND HIGH=HHV(HIGH,XA_8+XA_9) AND XA_11>0 AND XA_15=1;XA_17:=REF(XA_16,1) AND HIGH<REF(HIGH,1) AND MACD>0 AND XA_11>0;XA_18:=LLVBARS(MACD,XA_8+XA_9);XA_19:=IF(XA_18>XA_8,REF(MACD,XA_18),0);XA_20:=IF(XA_18>XA_8,REF(LOW,XA_18),0);XA_21:=IF(REF(LOW,1)=LLV(LOW,XA_8+XA_9),REF(LOW,1),0);XA_22:=(XA_20-XA_21)/XA_20*100;XA_23:=COUNT(CROSS(MACD,0),XA_8+XA_9);XA_24:=MACD<0 AND MACD>XA_19 AND LOW=LLV(LOW,XA_8+XA_9) AND XA_19<0 AND COUNT(CROSS(MACD,0),XA_8+XA_9)<=3;XA_25:=REF(XA_24,1) AND LOW>REF(LOW,1) AND MACD<0 AND XA_19<0;前高:IF(XA_17,XA_12,DRAWNULL),NODRAW,COLOR7FFF00;现高:IF(XA_17,XA_13,DRAWNULL),NODRAW,COLORGREEN;幅度_顶:IF(XA_17,XA_14,DRAWNULL),NODRAW,COLORYELLOW;原低:IF(XA_25,XA_20,DRAWNULL),NODRAW,COLORLIMAGENTA;现低:IF(XA_25,XA_21,DRAWNULL),NODRAW,COLORRED;幅度_底:IF(XA_25,XA_22,0),NODRAW,COLORYELLOW;DRAWICON(XA_25,MACD,26);DRAWICON(XA_17,MACD,27);XA_26:=BACKSET(XA_17,XA_10+1);XA_27:=BACKSET(XA_25,XA_18+1);NOTEXTMACDL:DRAWLINE(REF(XA_27,1)=0 AND XA_27=1 AND MACD<0,MACD,XA_25,MACD,0),COLORRED;NOTEXTMACDH:DRAWLINE(REF(XA_26,1)=0 AND XA_26=1 AND MACD>0,MACD,XA_17,MACD,0),COLORGREEN;涨家数:INDEXADV,NODRAW,COLORRED;跌家数:INDEXDEC,NODRAW,COLORGREEN;正量能:涨家数/(涨家数+跌家数)*100,NODRAW,COLORMAGENTA;负量能:跌家数/(涨家数+跌家数)*100,NODRAW,COLORYELLOW;。
好厉害的MACD背离（通达信副图指标）DIF:EMA(CLOSE,12)-EMA(CLOSE,26),COLORRED,LINETHICK2;DEA:EMA(DIF,9),COLORWHITE,LINETHICK2;持仓段:=0,COLOR00CFFF;空仓段:=0,COLORFFCCFF;STICKLINE(DIF>DEA,-0.5,-0.6,10,1),COLOR00CFFF;STICKLINE(DIF<DEA,-0.5,-0.6,10,1),COLORFFCCFF;MACD:(DIF-DEA)*2,COLORSTICK;STICKLINE(((MACD<REF(MACD,1)) AND(MACD>0)),0,MACD,1,0),COLORLIBLUE,LINETHICK2;STICKLINE(((MACD>REF(MACD,1)) AND(MACD<0)),0,MACD,1,0),COLORFF00FF,LINETHICK2;建仓:IF(DIF<0,DIF,0),COLORYELLOW,LINETHICK2;加仓:IF(DIF<0,0,DIF),COLORRED,LINETHICK2;白线破仓:IF(DIF<DEA,DIF,DEA),COLORWHITE,LINETHICK2;趋势强弱:IF(DIF>DEA,DEA,DEA),COLORFF937F,LINETHICK2;AA:=COUNT(CROSS(DIF,DEA),BARSLAST(DEA>=0));二次金叉:=CROSS(DIF,DEA) AND DEA<0 AND COUNT(AA=2,21)=1; DRAWTEXT(二次金叉,0.2,' 二次金叉'),COLORYELLOW;A1:=BARSLAST(REF(CROSS(DIF,DEA),1));底背离:=REF(CLOSE,A1+1)>CLOSE AND DIF>REF(DIF,A1+1) AND CROSS(DIF,DEA); STICKLINE(底背离,0,0.03,6,0),COLOR00FF00;底背:DRAWLINE(A1=0,DEA,底背离,DEA,0),COLORRED,LINETHICK4; DRAWTEXT(底背离,0.12,' 底背离'),COLORFF00FF;A2:=BARSLAST(REF(CROSS(DEA,DIF),1));顶背离:=REF(CLOSE,A2+1)<CLOSE AND REF(DIF,A2+1)>DIF AND CROSS(DEA,DIF); 顶背:DRAWLINE(A2=0,DEA,顶背离,DEA,0),COLORGREEN,LINETHICK4;。
自动画MACD背离线通达信指标公式源码以下是通达信软件中计算MACD背离指标的源码：```/*功能：计算MACD背离线指标公式：当股价形成新高而MACD指标不形成新高时，出现向下背离当股价形成新低而MACD指标不形成新低时，出现向上背离参数：无返回值：无*/indicator fn_DEVIATION_MACDMA1:=EMA(CLOSE,12);MA2:=EMA(CLOSE,26);DIFF:=MA1-MA2;DEA:=EMA(DIFF,9);MACD:=2*(DIFF-DEA);PeakArr:=[];TroughArr:=[];PeakCount:=0;TroughCount:=0;//寻找股价的峰值和谷底Loop:=BARSSINCE(HIGHESTBARS(HIGH,9)) + 1;FOR i FROM Loop TO BARCOUNT-1BEGINIFHIGH[i]>REF(HIGH,1)[i]ANDHIGH[i]>HIGH[i+1]THENBEGINPeakCount := PeakCount + 1;PeakArr[PeakCount] := i;END;IFLOW[i]<REF(LOW,1)[i]ANDLOW[i]<LOW[i+1]THENBEGINTroughCount := TroughCount + 1;TroughArr[TroughCount] := i;END;END;//判断是否存在背离BEARTrend := IF(REF(MACD,1) > REF(MACD,2),1,-1); // 1表示下跌趋势，-1表示上涨趋势PeakPos := 0;TroughPos := 0;Signal := "";FOR i FROM 1 TO MIN(PeakCount, TroughCount) BEGINIF BEARTrend = 1 THENBEGINIF HIGH[PeakArr[i]] > HIGH[PeakArr[i-1]] THEN BEGINIF LOW[TroughArr[i]] > LOW[TroughArr[i-1]] THEN BEGINPeakPos := PeakArr[i];TroughPos := TroughArr[i];Signal := "向下背离";BREAK;END;END;END;ELSE IF BEARTrend = -1 THENBEGINIF HIGH[PeakArr[i]] < HIGH[PeakArr[i-1]] THENBEGINIF LOW[TroughArr[i]] < LOW[TroughArr[i-1]] THENBEGINPeakPos := PeakArr[i];TroughPos := TroughArr[i];Signal := "向上背离";BREAK;END;END;END;END;//输出背离信号IF PeakPos > 0 AND TroughPos > 0 THENBEGINDRAWICON(PeakPos, HIGH[PeakPos], CONCAT(Signal, "顶背离"),IC_TRIANGLE, 0, RED);DRAWICON(TroughPos, LOW[TroughPos], CONCAT(Signal, "底背离"), IC_TRIANGLE, 1, GREEN);END;//返回背离信号位置RETURN PeakPos, TroughPos;```以上代码使用通达信魔法公式语言编写，通过计算MACD指标的DIF、DEA、MACD三个值，并寻找股价的峰值和谷底来判断是否存在背离信号。
通达信CCI顶底背离买卖点副图指标公式源码以下是通达信CCI顶底背离买卖点副图指标公式源码（无源码的请下载附件导入）DRAWGBK(O>C,RGB(40,40,40),RGB(0,0,40),0,'01',0); {背景不要可删除}N:=14;TYP:=(HIGH+LOW+CLOSE)/3;CCI:(TYP-MA(TYP,N))/(0.015*AVEDEV(TYP,N));RSI1:=CCI;AA:=REF(RSI1,N)=HHV(RSI1,2*N+1);BB:=BACKSET(AA,N+1);CC:=FILTER(BB,N) AND RSI1=HHV(RSI1,N+1);A1:=BARSLAST(REF(CC,1));顶背离:REF(CLOSE,A1+1)<CLOSE AND REF(RSI1,A1+1)>RSI1 AND CC;DRAWLINE(CC,RSI1,FILTER(顶背离>0,5),RSI1,0),COLORGREEN,LINETHICK1;DRAWICON(顶背离,CCI*0.9,6);AA2:=REF(RSI1,N)=LLV(RSI1,2*N+1);BB2:=BACKSET(AA2,N+1);CC2:=FILTER(BB2,N) AND RSI1=LLV(RSI1,N+1);A2:=BARSLAST(REF(CC2,1));底背离:REF(CLOSE,A2+1)>CLOSE AND REF(RSI1,A2+1)<RSI1 AND CC2;DRAWLINE(CC2,RSI1,FILTER(底背离>0,5),RSI1,0),COLORMAGENTA,LINETHICK1;DRAWICON(底背离,CCI*1.1,5);上升:IF(CCI>REF(CCI,1),CCI,DRAWNULL),LINETHICK1,COLORRED,DOTLINE;X:=CROSS(CCI,-100);DRAWICON(X,-150,7);M:=CROSS(100,CCI);DRAWICON(M,150,8);IF(CCI>=100,CCI,DRAWNULL),COLORGREEN;IF(CCI<=-100,CCI,DRAWNULL),COLORRED;顶部:100,COLORBLUE,LINETHICK1;底部:-100,COLORRED,LINETHICK1;STICKLINE(CCI>100,100,CCI,0.5,0), COLORGREEN;STICKLINE(CCI<-100,-100,CCI,0.5,0), COLORRED;。
