缠论公式集段成选股var1:="chzhshch@kxian";{处理K线}var2:="chzhshch@bi";{处理笔关系}var3:="chzhshch@duan";{处理段关系}var4:="chzhshch@duan2";{处理更高级别段关系}bi1:=if(c>0,BARSLAST(var2<0),BARSLAST(var2>0));{已完成笔向上}bi2:=if(c>0,BARSLAST(var2>0),BARSLAST(var2<0));{已完成笔向下}bidi:=ref(l,SUMBARS(bi1=0,1)-1);{当前之前（如果在点上算自身1次）第n个笔低点的值}bigao:=ref(h,SUMBARS(bi2=0,1)-1);{当前之前（如果在点上算自身1次）第n个笔高点的值}duan1:=if(c>0,BARSLAST(var3<0),BARSLAST(var3>0) );{已完成段向上}duan2:=if(c>0,BARSLAST(var3>0),BARSLAST(var3<0) );{已完成段向下}duanA:=if(c>0,BARSLAST(var4<0),BARSLAST(var4>0) );{已完成更高级段向上}duanB:=if(c>0,BARSLAST(var4>0),BARSLAST(var4<0));{已完成更高级段向下}未完成笔往下:BARSLAST(var2>0)<BARSLAST(var2<0);未完成段往下:BARSLAST(var3>0)<BARSLAST(var3<0);未完成笔向上:BARSLAST(var2>0)>BARSLAST(var2<0);未完成段向上:BARSLAST(var3<0)>BARSLAST(var3>0);TYP:=(HIGH+LOW+CLOSE)/3;CCI:=(TYP-MA(TYP,18))/(0.015*AVEDEV(TYP,18));DIF:=EMA(CLOSE,12)-EMA(CLOSE,26);DEA:=EMA(DIF,9);MACD:=(DIF-DEA)*2;f30段上选股:未完成段向上=1 and CCI<-100;F30段下二买:未完成段往下=1 and dea>0 AND CCI<-100;MACD底背离选股公式——通达信、同花顺底背离,通达信版、同花顺版}DIFF:=EMA(CLOSE,12) - EMA(CLOSE,26);DEA:=EMA(DIFF,9);MACD:=2*(DIFF-DEA);QZQ:=BARSLAST(REF(MACD,1)<0 AND MACD>0); QM:=LLVBARS(MACD,QZQ+20);MQDZ:=IF(QM>QZQ,REF(MACD,QM),0);XG1:=MACD<0 AND MACD>MQDZAND CLOSE=LLV(CLOSE,QZQ+20) AND MQDZ<0; XG:REF(XG1,1)=1 AND MACD>REF(MACD,1);{双底背离,通达信版、同花顺版}DIFF:=EMA(CLOSE,12) - EMA(CLOSE,26);DEA:=EMA(DIFF,9);MACD:=2*(DIFF-DEA);QZQ:=BARSLAST(REF(MACD,1)<0 AND MACD>0); QM:=LLVBARS(MACD,QZQ+20);MQDZ:=IF(QM>QZQ,REF(MACD,QM),0);QF:=LLVBARS(DIFF,QZQ+20);DQDZ:=IF(QF>QZQ,REF(DIFF,QF),0);XG1:=MACD<0 AND MACD>MQDZ AND DIFF<0 AND DIFF>DQDZAND CLOSE=LLV(CLOSE,QZQ+20) AND MQDZ<0 AND DQDZ<0;XG:REF(XG1,1)=1 AND MACD>REF(MACD,1);注：底双背离是指MACD（绿柱）和DIFF（黄白线）都底背离。

飞狐5/10均线面积主图公式源码这是在飞狐交易师主图上的5日和10日均线面积公式，有趋势平均力度，希望对大家有帮助。

