通达信预字涨停副图及选股公式

通达信预字涨停副图及选股公式

源码

R1:=150*WINNER(CLOSE*0.95);
 VAR3:=EMA(100*(CLOSE-LLV(LOW,100))/(HHV(HIGH,100)-LLV(LOW,100)),5);
 VAR4:=(CLOSE-LLV(CLOSE,126))/(HHV(CLOSE,126)-LLV(CLOSE,126))*100;
 VAR5:=EMA(CLOSE,2)-EMA(CLOSE,120);
 VAR6:=EMA(VAR5,68);
 VAR7:=(VAR5+VAR6);
敢死:=POW(VAR7,3)*0.1+POW(VAR7,1);
核心:=MA(敢死,30),COLORRED,;
涨停:=1;{DYNAINFO(14)>0.096;}
警:涨停*核心/5,COLORRED,LINETHICK2;
 Y:MA(警,6),COLORRED,LINETHICK2;
 IF(Y<REF(Y,1),Y,DRAWNULL),COLORBLUE,LINETHICK2;
 Y1:警-Y,COLORBROWN;
 IF(警<REF(警,1),警,DRAWNULL),COLORBLUE,LINETHICK2;
 {STICKLINE(CROSS(MA(警,1),MA(警,2)),0,警,1,0),COLORYELLOW;}
 G:=C>=INTPART(REF(C ,1 )*1.08*100+0.5)/100;
 G1:=G*核心/5;
 RSV:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100;
 K:=(SMA(RSV,3,1));
 D:=(SMA(K,3,1));
 KK:=INTPART(SMA(RSV,3,1));
 DD:=INTPART(SMA(K,3,1));
 N:=KK+DD;
涨停信号:ABS((10000*(C-REF(C,1))/REF(C,1)>995)*G1),COLORGREEN;
促击:FILTER(BACKSET(涨停信号,2),2)*G1,COLORGREEN;
预涨停:IF(CROSS(N,100),ABS(警),0),COLORYELLOW;
 DRAWTEXT(CROSS(N,100),预涨停*1.2,"预"),COLORCYAN;
 DRAWTEXT(涨停信号>0,涨停信号*1.1,"停"),COLORCYAN;

选股公式

RSV:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100;
 K:=(SMA(RSV,3,1));
 KK:=INTPART(SMA(RSV,3,1));
 DD:=INTPART(SMA(K,3,1));
 N:=KK+DD;
预":CROSS(N,100),COLORCYAN;