通达信量价背离决策源码:

DRAWGBK(C>0, RGB(50,0,50),RGB(30,0,120),0,0,1);
中:50,COLORYELLOW;
 VAR1中:=LLV(LOW,13);
 VAR2:=HHV(HIGH,13);
 VAR3:=SMA((CLOSE-VAR1中)/(VAR2-VAR1中)*100,5,1);
 VAR4:=SMA((VAR2-CLOSE)/(VAR2-VAR1中)*100,5,1);
 DRAWBAND(VAR3,RGB(115,30,150),50,RGB(0,100,100));
主力:VAR3,COLORLIRED,LINETHICK1;
散户:VAR4,COLORGREEN;
 VAR5:=SMA(MAX(CLOSE-REF(CLOSE,1),0),5,1)/SMA(ABS(CLOSE-REF(CLOSE,1)),5,1)*100;
操作:EMA(VAR5,3),LINETHICK1,COLORYELLOW;
 {操作变色:IF(操作>REF(操作,1),操作,DRAWNULL),LINETHICK2,COLORMAGENTA;}
 STICKLINE(C,90,90,1,0),COLOR3C3CFF;
 STICKLINE(C,50,50,1,0),COLORYELLOW;
 STICKLINE(C,10,10,1,0),COLORCYAN;
 DRAWICON(CROSS(操作,中),中,34);{买入红箭头};
