通达信彩带背离主图，源码

 MA5:MA(C,5),COLORWHITE,LINETHICK2;
MA20:MA(C,20)COLORYELLOW,LINETHICK3;
MA48:MA(C,48)LINETHICK2;
MA60:MA(C,60),COLORBLUE,LINETHICK4;
MA1:MA(CLOSE,10),COLORRED,LINETHICK3;
MA2:MA(CLOSE,120),COLORGRAY ,LINETHICK6;
DRAWBAND(MA(C,4),RGB(185,0,0),MA(C,7),RGB(0,70,0));
DRAWKLINE(H,O,L,C);
AA:=CROSS(MA5,MA20);
DRAWTEXT(FILTER(AA,5),L*1.008,'△金叉'), COLORYELLOW;
DRAWTEXT(CROSS(MA(CLOSE,4),MA(CLOSE,9)),L*0.99,'△小金叉'),COLORRED;
DRAWTEXT(CROSS(MA(CLOSE,20),MA(CLOSE,60)),L*1.01,'△大金叉'),COLORRED;
STICKLINE(C>REF(C,1)*1.099,C,O,2.7,0)COLORRED,LINETHICK2;
ZT:=C/REF(C,1)>1.097;
BH:=BARSLAST(ZT);
CZ:=REF(H,BH)-REF(L,BH);
STICKLINE(C AND BH< 100,(REF(L,BH)+CZ*0.5),(REF(L,BH)+CZ*0.5),3,0),COLORRED;
STICKLINE(C AND BH< 100,REF(L,BH),REF(L,BH),3,0),COLORWHITE;
STICKLINE(C AND BH< 100,REF(H,BH),REF(H,BH),3,0),COLORWHITE;
涨停:=C>REF(C,1)*1.099;
开盘价:=REF(O,BARSLAST(涨停)),COLORWHITE,CIRCLEDOT;
DRAWNUMBER(涨停,L,O),COLOR5F9F9F;
C3:=REF(C,1);
跌停:=IF((C3-C)*100/C3>=(10-0.01*100/C3),1,0);
STICKLINE(跌停,OPEN,CLOSE,4,0),COLORGREEN;
STICKLINE(跌停,OPEN,CLOSE,3,0),COLORGREEN;
DRAWTEXT(跌停,H+0.3,'跌停'),COLORGREEN;
净资产:FINANCE(34),NODRAW,COLORFF00FF;
每股收益:FINANCE(33),NODRAW,COLORFF7F50;
市盈率:DYNAINFO(39),NODRAW,COLORFF00FF;
流通市值:(FINANCE(40)/100000000),NODRAW,COLORRED;
STICKLINE(C AND BH< 100,REF(H,BH),REF(H,BH),3,0),COLORWHITE;
半分位:=(O+C)/2;
昨半分位:=REF(半分位,1);
STICKLINE(ISLASTBAR,昨半分位,昨半分位,10,0);
DRAWNUMBER(ISLASTBAR,昨半分位,昨半分位);
DRAWTEXT(ISLASTBAR,昨半分位,' 昨半分位');
A3:=(C-LLV(L,9))/(HHV(H,9)-LLV(L,9))*100;
A4:=SMA(A3,3,1);
A5:=SMA(A4,3,1);
A6:=3*A4-2*A5;
A7:=C-REF(C,1);
A8:=100*EMA(EMA(A7,6),6)/EMA(EMA(ABS(A7),6),6);
买:=LLV(A8,2)=LLV(A8,7) AND COUNT(A8< 0,2) AND CROSS(A8,MA(A8,2));
STICKLINE(买,OPEN,CLOSE,2,0),COLORYELLOW;
K11:=EMA(C,60);
DD1:=C>K11;
VAR37:=EMA(EMA(EMA(CLOSE,2),2),2);
VAR47:=(MA(VAR37,47))*(0.99);
分水岭:=(MA(VAR37,13))*(0.99),LINETHICK2,COLORFF00FF;
DRAW:=(MA(CLOSE,13) > MA(CLOSE,18)) AND CROSS(CLOSE,MA(CLOSE,4)) AND (MA(CLOSE,4) < MA(CLOSE,13));
AA1:=DD1 AND DRAW;
DRAWTEXT(AA1,LOW*0.98,'买'),COLORWHITE;
DIFF:=EMA(DCLOSE,12)-EMA(DCLOSE,26);
DEA:=EMA(DIFF,9),COLORFFFF00;
A1:=BARSLAST(REF(CROSS(DIFF,DEA),1));
底背离:=REF(CLOSE,A1+1)>CLOSE AND DIFF>REF(DIFF,A1+1) AND CROSS(DIFF,DEA);
MACD底背离:=IF(底背离,57,0),LINETHICK2,COLORFF00FF;
DRAWTEXT(底背离,LOW*0.96,'入'),COLORYELLOW;
超B:=L2_AMO(0,2)/10000.0;
大B:=L2_AMO(1,2)/10000.0;
中B:=L2_AMO(2,2)/10000.0;
小B:=L2_AMO(3,2)/10000.0;
超S:=L2_AMO(0,3)/10000.0;
大S:=L2_AMO(1,3)/10000.0;
中S:=L2_AMO(2,3)/10000.0;
小S:=L2_AMO(3,3)/10000.0;
TESTSKIP(NOT(超B OR 大B OR 中B OR 小B OR 超S OR 大S OR 中S OR 小S)!=0);
大宗进:=(超B)+(大B),NODRAW;
大宗出:=(超S)+(大S),NODRAW;
非大宗进:=(中B)+(小B),NODRAW;
非大宗出:=(中S)+(小S),NODRAW;
DAZHIV:=CONST(MAX(ABS(大宗进),MAX(ABS(大宗出),MAX(ABS(非大宗进),ABS(非大宗出))))),NODRAW;
DRAWRECTREL(0,CONST(950-(ABS(大宗进)*250/DAZHIV)),30,970,IF(CONST(大宗进>0),RGB(255,0,0),RGB(23,125,255)));
DRAWRECTREL(32,CONST(950-(ABS(大宗出)*250/DAZHIV)),62,970,IF(CONST(大宗出>0),RGB(23,125,255),RGB(255,0,0)));
DRAWRECTREL(92,CONST(950-(ABS(非大宗进)*250/DAZHIV)),122,970,IF(CONST(非大宗进>0),RGB(255,0,0),RGB(23,125,255)));
DRAWRECTREL(124,CONST(950-(ABS(非大宗出)*250/DAZHIV)),154,970,IF(CONST(非大宗出>0),RGB(23,125,255),RGB(255,0,0)));
DRAWTEXT_FIX(CURRBARSCOUNT=1,0.015,1,0,'主力进出'),COLORRED;
DRAWTEXT_FIX(CURRBARSCOUNT=1,0.107,1,0,'散户进出'),COLORGREEN;
VAR3:=PEAKBARS(3,10,1)< 10;
VAR5:=IF(VAR3=1,2,0);
顶:= IF(VAR5=2,2,0);
DRAWICON(顶>REF(顶,1),H*1.005,2);
DRAWICON(CROSS(ZIG(3,10) ,REF(ZIG(3 ,10),1)),L,1);
DRAWICON(CROSS(REF(ZIG(3,10),1),ZIG(3,10)),H,12);
STICKLINE(V>=REF(V,1)*2,O,C,3,0)COLORBLUE;
STICKLINE(V>=REF(V,1)*2,H,L,0,0)COLORBLUE;
STICKLINE(C/REF(C,1)>=1.098,O,C,3,0)COLORRED;
STICKLINE(C/REF(C,1)>=1.098,H,L,0,0)COLORRED;
STICKLINE(C/REF(C,1)<=0.901,O,C,3,0)COLORBLUE;
STICKLINE(C/REF(C,1)<=0.901,H,L,0,0)COLORBLUE;

