通达信大牛主图选股指标公式源码

通达信大牛主图选股指标公式源码

源码正文：

M3:ema(CLOSE,3),COLORAA00AA{XG51};
M5:Ema(CLOSE,5),COLORBB00BB{XG51};
M10:EMA(CLOSE,10),COLORDD00DD{XG51};
M20:EMA(CLOSE,20),COLORFF00FF{XG51};
M30:EMA(CLOSE,30),COLOR005500{XG51};
M40:EMA(CLOSE,40),COLOR007700{XG51};
MA60:EMA(CLOSE,60),COLOR00FF00{XG51};
VAR1:=C-REF(C,1){XG51};
VAR2:=100*EMA(EMA(VAR1,6),6)/EMA(EMA(Abs(VAR1),6),6){XG51};
MA5:=EMA(C,5){XG51};
MA13:=EMA(C,13){XG51};
UP:=DRAWLINE(L=LLV(L,BArslAst(crOSS(MA13,MA5))+1),LLV(L,BARSLAST(CROSS
(MA13,MA5))+1),H=HHV(H,BARSLAST(CROSS(MA5,MA13))+1),HHV(H,BARSLAST(CROSS
(MA5,MA13))+1),0),COLOR0000FF{XG51};
DOWN:=DRAWLINE(H=HHV(H,BARSLAST(CROSS(MA5,MA13))+1),HHV(H,BARSLAST(CROSS
(MA5,MA13))+1),L=LLV(L,BARSLAST(CROSS(MA13,MA5))+1),LLV(L,BARSLAST(CROSS
(MA13,MA5))+1),0),COLOR00FF00{XG51};
BT:=(LLV(VAR2,2)=LLV(VAR2,7) AND COUNT(VAR2<0,2) AND CROSS(VAR2,MA(VAR2,2))) AND
REF(DOWN,1)<REF(DOWN,2) AND UP>REF(DOWN,1){XG51};
DRAWTEXT(BT,C*0.98,'短牛'),COLORFFFFFF{XG51};
TJ1:=REF(DOWN,1)<REF(DOWN,2) AND UP>REF(DOWN,1) AND C<HHV(H,21)*0.82{XG51};
DRAWTEXT(TJ1,C*0.99,'中牛'),COLORLIMAGENTA{XG51};
HR:=HHV(HIGH,55){XG51};
HRY:=LLV(LOW,55){XG51};
HRY11:=HR*HRY{XG51};
HRY33:=SQRT(HRY11){XG51};
TJ2:=REF(DOWN,1)<REF(DOWN,2) AND UP>REF(DOWN,1) AND C<HRY33{XG51};
DRAWTEXT(TJ2,L*0.98,'大牛'),COLORBLUE{XG51};
ST:=REF(UP,1)>REF(UP,2) AND DOWN<REF(UP,1){XG51};
DRAWTEXT(ST,H*1.02,'卖'),COLOR00FF00{XG51};
DRAWICON(BT AND TJ1 AND TJ2,L * 0.98,17){X.G*5.1.C.N.{};