通达信短线高手主图未加密选股指标公式源码

源码正文：

M1:=5;M2:=10;M3:=30;M4:=60{XG51};
ma1:MA(CLOSE,M1){XG51};
MA2:MA(CLOSE,M2){XG51};
MA3:MA(CLOSE,M3){XG51};
MA4:MA(CLOSE,M4){XG51};
VAR3:=LLV(HIGH,240){XG51};
VAR4:=100*(CLOSE-VAR3)/VAR3{XG51};
VAR5:=(CLOSE-LLV(LOW,528))/(HHV(HIGH,528)-LLV(LOW,528))*100{XG51};
VAR6:=(CLOSE-LLV(CLOSE,530))/(HHV(CLOSE,530)-LLV(CLOSE,530))*100{XG51};
VAR7:=0{XG51};
VAR8:=SMA(MAX(CLOSE-REF(CLOSE,1),0),34,1)/SMA(Abs(CLOSE-REF(CLOSE,1)),7,1)*100{XG51};
VAR9:=SMA(MAX(CLOSE-REF(CLOSE,1),0),13,1)/SMA(ABS(CLOSE-REF(CLOSE,1)),13,1)*100{XG51};
VAR10:=IF(TROUGHBARS(3,16,1)=0 AND HIGH>LOW+0.04,4,0){XG51};
VAR11:=zig(3,6)>REF(ZIG(3,6),1) AND REF(ZIG(3,6),1)<=REF(ZIG(3,6),2) AND REF(ZIG(3,6),2)
<=REF(ZIG(3,6),3){XG51};
VAR12:=ZIG(3,6)<REF(ZIG(3,6),1) AND REF(ZIG(3,6),1)>=REF(ZIG(3,6),2) AND REF(ZIG(3,6),2)
>=REF(ZIG(3,6),3){XG51};
VAR13:=ZIG(3,22)>REF(ZIG(3,22),1) AND REF(ZIG(3,22),1)<=REF(ZIG(3,22),2) AND REF(ZIG
(3,22),2)<=REF(ZIG(3,22),3){XG51};
VAR14:=ZIG(3,22)<REF(ZIG(3,22),1) AND REF(ZIG(3,22),1)>=REF(ZIG(3,22),2) AND REF(ZIG
(3,22),2)>=REF(ZIG(3,22),3){XG51};
VAR15:=ZIG(3,51)>REF(ZIG(3,51),1) AND REF(ZIG(3,51),1)<=REF(ZIG(3,51),2) AND REF(ZIG
(3,51),2)<=REF(ZIG(3,51),3){XG51};
VAR16:=ZIG(3,51)<REF(ZIG(3,51),1) AND REF(ZIG(3,51),1)>=REF(ZIG(3,51),2) AND REF(ZIG
(3,51),2)>=REF(ZIG(3,51),3){XG51};
VAR17:=ZIG(3,72)>REF(ZIG(3,72),1) AND REF(ZIG(3,72),1)<=REF(ZIG(3,72),2) AND REF(ZIG
(3,72),2)<=REF(ZIG(3,72),3){XG51};
VAR18:=ZIG(3,72)<REF(ZIG(3,72),1) AND REF(ZIG(3,72),1)>=REF(ZIG(3,72),2) AND REF(ZIG
(3,72),2)>=REF(ZIG(3,72),3){XG51};
VAR19:=ema(CLOSE,2)-EMA(CLOSE,150){XG51};
买１:=VAR10{XG51};
买２:=(VAR11+VAR13+VAR15+VAR17){XG51};
卖１:=(VAR12+VAR14+VAR16+VAR18){XG51};
B:IF(买１>0 OR 买２>0,LOW*0.99,DRAWNULL),crOSSDOT,LINETHICK3,COLORBLUE{XG51};
DRAWTEXT(买１>0 OR 买２>0,LOW*0.99,'买入'),COLORWHITE{XG51};
S:IF(卖１>0,HIGH*1.01,DRAWNULL),CROSSDOT,LINETHICK3,COLORCYAN{XG51};
DRAWTEXT(卖１>0,HIGH*1.02,'卖出'),COLORCYAN{XG51};
VAR100:=(100 - ((90 * (HHV(HIGH,20) - CLOSE)) / (HHV(HIGH,20) - LLV(LOW,20)))){XG51};
VAR200:=(100 - ((90 * (HHV(HIGH,20) - CLOSE)) / (HHV(HIGH,20) - LLV(LOW,20)))){XG51};
VAR300:=(100 - MA(((100 * (HHV(HIGH,5) - CLOSE)) / (HHV(HIGH,5) - LLV(LOW,5))),34)){XG51};
F:IF(CROSS(VAR200,MA(VAR300,5)),LOW * 0.98,DRAWNULL),CROSSDOT,LINETHICK3,COLOREE00EE{XG51};
年:MA(CLOSE,22),LINETHICK2,COLORRED{X-G_5~1-C-N-{};

源码正文：

NOTEXT1:-100,COLORBROWN,DOTLINE{XG51};
NOTEXT2:100,COLORBROWN,DOTLINE{XG51};
TYP:=(HIGH+LOW+CLOSE)/3{XG51};
cci:(TYP-ma(TYP,5))/(0.015*AVEDEV(TYP,5))LINETHICK1,COLORBLUE{XG51};
VAR1:=ema(EMA(CLOSE,3),1){XG51};
控盘:=(VAR1-REF(VAR1,1))/REF(VAR1,1)*1000{XG51};
A10:=crOSS(控盘,0){XG51};
VAR2:=100*WINNER(CLOSE*0.95){XG51};
高度控盘:IF(控盘>REF(控盘,1) AND 控盘>0,控盘,0),COLOR0000FF,NODRAW{XG51};
有庄控盘:IF(VAR2>50 AND COST(85)<CLOSE AND 控盘>0,控盘,0),COLORFF00FF,NODRAW{XG51};
无庄控盘:IF(控盘<0,控盘,0),COLORFF6600,NODRAW{XG51};
开始控盘:IF(A10,5,0),LINETHICK3,COLORBLUE,NODRAW{XG51};
主力出货:IF(控盘<REF(控盘,1) AND 控盘>0,控盘,0),COLOR00FF00,NODRAW{XG51};
个股:=EMA(100*(C-LLV(LOW,34))/(HHV(H,34)-LLV(LOW,34)),3),COLORGRAY,NODRAW{XG51};
短线反弹:IF(CROSS(个股,9),80,0),STICK,LINETHICK3,COLORLIGREEN{XG51};
DRAWTEXT(CROSS(个股,9),75,'●反弹'),COLORLIGREEN{XG51};
STICKLINE(控盘<0,控盘,0,3.5,0),COLORFF3300{XG51};
STICKLINE(控盘<0,控盘,0,2.5,0),COLORFF6600{XG51};
STICKLINE(控盘<0,控盘,0,1.5,0),COLORFF8800{XG51};
STICKLINE(控盘<0,控盘,0,0.5,0),COLORFFAA00{XG51};
STICKLINE(控盘>REF(控盘,3) AND 控盘>0,控盘,0,3.5,0),COLOR000033{XG51};
STICKLINE(控盘>REF(控盘,3) AND 控盘>0,控盘,0,2.5,0),COLOR000066{XG51};
STICKLINE(控盘>REF(控盘,3) AND 控盘>0,控盘,0,1.5,0),COLOR000099{XG51};
STICKLINE(控盘>REF(控盘,3) AND 控盘>0,控盘,0,0.5,0),COLOR0000CC{XG51};
STICKLINE(VAR2>50 AND COST(85)<CLOSE AND 控盘>0,控盘*0.8,0,3.0,0),COLORFF0066{XG51};
STICKLINE(VAR2>50 AND COST(85)<CLOSE AND 控盘>0,控盘*0.8,0,2.0,0),COLORFF0099{XG51};
STICKLINE(VAR2>50 AND COST(85)<CLOSE AND 控盘>0,控盘*0.8,0,1.5,0),COLORFF00BB{XG51};
STICKLINE(VAR2>50 AND COST(85)<CLOSE AND 控盘>0,控盘*0.8,0,0.5,0),COLORFF00FF{XG51};
STICKLINE(控盘<REF(控盘,3) AND 控盘>0,控盘,0,3.5,0),COLOR005500{XG51};
STICKLINE(控盘<REF(控盘,3) AND 控盘>0,控盘,0,2.5,0),COLOR008800{XG51};
STICKLINE(控盘<REF(控盘,3) AND 控盘>0,控盘,0,1.5,0),COLOR00BB00{XG51};
STICKLINE(控盘<REF(控盘,3) AND 控盘>0,控盘,0,0.5,0),COLOR00EE00{XG51};
STICKLINE(A10,控盘,0,3.5,0),COLOR0066FF{XG51};
STICKLINE(A10,控盘,0,2.5,0),COLOR0099FF{XG51};
STICKLINE(A10,控盘,0,1.0,0),COLOR00CCFF{XG51};
STICKLINE(A10,控盘,0,0.5,0),COLOR00FFFF{X_G^5.1_C_N_{};