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

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;

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

₂:(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;