通达信突破上升趋势线主图及选股指标公式源码

通达信突破上升趋势线主图及选股指标公式源码

源码正文：

M5:ma(C,5){XG51};
M10:MA(C,10){XG51};
M20:MA(C,20){XG51};
M60:MA(C,60){XG51};
A:=M5>=M60 AND M10>=M60 AND M20>=M60{XG51};
T:=BArslAst(crOSS(A,0.5)){XG51};
JD:=(ATAN((M60/REF(M60,T)-1)*100)*180/3.1415926){XG51};
ZF:=(C-REF(C,T+1))/REF(C,T+1)*100{XG51};
LL:=MIN(MIN(M5,M10),M20){XG51};
TJ1:=EVERY(LL>M60,T){XG51};
TJ:=V=HHV(V,60) AND C>REF(C,1)*1.08 AND TJ1 AND ZF<60 AND JD>80{XG51};
T1:=BARSSINCEN(TJ,T+1){XG51};
EXT1:DRAWLINE(CURRBARSCOUNT=CONST(T)+1,REF(H,T),T1=0,REF(H,T1),1),COLORBLUE,LINETHICK2{XG51};
TJA:=EVERY(C<EXT1,T1){XG51};
XG:=REF(TJA,1) AND CROSS(C,EXT1) AND T>30{XG51};
STICKLINE(XG,C,O,2,0),COLORLIMAGENTA{XG51};
STICKLINE(XG,H,L,0,0),COLORLIMAGENTA{X*G*5~1*C*N*{};