原理解析：
 输出MA5:C的5日简单移动平均,画白色, 线宽为2
输出MA20:C的20日简单移动平均画黄色, 线宽为3
输出MA48:C的48日简单移动平均 线宽为2
输出MA60:C的60日简单移动平均, 画蓝色,LINETHICK4
输出MA1:收盘价的10日简单移动平均,画红色, 线宽为3
输出MA2:收盘价的120日简单移动平均,COLORGRAY ,LINETHICK6
DRAWBAND(C的4日简单移动平均,RGB(185,0,0),C的7日简单移动平均,RGB(0,70,0))
DRAWKLINE(H,O,L,C)
AA赋值:MA5上穿MA20
DRAWTEXT(AA的5过滤,L*1.008,'△金叉'), 画黄色
DRAWTEXT(CROSS(收盘价的4日简单移动平均,收盘价的9日简单移动平均),L*0.99,'△小金叉'),画红色
DRAWTEXT(CROSS(收盘价的20日简单移动平均,收盘价的60日简单移动平均),L*1.01,'△大金叉'),画红色
STICKLINE(C>1日前的C*1.099,C,O,2.7,0)画红色, 线宽为2
ZT赋值:C/1日前的C>1.097
BH赋值:上次ZT距今天数
CZ赋值:BH日前的H-BH日前的L
STICKLINE(C AND BH< 100,(BH日前的L+CZ*0.5),(BH日前的L+CZ*0.5),3,0),画红色
STICKLINE(C AND BH< 100,BH日前的L,BH日前的L,3,0),画白色
STICKLINE(C AND BH< 100,BH日前的H,BH日前的H,3,0),画白色
涨停赋值:C>1日前的C*1.099
开盘价赋值:REF(O,上次涨停距今天数),画白色,CIRCLEDOT
DRAWNUMBER(涨停,L,O),COLOR5F9F9F
C3赋值:1日前的C
跌停赋值:IF((C3-C)*100/C3>=(10-0.01*100/C3),1,0)
当满足条件跌停时,在开盘价和收盘价之间画柱状线
当满足条件跌停时,在开盘价和收盘价之间画柱状线
当满足条件跌停时,在H+0.3和'跌停'位置书写文字
输出净资产:FINANCE(34),NODRAW,COLORFF00FF
输出每股收益:FINANCE(33),NODRAW,COLORFF7F50
输出市盈率:DYNAINFO(39),NODRAW,COLORFF00FF
输出流通市值:(FINANCE(40)/100000000),NODRAW,画红色
STICKLINE(C AND BH< 100,BH日前的H,BH日前的H,3,0),画白色
半分位赋值:(O+C)/2
昨半分位赋值:1日前的半分位
当满足条件ISLASTBAR时,在昨半分位和昨半分位之间画柱状线
DRAWNUMBER(ISLASTBAR,昨半分位,昨半分位)
当满足条件ISLASTBAR时,在昨半分位和' 昨半分位'位置书写文字
A3赋值:(C-9日内L最低值)/(9日内H最高值-9日内L最低值)*100
A3的3日[1日权重]移动平均
A4的3日[1日权重]移动平均
A6赋值:3*A4-2*A5
A7赋值:C-1日前的C
A8赋值:100*A7的6日指数移动平均,6)/EMA(EMA(A7的绝对值,6),6)
买赋值:2日内A8最低值=7日内A8最低值 AND 统计2日满足A8< 0的天数 AND CROSS(A8,A8的2日简单移动平均)
当满足条件买时,在开盘价和收盘价之间画柱状线
K11赋值:C的60日指数移动平均
DD1赋值:C>K11
VAR37赋值:收盘价的2日指数移动平均,2),2)
VAR47赋值:(VAR37的47日简单移动平均)*(0.99)
分水岭赋值:(VAR37的13日简单移动平均)*(0.99), 线宽为2,COLORFF00FF
DRAW赋值:(收盘价的13日简单移动平均 > 收盘价的18日简单移动平均) AND CROSS(收盘价,收盘价的4日简单移动平均) AND (收盘价的4日简单移动平均 < 收盘价的13日简单移动平均)
AA1:=DD1 AND DRAW
当满足条件AA1时,在最低价*0.98和'买'位置书写文字
DIFF赋值:D收盘价的12日指数移动平均-D收盘价的26日指数移动平均
DEA赋值:DIFF的9日指数移动平均,COLORFFFF00
A1赋值:上次1日前的DIFF上穿DEA距今天数
底背离赋值:A1+1日前的收盘价>收盘价 AND DIFF>A1+1日前的DIFF AND DIFF上穿DEA
如果底背离返回57否则返回0
当满足条件底背离时,在最低价*0.96和'入'位置书写文字
超B赋值:L2_AMO(0,2)/10000.0
大B赋值:L2_AMO(1,2)/10000.0
中B赋值:L2_AMO(2,2)/10000.0
小B赋值:L2_AMO(3,2)/10000.0
超S赋值:L2_AMO(0,3)/10000.0
大S赋值:L2_AMO(1,3)/10000.0
中S赋值:L2_AMO(2,3)/10000.0
小S赋值:L2_AMO(3,3)/10000.0
TESTSKIP(NOT(超B OR 大B OR 中B OR 小B OR 超S OR 大S OR 中S OR 小S)!=0)
大宗进赋值:(超B)+(大B),NODRAW
大宗出赋值:(超S)+(大S),NODRAW
非大宗进赋值:(中B)+(小B),NODRAW
非大宗出赋值:(中S)+(小S),NODRAW
DAZHIV赋值:CONST(MAX(大宗进的绝对值,MAX(ABS(大宗出),MAX(ABS(非大宗进),ABS(非大宗出))))),NODRAW
DRAWRECTREL(0,CONST(950-(大宗进的绝对值*250/DAZHIV)),30,970,IF(CONST(大宗进>0),RGB(255,0,0),RGB(23,125,255)))
DRAWRECTREL(32,CONST(950-(大宗出的绝对值*250/DAZHIV)),62,970,IF(CONST(大宗出>0),RGB(23,125,255),RGB(255,0,0)))
DRAWRECTREL(92,CONST(950-(非大宗进的绝对值*250/DAZHIV)),122,970,IF(CONST(非大宗进>0),RGB(255,0,0),RGB(23,125,255)))
DRAWRECTREL(124,CONST(950-(非大宗出的绝对值*250/DAZHIV)),154,970,IF(CONST(非大宗出>0),RGB(23,125,255),RGB(255,0,0)))
当满足条件 到最后交易的周期=1时,在横轴0.015纵轴1位置书写文字
当满足条件 到最后交易的周期=1时,在横轴0.107纵轴1位置书写文字
VAR3赋值:PEAKBARS(3,10,1)< 10
如果VAR3=1返回2否则返回0
如果VAR5=2返回2否则返回0
DRAWICON(顶>1日前的顶,H*1.005,2)
DRAWICON(CROSS(ZIG(3,10) ,REF(ZIG(3 ,10),1)),L,1)
DRAWICON(CROSS(REF(ZIG(3,10),1),ZIG(3,10)),H,12)
STICKLINE(V>=1日前的V*2,O,C,3,0) 画蓝色
STICKLINE(V>=1日前的V*2,H,L,0,0) 画蓝色
STICKLINE(C/1日前的C>=1.098,O,C,3,0)画红色
STICKLINE(C/1日前的C>=1.098,H,L,0,0)画红色
STICKLINE(C/1日前的C<=0.901,O,C,3,0) 画蓝色
STICKLINE(C/1日前的C<=0.901,H,L,0,0) 画蓝色