DRAWTEXT(CROSS(操作,中),中-0.1,' '),COLORYELLOW;
 N1:=9;N2:=5;N:=21;
 XIAO1:=REF((LOW+OPEN+CLOSE+HIGH)/4,1);
 XIAO2:=SMA(ABS(LOW-XIAO1),13,1)/SMA(MAX(LOW-XIAO1,0),10,1);
 XIAO3:=EMA(XIAO2,10);
 XIAO4:=LLV(LOW,33);
 XIAO5:=EMA(IF(LOW<=XIAO4,XIAO3,0),3),COLORSTICK;
 STICKLINE(XIAO5>REF(XIAO5,1),0,XIAO5,3,0 ),COLOR000055;
 STICKLINE(XIAO5>REF(XIAO5,1),0,XIAO5,2.6,0 ),COLOR000077;
 STICKLINE(XIAO5>REF(XIAO5,1),0,XIAO5,2.1,0 ),COLOR000099;
 STICKLINE(XIAO5>REF(XIAO5,1),0,XIAO5,1.5,0 ),COLOR0000BB;
 STICKLINE(XIAO5>REF(XIAO5,1),0,XIAO5,0.9,0 ),COLOR0000DD;
 STICKLINE(XIAO5>REF(XIAO5,1),0,XIAO5,0.3,0 ),COLOR0000FF;
 STICKLINE(XIAO5  STICKLINE(XIAO5  STICKLINE(XIAO5  STICKLINE(XIAO5  STICKLINE(XIAO5  STICKLINE(XIAO5 【私募进场】:IF(XIAO5>REF(XIAO5,1),XIAO5,0),COLORRED,NODRAW;
【私募洗盘】:IF(XIAO5  B1:=(HHV(H,9)-C)/(HHV(H,9)-LLV(LOW,9))*100- 70;
 B2:=SMA(B1,9,1)+100;
 B3:=(C-LLV(L,9))/(HHV(H,9)- LLV(L,9))*100;
 B4:=SMA(B3,3,1);
 B5:=SMA(B4,3,1)+100;
 B6:=B5-B2;
观望期:=IF(B6>60,B6-60,0);
 T1:=STICKLINE(REF(观望期,1)<观望期,观望期,REF(观望期,1),9,0),COLORYELLOW;
 T2:=STICKLINE(REF(观望期,1)>观望期,观望期,REF(观望期,1),9,0),COLORCYAN;{趋势背景}
TAI1:=MA(C,1)/MA(REF(C,13),8)*100;
 TAI2:=MA(FORCAST(TAI1,21),3);
 TAI3:=REF(TAI1,1);
 TAI4:=REF(TAI1,2);
邰1:=LLV(LOW,8);
邰2:=HHV(HIGH,13);
＃股市黑客＃:= EMA((CLOSE-邰1)/(邰2-邰1)*100,5),COLORRED,LINETHICK3;{输出后是趋势背景}
※升跌临界※:= EMA(0.667*REF(＃股市黑客＃,1)+0.333*＃股市黑客＃,2),COLORGREEN,LINETHICK3;{输出后是趋势背景}
VAR1:=(CLOSE>REF(CLOSE,1) AND CLOSE>REF(CLOSE,2));
 VARD:=(CLOSE  VARE:=(REF(VARD,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2));
 VARF:=(REF(VARE,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2));
 VAR10:=(REF(VARF,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2));
 VAR11:=(REF(VAR10,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2));
 VAR12:=(REF(VAR11,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2));
 VAR13:=(REF(VAR12,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2));
 VAR14:=(REF(VAR13,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2));
 VAR15:=(REF(VAR14,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2));
 VAR16:=(REF(VAR15,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2));
 VAR17:=(REF(VAR16,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2));
 VAR18:=(REF(VAR17,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2));
 VAR19:=REF(VARD OR VARE OR VARF OR VAR10 OR VAR11 OR VAR12 OR VAR13 OR VAR14 OR VAR15 OR VAR16 OR VAR17 OR VAR18,1) AND VAR1;
 DIFF:=EMA(DCLOSE,12)-EMA(DCLOSE,26);
 DEA:=EMA(DIFF,9),COLORFFFF00;
 MACD:=(DIFF-DEA)*2,COLORSTICK;
 A1:=BARSLAST(REF(CROSS(DIFF,DEA),1));
 A2:=BARSLAST(REF(CROSS(DEA,DIFF),1));
底背离:=REF(CLOSE,A1+1)>CLOSE AND DIFF>REF(DIFF,A1+1) AND CROSS(DIFF,DEA);
顶背离:=REF(CLOSE,A2+1)DIFF AND CROSS(DEA,DIFF);
￥①:IF(REF((MA(C,5)-C)/C>0.04 AND (MA(C,10)-MA(C,5))/MA(C,5)>0.04 AND 观望期=0 AND C>REF(C,1),1),44,0),LINETHICK3,COLORLIRED;{进}
￥②:IF(REF("KDJ.J",1)<0 AND "KDJ.J">0 AND TAI1>=TAI2 AND TAI3>TAI4,34,0),LINETHICK3,COLORBROWN;{进}
￥③:IF(REF(＃股市黑客＃,1)<=13&&CROSS(＃股市黑客＃,※升跌临界※)&& REF(MA(C,55),1)>REF(MA(C,55),2)&&(VAR19 OR REF(VAR19,1)),33,0),COLORMAGENTA,LINETHICK3;
￥④:IF(底背离,45,0),LINETHICK3,COLORYELLOW;
 DRAWTEXT(底背离,37,'←￥④MACD底背离'),COLORWHITE;
 DRAWICON(底背离,45,1),COLORYELLOW;
 DRAWICON(REF(＃股市黑客＃,1)<=13&&CROSS(＃股市黑客＃,※升跌临界※)&& REF(MA(C,55),1)>REF(MA(C,55),2)&&(VAR19 OR REF(VAR19,1)),35,1);
 DRAWICON(REF((MA(C,5)-C)/C>0.04 AND (MA(C,10)-MA(C,5))/MA(C,5)>0.04 AND 观望期=0 AND C>REF(C,1),1),46,1);
 DRAWICON(REF("KDJ.J",1)<0 AND "KDJ.J">0 AND TAI1>=TAI2 AND TAI3>TAI4,36,1),COLORYELLOW;
 {DRAWTEXT_FIX(C>O,0.01,0.9,0,'WWW.CXH99.COM'),COLORRED;
 DRAWTEXT_FIX(C>O,1,1,0,'程序化交易模型'),COLORRED;};
 DRAWTEXT(REF(＃股市黑客＃,1)<=13&&CROSS(＃股市黑客＃,※升跌临界※)&& REF(MA(C,55),1)>REF(MA(C,55),2)&&(VAR19 OR REF(VAR19,1)),28,'←￥③背离临界'),COLORMAGENTA;
 DRAWTEXT(REF("KDJ.J",1)<0 AND "KDJ.J">0 AND TAI1>=TAI2 AND TAI3>TAI4,32,'←￥②KDJ背离'),COLORBROWN;
 DRAWTEXT(REF((MA(C,5)-C)/C>0.04 AND (MA(C,10)-MA(C,5))/MA(C,5)>0.04 AND 观望期=0 AND C>REF(C,1),1),37,'←￥①背离中'),COLORLIRED;
主力成本:EMA(MA(CLOSE,3),13),NODRAW,COLORAAAAFF;
短期支撑:LLV(HIGH,30),NODRAW,COLORAAAAFF;
换手率:VOL/CAPITAL*100,NODRAW,COLORFF8888;
五日均换手率:SUM(100*V/CAPITAL,5)/5,NODRAW,COLORAAAAFF;
十日均换手率:SUM(100*V/CAPITAL,10)/10,NODRAW,COLORAAAAFF;
量:=IF(C>200,VOL/1000000,VOL/1),LINETHICK0,COLOREEEEFF;
地量:=换手率<1,COLORFF6600;
低靡:=C=C AND 换手率>=1 AND 换手率<2,COLOR008364;
温和:=C=C AND 换手率>=2 AND 换手率<3,COLORFFFFFF;
活跃:=C=C AND 换手率>=3 AND 换手率<5,COLOR208FFF;
带量:=C=C AND 换手率>=5 AND 换手率<8,COLORYELLOW;
放量:=C=C AND 换手率>=8 AND 换手率<15,COLORFF00FF;
巨量:=C=C AND 换手率>=15 AND 换手率<25,COLORRED;
怪异:=C=C AND 换手率>=25,COLORE66878;
 {地量 AND ISLASTBAR AND PERIOD=5,60,'成交地量'}
DRAWTEXT_FIX(地量 AND ISLASTBAR AND PERIOD=5, 0.28,0.10,0,'成交地量'),COLORGREEN;
 DRAWTEXT_FIX(低靡 AND ISLASTBAR AND PERIOD=5,0.28,0.10,0,'成交低靡'),COLORCYAN;
 DRAWTEXT_FIX(温和 AND ISLASTBAR AND PERIOD=5,0.28,0.10,0,'成交温和'),COLORFFFFFF;
 DRAWTEXT_FIX(活跃 AND ISLASTBAR AND PERIOD=5,0.28,0.10