注意：这是主图技术指标，建公式时一定要把“主图叠加”勾选上！{5/10均线面积}MA5:MA(C,5);MA10:MA(C,10);均线差:=MA5-MA10;JC:=MA10-MA5;绿柱面积:=IF (均线差<0,SUM(均线差*0.1,BARSLAST(JC<0)),0);红柱面积:=IF (均线差>0,SUM(均线差*0.1,BARSLAST(JC>0)),0);均线面积:IF(均线差>0,红柱面积,绿柱面积),color0000ff,LINETHICK0;A1:=IF(均线差>0,1,-1);A2:=REF(A1,1);A3:=A1*A2;A4:=BARSLAST(A3<0);A5:=A4+1;趋势平均力度:(SUM(均线差,0)-REF(SUM(均线差,0),A5))/A5,colorFF00FF,LINETHICK0;drawnumber(ref(均线差,1)>0 and 均线差<=0 ,HHV(H,8),ref(红柱面积,1),3),ALIGN2,pxup20,colorred; drawnumber(ref(均线差,1)>0 and 均线差<=0 ,HHV(H,8),ref(趋势平均力度,1),3),ALIGN2,pxup45,colorff00ff;drawnumber(ref(均线差,1)<0 and 均线差>=0 ,LLV(L,8),ref(abs(绿柱面积),1),3),ALIGN2,pxdn5,Color004A00;drawnumber(ref(均线差,1)<0 and 均线差>=0 ,LLV(L,8),ref(abs(趋势平均力度),1),3),ALIGN2,pxdn30,colorff00ff;drawnumber(islastbar and 均线差<0,LLV(L,5),abs(绿柱面积),3),align2,pxdn5,Color004A00;drawnumber(islastbar and 均线差<0,LLV(L,5),abs(趋势平均力度),3),align2,pxdn30,Colorff00ff;drawnumber(islastbar and 均线差>0,HHV(H,5),abs(红柱面积),3),align2,pxup20,colorred;drawnumber(islastbar and 均线差>0,HHV(H,5),abs(趋势平均力度),3),align2,pxup45,colorff00ff;MACD底背离选股公式——飞狐、大智慧L2{底背离,飞狐版、大智慧L2版、大智慧经典（免费）版} DIFF:=EMA(CLOSE,12) - EMA(CLOSE,26);DEA:=EMA(DIFF,9);MACD:=2*(DIFF-DEA);QZQ:=BARSLAST(REF(MACD,1)<0 AND MACD>0); QM:=LLVBARS(MACD,QZQ+20);MQDZ:=IF(QM>QZQ,REF(MACD,QM),0);XG1:=MACD<0 AND MACD>MQDZAND CLOSE=LLV(CLOSE,QZQ+20) AND MQDZ<0; XG:REF(XG1,1)<>0 AND MACD>REF(MACD,1);{双底背离,飞狐版、大智慧L2版}DIFF:=EMA(CLOSE,12) - EMA(CLOSE,26);DEA:=EMA(DIFF,9);MACD:=2*(DIFF-DEA);QZQ:=BARSLAST(REF(MACD,1)<0 AND MACD>0); QM:=LLVBARS(MACD,QZQ+20);MQDZ:=IF(QM>QZQ,REF(MACD,QM),0);QF:=LLVBARS(DIFF,QZQ+20);DQDZ:=IF(QF>QZQ,REF(DIFF,QF),0);XG1:=MACD<0 AND MACD>MQDZ AND DIFF<0 AND DIFF>DQDZAND CLOSE=LLV(CLOSE,QZQ+20) AND MQDZ<0 AND DQDZ<0;XG:REF(XG1,1)<>0 AND MACD>REF(MACD,1);注：底双背离是指MACD（绿柱）和DIFF（黄白线）都底背离。

