【通达信源码分享】飞龙在天+潜龙，观察大趋势主图公式源码

Z1:=STRCAT(HYBLOCK,' ');

 

Z2:=STRCAT(Z1,DYBLOCK);

 

Z3:=STRCAT(Z2,' ');

 

DRAWTEXT_FIX(ISLASTBAR,0,0,0,STRCAT(Z3,GNBLOCK)),COLORRED;

 

DRAWTEXT_FIX(ISLASTBAR,0.001,0.050,0,GNBLOCK),COLORCYAN;{概念};

 

ZT:=REF(C,1)*1.1-C<0.01 AND H=C;{涨停}

 

底部:=(COST(95)-COST(5))/(COST(95)+COST(5))*100;

 

顶部:=100-底部;

 

均值:=(底部+顶部)/2;

 

均值成本:=COST(均值),COLORLICYAN,DOTLINE;

 

底部成本价:=COST(底部),COLORMAGENTA,DOTLINE;

 

顶部成本价:=COST(顶部),COLORGREEN,DOTLINE;

 

RHK:=(底部*6.86+顶部*3.14)/10;

 

RH:=COST(RHK),COLORGREEN;

 

EX1:EXPMA(均值成本,250),COLORYELLOW;

 

EX2:EXPMA(顶部成本价,250),COLORRED;

 

EX3:=EXPMA(均值成本,120),COLORBROWN;

 

~:(EX1+EX2)/2,COLORYELLOW,LINETHICK1,POINTDOT;

 

~1:(EX1+~)/2,COLORYELLOW,LINETHICK1,POINTDOT;

 

~2:(EX2+~)/2,COLORYELLOW,LINETHICK1,POINTDOT;

 

潜龙:=CROSS(C,EX3) AND ZT;

 

DRAWTEXT(潜龙,L*0.99,'潜龙'),COLORGREEN;

 

STICKLINE(潜龙,C,O,3,1),COLORGREEN;

 

STICKLINE(潜龙,C,O,1,0),COLORLICYAN;

 

飞龙在天:=CROSS(C,EX1) OR CROSS(C,EX2) AND ZT;

 

DRAWTEXT(飞龙在天,L*0.99,'飞龙在天'),COLORYELLOW;

 

STICKLINE(飞龙在天,C,O,3,1),COLORYELLOW;

 

STICKLINE(飞龙在天,C,O,1,0),COLORRED;