hjqb-火箭起爆（技术指标源码）

{HJQB-火箭底部起爆//} 

VAR1:=(C+L+H+O)/4; VAR2:=EMA(VAR1,1)-EMA(VAR1,60);

VAR3:=(EMA(VAR2,3)-EMA(VAR2,20)); VAR4:(EMA(VAR3,3)-EMA(VAR3,5))*100,COLORRED;

VAR5:=SUM(VAR4,0); VAR6:=MA(C,6); VAR7:=MA(C,12); VAR8:=MA(C,18);

VAR11:=O< VAR6 AND C>VAR6; VAR12:=O< VAR7 AND C>VAR7;

VAR13:=O< VAR8 AND C>VAR8; VAR14:=C/O>=1.02; VAR15:=V>HHV(H,10);

VAR16:=VAR6>=REF(VAR6,1);

火箭起落架:VAR11 AND VAR12 AND VAR13 AND VAR14 AND VAR15 AND VAR16,NODRAW;

{STICKLINE(VAR4>0,VAR4,0,8,0),COLOR80FF80;

STICKLINE(0>VAR4,VAR4,0,8,0),COLORFF80FF;}

STICKLINE(VAR5>0,VAR5,0,8,0),COLOR80FF80;

STICKLINE(0>VAR5,VAR5,0,8,0),COLORFF80FF;

{STICKLINE(火箭底部起爆,100,96,0.1,0),COLORRED;

STICKLINE(火箭底部起爆,96,92,0.3,0),COLORRED;

STICKLINE(火箭底部起爆,92,88,0.6,0),COLORRED;

STICKLINE(火箭底部起爆,88,84,0.9,0),COLORWHITE;

STICKLINE(火箭底部起爆,84,80,1.2,0),COLORWHITE;

STICKLINE(火箭底部起爆,80,50,1.4,0),COLORWHITE;

STICKLINE(火箭底部起爆,74,70,0.6,0),COLORRED;}

 {STICKLINE(火箭底部起爆,60,50,0.5,0),COLORRED;

 STICKLINE(火箭底部起爆,49,25,1.5,0),COLORWHITE;

 STICKLINE(火箭底部起爆,40,20,3.5,0),COLORWHITE;

 STICKLINE(火箭底部起爆,38,28,1.5,0),COLORRED;

 STICKLINE(火箭底部起爆,28,22,1.3,0),COLORRED;

 STICKLINE(火箭底部起爆,20,10,1,0),COLORRED;

 STICKLINE(火箭底部起爆,13,7,0.7,0),COLORRED;}

{STICKLINE(火箭底部起爆,7,1,0.3,0),COLORRED;}

{STICKLINE(火箭底部起爆,1,(-7),0.1,0),COLORRED;}

SM:DRAWTEXT_FIX(ISLASTBAR,0.018,0.026,0,'草根赞曰:

异曲同工识异曲，六脉神箭差不离。

此地已有起落架，绕天绕地天地奇。 '),COLORYELLOW;

DRAWTEXT_FIX(C>0,0.018,0.92,0,'<☆TDR123改编指标☆>'),COLORLIGREEN;

DRAWTEXT_FIX(C>0,0.12,0.92,0,'<·火箭起爆·>'),COLORFF80FF;

DRAWICON(VAR4>REF(VAR4,1) AND CROSS(VAR4,0), 6,1);

DRAWICON(VAR4>REF(VAR4,1) AND CROSS(VAR4,0), 4,1);

DRAWICON(VAR4>REF(VAR4,1) AND CROSS(VAR4,0), 2,1);

DRAWICON(VAR4<REF(VAR4,1) AND CROSS(0,VAR4), 7,2);

DRAWICON(VAR4<REF(VAR4,1) AND CROSS(0,VAR4), 5,2);

DRAWICON(VAR4<REF(VAR4,1) AND CROSS(0,VAR4), 3,2);

DRAWICON(VAR4>REF(VAR4,1) AND CROSS(VAR4,0),0,38);

DRAWICON(VAR4<REF(VAR4,1) AND CROSS(0,VAR4),9,39);

DRAWICON({VAR4>REF(VAR4,1) AND} CROSS(VAR5,0),-2,7);

DRAWICON({VAR4<REF(VAR4,1) AND} CROSS(0,VAR5), 2,8);