红绿柱面积公式——飞狐和大智慧L2版{MACD红绿柱面积(飞狐版副图)参数默认值：p=26；s=12；m=9}DIFF1:=EMA(CLOSE,s) - EMA(CLOSE,p);DEA1:=EMA(DIFF1,m);MACD:2*(DIFF1-DEA1){,COLORSTICK},LINETHICK0; MACDhs:=IF(MACD>0 ANDMACD>=REF(MACD,1),MACD,0);MACDhx:=IF(MACD>0 ANDMACD<=REF(MACD,1),MACD,0);MACDlx:=IF(MACD<0 ANDMACD<REF(MACD,1),MACD,0);MACDls:=IF(MACD<0 ANDMACD>REF(MACD,1),MACD,0);STICKLINE(MACDhs>0,0,MACD,9,0),Color0000BB; STICKLINE(MACDhs>0,0,MACD,8,0),Color0000CC; STICKLINE(MACDhs>0,0,MACD,7,0),Color0011CC; STICKLINE(MACDhs>0,0,MACD,6,0),Color1122DD; STICKLINE(MACDhs>0,0,MACD,5,0),Color2233DD; STICKLINE(MACDhs>0,0,MACD,4,0),Color3344EE; STICKLINE(MACDhs>0,0,MACD,3,0),Color4455EE; STICKLINE(MACDhs>0,0,MACD,2,0),Color5566FF; STICKLINE(MACDhs>0,0,MACD,1,0),Color6677FF; STICKLINE(MACDhx>0,0,MACD,9,0),Color0077BB; STICKLINE(MACDhx>0,0,MACD,8,0),Color0088CC; STICKLINE(MACDhx>0,0,MACD,7,0),Color0099CC; STICKLINE(MACDhx>0,0,MACD,6,0),Color00AADD; STICKLINE(MACDhx>0,0,MACD,5,0),Color00BBDD; STICKLINE(MACDhx>0,0,MACD,4,0),Color00CCEE; STICKLINE(MACDhx>0,0,MACD,3,0),Color00DDEE; STICKLINE(MACDhx>0,0,MACD,2,0),Color00EEFF; STICKLINE(MACDhx>0,0,MACD,1,0),Color00FFFF; STICKLINE(MACDlx<0,MACD,0,9,0),Color770000; STICKLINE(MACDlx<0,MACD,0,8,0),Color881100;STICKLINE(MACDlx<0,MACD,0,7,0),Color992200; STICKLINE(MACDlx<0,MACD,0,6,0),ColorAA3300; STICKLINE(MACDlx<0,MACD,0,5,0),ColorBB4400; STICKLINE(MACDlx<0,MACD,0,4,0),ColorCC5500; STICKLINE(MACDlx<0,MACD,0,3,0),ColorDD6600; STICKLINE(MACDlx<0,MACD,0,2,0),ColorEE7700; STICKLINE(MACDlx<0,MACD,0,1,0),ColorFF8800; STICKLINE(MACDls<0,MACD,0,9,0),Color005500; STICKLINE(MACDls<0,MACD,0,8,0),Color007700; STICKLINE(MACDls<0,MACD,0,7,0),Color009900; STICKLINE(MACDls<0,MACD,0,6,0),Color00AA00; STICKLINE(MACDls<0,MACD,0,5,0),Color00BB00; STICKLINE(MACDls<0,MACD,0,4,0),Color00CC00; STICKLINE(MACDls<0,MACD,0,3,0),Color00DD00; STICKLINE(MACDls<0,MACD,0,2,0),Color00EE00; STICKLINE(MACDls<0,MACD,0,1,0),Color00FF00;DIFF:DIFF1,Color0000FF;DEA:DEA1,ColorFF0000;红柱面积:IF(MACD>0,SUM(MACD,BARSLAST(MACD<0)),0),LIN ETHICK0,Color0000FF;绿柱面积:IF(MACD<0,SUM(MACD,BARSLAST(MACD>0)),0),LIN ETHICK0,Color006000;{平均面积: IF(MACD>0,10*红柱面积/BARSLAST(MACD<0),10*绿柱面积/BARSLAST(MACD>0)),LINETHICK0,ColorFF00FF;} DRAWNUMBER(ref(MACD,1)>0 andMACD<=0 ,HHV(MACD,4),ref(红柱面积,1),2),ALIGN1,pxup10,colorred;{DRAWNUMBER(ref(MACD,1)>0 andMACD<=0 ,HHV(MACD,4),ref(平均面积,1),2),ALIGN1,pxup35,ColorFF00FF;}DRAWNUMBER(ref(MACD,1)<0 andMACD>=0 ,LLV(MACD,4),ref(abs(绿柱面积),1),2),ALIGN1,pxdn5,Color006000;{DRAWNUMBER(ref(MACD,1)<0 andMACD>=0 ,LLV(MACD,4),ref(abs(平均面积),1),2),ALIGN1,pxdn30,ColorFF00FF;}DRAWNUMBER(BARSTATUS=2 ANDMACD<0,LLV(MACD,4),abs(绿柱面积),2),align2,pxdn5,Color006000;{DRAWNUMBER(BARSTATUS=2 ANDMACD<0,LLV(MACD,4),abs(平均面积),2),align2,pxdn30,ColorFF00FF;}DRAWNUMBER(BARSTATUS=2 ANDMACD>0,HHV(MACD,4),abs(红柱面积),2),align2,pxup10,colorred;{DRAWNUMBER(BARSTATUS=2 ANDMACD>0,HHV(MACD,4),abs(平均面积),2),align2,pxup35,ColorFF00FF;}DRAWNUMBER(MACD>0 ANDMACD=HHV(MACD,BARSLAST(MACD<0)) ANDMACD>=REFX(MACD,1) ANDMACD>=REFX(MACD,2),MACD,MACD,2),align0,pxup20,C olorFF0000;DRAWNUMBER(MACD<0 ANDMACD=LLV(MACD,BARSLAST(MACD>0)) ANDMACD<=REFX(MACD,1) ANDMACD<=REFX(MACD,2),MACD,MACD,2),align0,pxup10,C olorFF00FF;0,Color000000;{MACD红绿柱面积(大智慧L2版副图)参数默认值：p=26；s=12；m=9}DIFF:EMA(CLOSE,s) - EMA(CLOSE,p);DEA:EMA(DIFF,m);MACD:2*(DIFF-DEA){,COLORSTICK},LINETHICK0; MACDhs:=IF(MACD>0 ANDMACD>REF(MACD,1),MACD,0);MACDhx:=IF(MACD>0 ANDMACD<REF(MACD,1),MACD,0);MACDlx:=IF(MACD<0 ANDMACD<REF(MACD,1),MACD,0);MACDls:=IF(MACD<0 ANDMACD>REF(MACD,1),MACD,0);STICKLINE(MACDhs>0,0,MACD,9,0),Color0000BB; STICKLINE(MACDhs>0,0,MACD,8,0),Color0000CC; STICKLINE(MACDhs>0,0,MACD,7,0),Color0000CC; STICKLINE(MACDhs>0,0,MACD,6,0),Color0000DD; STICKLINE(MACDhs>0,0,MACD,5,0),Color0033DD; STICKLINE(MACDhs>0,0,MACD,4,0),Color3355EE; STICKLINE(MACDhs>0,0,MACD,3,0),Color6677EE; STICKLINE(MACDhs>0,0,MACD,2,0),Color8888FF; STICKLINE(MACDhs>0,0,MACD,1,0),Color9999FF; STICKLINE(MACDhx>0,0,MACD,9,0),Color0077BB;STICKLINE(MACDhx>0,0,MACD,8,0),Color0088CC; STICKLINE(MACDhx>0,0,MACD,7,0),Color0099CC; STICKLINE(MACDhx>0,0,MACD,6,0),Color00AADD; STICKLINE(MACDhx>0,0,MACD,5,0),Color11BBDD; STICKLINE(MACDhx>0,0,MACD,4,0),Color22CCEE; STICKLINE(MACDhx>0,0,MACD,3,0),Color33DDEE; STICKLINE(MACDhx>0,0,MACD,2,0),Color44EEFF; STICKLINE(MACDhx>0,0,MACD,1,0),Color55FFFF; STICKLINE(MACDlx<0,MACD,0,9,0),ColorBB0000; STICKLINE(MACDlx<0,MACD,0,8,0),ColorCC0000; STICKLINE(MACDlx<0,MACD,0,7,0),ColorCC2200; STICKLINE(MACDlx<0,MACD,0,6,0),ColorDD4400; STICKLINE(MACDlx<0,MACD,0,5,0),ColorDD6611; STICKLINE(MACDlx<0,MACD,0,4,0),ColorEE8822; STICKLINE(MACDlx<0,MACD,0,3,0),ColorEEAA33; STICKLINE(MACDlx<0,MACD,0,2,0),ColorFFBB44; STICKLINE(MACDlx<0,MACD,0,1,0),ColorFFCC55; STICKLINE(MACDls<0,MACD,0,9,0),Color007700; STICKLINE(MACDls<0,MACD,0,8,0),Color009900; STICKLINE(MACDls<0,MACD,0,7,0),Color00AA00; STICKLINE(MACDls<0,MACD,0,6,0),Color00BB00; STICKLINE(MACDls<0,MACD,0,5,0),Color11CC11;STICKLINE(MACDls<0,MACD,0,4,0),Color22DD22; STICKLINE(MACDls<0,MACD,0,3,0),Color33FF33; STICKLINE(MACDls<0,MACD,0,2,0),Color44EF44; STICKLINE(MACDls<0,MACD,0,1,0),Color55FF55;绿柱面积:10*IF(MACD<0,SUM(MACD,BARSLAST(MACD>0)),0),LINETHI CK0,Color00ff00;红柱面积:10*IF(MACD>0,SUM(MACD,BARSLAST(MACD<0)),0),LINETHI CK0,colorred;DRAWTEXT(ref(MACD,1)>0 andMACD<=0 ,HHV(MACD,8),''+ref(红柱面积,1)),ALIGN1,VALIGN1,colorred;DRAWTEXT(ref(MACD,1)<0 andMACD>=0 ,LLV(MACD,4),''+ref(abs(绿柱面积),1)),ALIGN1,Color00ff00;DRAWTEXT(BARSTATUS=2 ANDMACD<0,LLV(MACD,8),''+abs(绿柱面积)),align2,Color004A00;DRAWTEXT(BARSTATUS=2 ANDMACD>0,HHV(MACD,4),''+abs(红柱面积)),align2,VALIGN1,colorred;注：底双背离是指MACD（绿柱）和DIFF（黄白线）都底背离。