通达信擒牛系列 主图/选股预警份 源码

IF(佛光乍现 AND 背离>=1.018,L*0.98,DRAWNULL),POINTDOT,LINETHICK4,COLORWHITE;

IF(佛光乍现 AND 背离>=1.023,L*0.95,DRAWNULL),CROSSDOT,LINETHICK6,COLORMAGENTA;
IF(佛光乍现 AND 背离>=1.023,L*0.95,DRAWNULL),POINTDOT,LINETHICK4,COLORWHITE;

IF(佛光乍现 AND 背离>=1.028,L*0.92,DRAWNULL),CROSSDOT,LINETHICK6,COLORMAGENTA;
IF(佛光乍现 AND 背离>=1.028,L*0.92,DRAWNULL),POINTDOT,LINETHICK4,COLORWHITE;

IF(佛光乍现 AND 背离>=1.033,L*0.89,DRAWNULL),CROSSDOT,LINETHICK6,COLORMAGENTA;
IF(佛光乍现 AND 背离>=1.033,L*0.89,DRAWNULL),POINTDOT,LINETHICK4,COLORWHITE;

IF(佛光乍现 AND 背离>=1.038,L*0.86,DRAWNULL),CROSSDOT,LINETHICK6,COLORMAGENTA;
IF(佛光乍现 AND 背离>=1.038,L*0.86,DRAWNULL),POINTDOT,LINETHICK4,COLORWHITE;

{IF(CROSS(庄筹,散筹),分水岭,DRAWNULL),POINTDOT,COLORWHITE,LINETHICK9;
IF(CROSS(庄筹,散筹),分水岭,DRAWNULL),POINTDOT,COLORRED,LINETHICK5;}

操作:=操作线,COLORWHITE,LINETHICK1;
DRAWTEXT(牛 AND 佛光乍现,L*0.96,'←牛？'),COLORWHITE;
DRAWTEXT(追涨,L*0.90,'←抢？'),COLORWHITE;

{ ·········································}
DRAWRECTREL(0,100,260,610,RGB(18,8,8));
DRAWTEXT_FIX(1,0.01,0.01,0,HYBLOCK),COLORYELLOW;

DRAWTEXT_FIX(ISLASTBAR,0.35,0.01,1,'涨幅:'),COLORYELLOW;
DRAWNUMBER_FIX(ISLASTBAR,0.45,0.01,1,涨幅),COLORWHITE;

DRAWNUMBER_FIX(ISLASTBAR,0.05,0.12,1,INTPART(REF(Q,1))),COLORWHITE;
DRAWTEXT_FIX(ISLASTBAR AND Q上,0.1,0.12,1,'Q↑'),COLORYELLOW;
DRAWTEXT_FIX(ISLASTBAR AND Q下,0.1,0.12,1,'Q↓'),COLORGREEN;
DRAWNUMBER_FIX(ISLASTBAR,0.17,0.12,1,INTPART(Q)),COLORYELLOW;
DRAWTEXT_FIX(ISLASTBAR AND Q上 AND Q>=80,0.23,0.12,1,'★'),COLORYELLOW;

DRAWNUMBER_FIX(ISLASTBAR,0.05,0.2,1,INTPART(REF(Q1,1))),COLORWHITE;
DRAWTEXT_FIX(ISLASTBAR AND Q1上,0.1,0.2,1,'Q1↑'),COLORYELLOW;
DRAWTEXT_FIX(ISLASTBAR AND Q1下,0.1,0.2,1,'Q1↓'),COLORGREEN;
DRAWNUMBER_FIX(ISLASTBAR,0.17,0.2,1,INTPART(Q1)),COLORYELLOW;
DRAWTEXT_FIX(ISLASTBAR AND Q1上 AND Q1>=80,0.23,0.2,1,'★'),COLORYELLOW;

DRAWTEXT_FIX(ISLASTBAR,0.07,0.28,1,'背离'),COLORWHITE;
DRAWNUMBER_FIX(ISLASTBAR,0.18,0.28,1,背离),COLORYELLOW;

DRAWTEXT_FIX(ISLASTBAR,0.07,0.38,1,'反背离'),COLORWHITE;
DRAWNUMBER_FIX(ISLASTBAR,0.18,0.38,1,反背离),COLORYELLOW;

DRAWTEXT_FIX(ISLASTBAR AND 买增 AND 卖减,0.23,0.28,1,'★'),COLORYELLOW;

DRAWTEXT_FIX(ISLASTBAR AND 可能涨停,0.16,0.50,1,'可能涨停'),COLORYELLOW;

 { ·········································}

 { 慧眼识铢预警 }

Q1:=-100*(HHV(H,6)-C)/(HHV(H,6)-LLV(L,6))+100;
 Q1上:=Q1>=REF(Q1,1);
 TJ01:=Q1>=80 AND Q1上;

TJ:=VOL/((HIGH-LOW)*2-ABS(CLOSE-OPEN));
买盘:=IF(CLOSE>OPEN,TJ*(HIGH-LOW),IF(CLOSE<OPEN,TJ*((HIGH-OPEN)+(CLOSE-LOW)),VOL/2));
卖盘:=IF(CLOSE>OPEN,TJ*((HIGH-CLOSE)+(OPEN-LOW)),IF(CLOSE<OPEN,TJ*(HIGH-LOW),VOL/2));
正量:=买盘/VOL*100;
增量:=正量>=REF(正量,1);
卖减:=卖盘<=REF(卖盘,1);
正量比:=正量/50;
 TJ02:=正量>=80 AND 增量 AND 卖减 AND 正量比>=1.5 AND REF(正量,1)<=90;

分水岭:=EMA(((SLOPE(C,22)*20)+C),55);
操作线:=分水岭-(EMA(C,1)-分水岭);
AA:=REF(操作线,1)/操作线;
背离:=IF(AA>1,AA,1);
反背离:=背离/REF(背离,1);
 TJ03:=背离>=REF(背离,1) AND 背离>=1.02 AND 分水岭>=操作线;

散筹:=(WINNER(C*1.1)-WINNER(C*0.90))*100;
庄筹:=WINNER(C)*100;
利筹比:=庄筹/散筹;
散出:=散筹<=REF(散筹,1);
散出率:=REF(散筹,1)/散筹;
TJ04:=(利筹比>=2 AND 散出) OR 散出率>=1.3;

涨幅:=(C-REF(C,1))/REF(C,1)*100;
剔跳空:=(O-REF(C,1))/REF(C,1)*100<=5;
涨幅限:=涨幅>=2.6 AND REF(涨幅,1)<=6.5;

 {条件}趋势:=TJ01 AND TJ02 AND TJ03 AND TJ04;
 {条件}限制:=剔跳空 AND 涨幅限;

预警:趋势 AND 限制;
 

上一页  [1] [2]