通达信新涨停王优化版条件预警(分时预警)源码
通达信因无分时预警功能,只能将其改为条件预警公式进行分时预警了,使用中关注买卖量差,再做出买卖决策,此公式还优化中
不作为选股用
{通达信新涨停王优化版条件预警分时预警源码}
N:=5;
M:=13;
VAR1:=EMA(EMA(CLOSE,13),13);
控盘:=(VAR1-REF(VAR1,1))/REF(VAR1,1)*1000;
STICKLINE(控盘<0,控盘,0,1,0),COLORWHITE;
A10:=CROSS(控盘,0);
无庄控盘:=IF(控盘<0,控盘,0);
开始控盘:=IF(A10,5,0);
STICKLINE(控盘>REF(控盘,1) AND 控盘>0,控盘,0,1,0),COLORRED;
有庄控盘:=IF(控盘>REF(控盘,1) AND 控盘>0,控盘,0);
VAR2:=100*WINNER(CLOSE*0.95);
STICKLINE(VAR2>50 AND COST(85)<CLOSE AND 控盘>0,控盘,0,1,0),COLORFF00FF;
高度控盘:=IF(VAR2>50 AND COST(85)<CLOSE AND 控盘>0,控盘,0);
STICKLINE(控盘<REF(控盘,1) AND 控盘>0,控盘,0,1,0),COLOR00FF00;
主力出货:=IF(控盘<REF(控盘,1) AND 控盘>0,控盘,0);
AA:=VOL/((HIGH-LOW)*2-ABS(CLOSE-OPEN));
主买:=IF(CLOSE>OPEN,AA*(HIGH-LOW),IF(CLOSE<OPEN,AA*((HIGH-OPEN)+(CLOSE-LOW)),VOL/2));
主卖:=IF(CLOSE>OPEN,0-AA*((HIGH-CLOSE)+(OPEN-LOW)),IF(CLOSE<OPEN,0-AA*(HIGH-LOW),0-VOL/2));
换手:=VOL/CAPITAL*100;
量比:=VOL/MA(VOL,5);
涨幅:=(CLOSE-REF(CLOSE,1))/REF(CLOSE,1)*100;
振幅:=(HIGH-LOW)/REF(CLOSE,1)*100;
流通盘:=CAPITAL/1000000;
DRAWTEXT_FIX(1,0.88,5,0,'流通盘:'),COLORWHITE;
DRAWNUMBER_FIX(1,0.92,5,0,流通盘),COLORWHITE;
DRAWTEXT_FIX(1,0.88,4,0,'换手率:'),COLORWHITE;
DRAWNUMBER_FIX(1,0.92,4,0,换手),COLORWHITE;
DRAWTEXT_FIX(1,0.88,3,0,'涨幅:'),COLORWHITE;
DRAWNUMBER_FIX(1,0.92,3,0,涨幅),COLORWHITE;
DRAWTEXT_FIX(1,0.88,2,0,'量比:'),COLORWHITE;
DRAWNUMBER_FIX(1,0.92,2,0,量比),COLORWHITE;
DRAWTEXT_FIX(1,0.88,1,0,'振幅:'),COLORWHITE;
DRAWNUMBER_FIX(1,0.92,1,0,振幅),COLORWHITE;
DRAWTEXT_FIX(1,0.88,0,0,'主买:'),COLORWHITE;
DRAWNUMBER_FIX(1,0.92,0,0,主买),COLORWHITE;
DRAWTEXT_FIX(1,0.88,-1,0,'主卖:'),COLORWHITE;
DRAWNUMBER_FIX(1,0.92,-1,0,主卖),COLORWHITE;
涨停:=IF((C-REF(C,1))*100/REF(C,1)>=(10-0.01*100/REF(C,1)),1,0);
STICKLINE(涨停,OPEN,CLOSE,2,0),COLORYELLOW;
STICKLINE(涨停,H,L,0,0),COLORYELLOW;
预警条件:=控盘>REF(控盘,1) AND 控盘>0 AND 涨幅>3 AND 量比>1.2 AND 换手>2 AND 主买>主卖;
DRAWICON(预警条件 AND 涨幅<9.8,控盘*1.2,1);
DRAWTEXT(预警条件 AND 涨幅<9.8,控盘*1.1,'★预警'),COLORRED;