通达信F60龙鞭主图指标公式
2020/1/24 18:23:06
{使用说明:一般在60分钟使用较佳.}
STICKLINE(CONST(MA(CLOSE,10)) >CONST(MA(CLOSE,5)) AND DYNAINFO(7)<CONST(MA(CLOSE,10)) ,LLV(L,20),HHV(H,20),800,0),COLOR000044;
黑:=0;
提示:=1;
五:MA(CLOSE,5),LINETHICK0,COLORMAGENTA,NODRAW;
十:MA(CLOSE,10),LINETHICK0,COLORMAGENTA,NODRAW;
MA4:MA(CLOSE,20),LINETHICK1,COLORFF00FF;
{DRAWBAND(MA(CLOSE,5),RGB(55,55,55),MA(CLOSE,8),RGB(55,55,55));}
DRAWBAND(MA(CLOSE,5),RGB(66,11,11),MA(CLOSE,10),RGB(00,66,66));
DRAWKLINE(H,O,L,C);
离A:MA(CLOSE,7)*1.05,COLOR555555;
离C:MA(CLOSE,7)*0.955,COLOR555555;
β0:=(H-L)/2+L;
α:=β0,LINETHICK0;
β:=REF(β0,1),LINETHICK0,COLORGREEN;
γ:=REF(β0,2),LINETHICK0,COLORMAGENTA;
高:=PLOYLINE(1,CONST(HHV(H,20))),COLOR880088,LINETHICK1;
低:=PLOYLINE(1,CONST(LLV(L,20))),COLOR888800,LINETHICK1;
止:=PLOYLINE(1,CONST(HHV(H,20)*0.95)),COLOR888888,LINETHICK1;
IF(CONST(α>β) AND DYNAINFO(7)>0,DYNAINFO(7),DRAWNULL),COLOR0000AA,LINETHICK1;
IF(CONST(α<=β)AND DYNAINFO(7)>0 ,DYNAINFO(7),DRAWNULL),COLOR00AA00,LINETHICK1;
AA:=CLOSE/REF(C,1)>=1.09;
BA:=CLOSE/REF(C,1)>=1.09;
STICKLINE(AA,O,C,2.5,1),COLORYELLOW;
{看股吧-股票公式网站 www.kanguba.com}
MA1:MA(CLOSE,5),COLORWHITE;
MA2:MA(CLOSE,10),COLORYELLOW;
MA3:=MA(CLOSE,22),COLORWHITE;
{MA5:MA(CLOSE,120),COLORGREEN;}
{MA6:MA(CLOSE,250),COLOR990000;}
{IF(MA2>REF(MA2,2) ,MA2,DRAWNULL),COLORRED,LINETHICK1;}
SARH:=CLOSE>SAR(4,2,20);
N1:=12;
N2:=26;
N3:=9;
DIFF:=(EMA(CLOSE,N1) - EMA(CLOSE,N2));
DEA:=EMA(DIFF,N3);
MACD:=(2 * (DIFF - DEA));
MACD2:=MACD;
TYP:=(HIGH+LOW+CLOSE)/3;
CCI:=(TYP-MA(TYP,14))/(0.015*AVEDEV(TYP,14));
{STICKLINE(C<MA2 ,H,L,0,0),COLOR555555;
STICKLINE(C<MA2 ,O,C,2.5,1),COLOR555555;}
STICKLINE(BA AND C<MA3,O,C,2.7,1),COLORWHITE;
头上边:=MAX(O,C),NODRAW;
头下边:=MIN(O,C),NODRAW;
垂头:=ABS(O-C),NODRAW;{垂头}
长针:=(头下边-L),NODRAW;{长针}
垂:=长针/垂头>2 AND (H-头上边)<=长针 AND L<REF(L,1) AND O<REF(C,1),NODRAW;
DRAWTEXT(垂 AND L<=LLV(L,3),L/1.01,'地针'),COLORGREEN,LINETHICK4;
{////MACD反身向上////}
MACD红缩:=REF(MACD,1)>MACD AND MACD>0;
{DRAWTEXT(REF(EVERY(MACD红缩,3),1)
AND MACD>REF(MACD,1) ,L,'启动'),COLORWHITE;}
{////MACD反身向上2////}
{MACD红缩2:=REF(MACD,1)>MACD AND MACD>0;
DRAWTEXT(REF(EVERY(MACD红缩2,2),1)
AND MACD>REF(MACD,1) AND C>MA(C,22) AND EVERY(DIFF>0,3) ,L/1.02,'起动'),COLORWHITE;}
DRAWTEXT(H>MA(CLOSE,5)*1.07 AND 提示,H*1.01,'高!'),COLORGREEN,LINETHICK2;
DRAWTEXT(L<MA(CLOSE,5)*1.005 AND L>MA(CLOSE,5) AND 提示 AND H<MA(CLOSE,5)*1.07 AND ISLASTBAR,L/1.02,'低吸'),COLORGREEN,LINETHICK2;
SC1:=MACD<0;
SC2:=CROSS(MA2,MA1);
SC3:=MA(V,5)<MA(V,10);
SC:=SC1 AND SC2 ;
DRAWTEXT(SC AND CURRBARSCOUNT<20,HHV(C,10),'三死叉'),COLORYELLOW;
JC1:=MACD.MACD>0;
JC2:=CROSS(MA1,MA2);
JC3:=MA(V,5)>MA(V,10);
JC:=JC1 AND JC2 AND JC2 ;
DRAWTEXT(JC AND CURRBARSCOUNT<20 ,LLV(C,6),'后金叉'),COLORYELLOW;
{DRAWTEXT(CROSS(C,离B) AND CURRBARSCOUNT<90 ,HHV(H,3),'超乖离'),COLORYELLOW;}
DRAWTEXT(CROSS(H,离A) AND CURRBARSCOUNT<10 ,HHV(H,3),'超乖离'),COLORYELLOW;
DRAWTEXT(CROSS(离C,L) AND CURRBARSCOUNT<10 ,LLV(L,3),'负乖离'),COLORWHITE;
DRAWTEXT(五<十 AND CURRBARSCOUNT<2 ,H*1.02,'空头势'),COLORRED;
DRAWTEXT(五<十 AND CURRBARSCOUNT<2 ,H*1.01,'不持股'),COLORRED;
看 股吧公式 www.ka nguba.com
其它股票公式列表
