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

擒牛系列（通达信、主图、预警、源码）

{ 擒牛图 }

跳空率:(O-REF(C,1))/REF(C,1)*100,COLORMAGENTA,NODRAW;
今板:=DYNAINFO(3)*1.1,DOTLINE,COLORYELLOW,NODRAW;
低1:=REF(LLV(L,150),3);
标底:=REFDATE(低1,DATE)*0.9;

Q:=-100*(HHV(H,10)-C)/(HHV(H,10)-LLV(L,10))+100,NODRAW;
Q1:=-100*(HHV(H,6)-C)/(HHV(H,6)-LLV(L,6))+100,NODRAW;
Q上:=Q>=REF(Q,1);
Q下:=Q<REF(Q,1);
Q1上:=Q1>=REF(Q1,1);
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));
买增:=买盘>=REF(买盘,1);
卖减:=卖盘<=REF(卖盘,1);
正量:=买盘/VOL*100;
增量:=正量>=REF(正量,1);
正量比:=正量/50;
TJ02:=正量>=80 AND 增量 AND 正量比>=1.5 AND REF(正量,1)<=90;{ AND 卖减}

分水岭:=EMA(((SLOPE(C,22)*20)+C),55),NODRAW;
操作线:=分水岭-(EMA(C,1)-分水岭);
操作辅线:=分水岭-(EMA(C,3)-分水岭);
开盘比:O/分水岭,NODRAW;
AA:=REF(操作线,1)/操作线;
背离:IF(AA>1,AA,1),COLORYELLOW,NODRAW;
反背离:背离/REF(背离,1),COLORYELLOW,NODRAW;
TJ03:=背离>=REF(背离,1) AND 背离>=1.02 AND 分水岭>=操作线;{开盘比<=1.09 AND }

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

成本:COST(50),COLORWHITE;
昨收:=REF(C,1),COLORWHITE,NODRAW;
突破:=昨收*1.1>=COST(90);

牛:=TJ01 AND TJ02 AND TJ03 AND TJ04 AND 突破;
剔跳空:=(O-REF(C,1))/REF(C,1)*100<=5;
涨幅:=(C-REF(C,1))/REF(C,1)*100;
昨涨幅:=REF(涨幅,1);
TJ05:=剔跳空 AND 涨幅>=3.2 AND 昨涨幅<=6.5;
TJ005:=剔跳空 AND 涨幅>=6.2 AND 昨涨幅<=6.5;

可能涨停:=TJ01 AND TJ02 AND TJ03 AND TJ04 AND TJ05,COLORYELLOW,NODRAW;
追涨:=TJ01 AND TJ02 AND TJ03 AND TJ04 AND TJ005,COLORWHITE,NODRAW;

{条件}佛光乍现:=TJ01 AND TJ02 AND TJ03 AND TJ04 AND 剔跳空 AND 昨涨幅<=6.5;

{ ·········································}
DRAWRECTREL(0,0,999,990,RGB(188,168,168));
DRAWRECTREL(0,0,999,100,RGB(90,0,0));

DRAWBAND(COST(50),RGB(0,0,0),标底,RGB(0,0,255));
DRAWBAND(COST(50),RGB(255,160,255),COST(60),RGB(118,160,255));
DRAWBAND(COST(60),RGB(255,120,255),COST(70),RGB(98,120,255));
DRAWBAND(COST(70),RGB(255,80,255),COST(80),RGB(78,80,255));
DRAWBAND(COST(80),RGB(255,40,255),COST(90),RGB(58,0,255));
STICKLINE(C>0,COST(50),标底,0,1),COLORBLUE;

利筹:=庄筹>=散筹;
IF(操作辅线<=REF(操作辅线,1) AND 操作辅线<=分水岭,标底*1.06,标底),COLORWHITE,LINETHICK3;
IF(利筹,分水岭*0.96,分水岭),COLORYELLOW,LINETHICK2;

标底线:标底,COLORGREEN,LINETHICK3;
底线1:=标底*0.83,COLORGREEN,LINETHICK2;
底线2:=底线1*0.8,COLORGREEN,LINETHICK2;
DRAWBAND(标底,RGB(138,138,138),底线2,RGB(0,0,255));

{ ·········································}
界线:分水岭,COLORGREEN,LINETHICK2;
IF(分水岭>=REF(分水岭,1),分水岭,DRAWNULL),COLORRED,LINETHICK3;

STICKLINE(ISLASTBAR,DYNAINFO(3),DYNAINFO(3)*1.1,2.8,-1),COLORWHITE;
DRAWKLINE(H,O,L,C);
STICKLINE(佛光乍现 AND C>=REF(C,1),H,L,0,0),COLOR0099FF;
STICKLINE(佛光乍现 AND C>=REF(C,1),C,O,3.2,0),COLOR0000AA;
STICKLINE(佛光乍现 AND C>=REF(C,1),C,O,2.7,0),COLOR0000DD;
STICKLINE(佛光乍现 AND C>=REF(C,1),C,O,2.1,0),COLOR0022FF;
STICKLINE(佛光乍现 AND C>=REF(C,1),C,O,1.5,0),COLOR0066FF;
STICKLINE(佛光乍现 AND C>=REF(C,1),C,O,0.9,0),COLOR0099FF;
STICKLINE(佛光乍现 AND C>=REF(C,1),C,O,0.3,0),COLOR00DDFF;

五:COST(50),COLORYELLOW,LINETHICK1;
六:COST(60),COLORYELLOW,LINETHICK1;
七:COST(70),COLORYELLOW,LINETHICK1;
八:COST(80),COLORYELLOW,LINETHICK1;
顶:COST(90),COLORCYAN,LINETHICK2;
IF(牛 AND 佛光乍现,顶,DRAWNULL),POINTDOT,COLORWHITE,LINETHICK9;
IF(牛 AND 佛光乍现,顶,DRAWNULL),POINTDOT,COLORRED,LINETHICK5;

DRAWBAND(底线2+散筹*(标底-底线2),RGB(0,0,0),底线2,RGB(0,0,255));
STICKLINE(C>0,底线2+散筹*(标底-底线2),底线2,0,0),COLORBLUE;
散:底线2+散筹*(标底-底线2),COLORGREEN,LINETHICK2;
庄:底线2+庄筹*(标底-底线2),COLORRED,LINETHICK2;
STICKLINE(背离>=REF(背离,1) AND 背离>=1.018 AND 反背离>=1.018 AND 牛,散,底线2,0.8,0),COLORYELLOW;

IF(佛光乍现 AND 背离>=1.018,L*0.98,DRAWNULL),CROSSDOT,LINETHICK6,COLORMAGENTA;

[1] [2]  下一页