通达信不宜割肉未加密选股指标公式源码

源码正文：

GJTJ1:=100*(C-LLV(L,5))/(HHV(C,5)-LLV(L,5)){XG51};
GJTJ2:=100*(C-LLV(L,10))/(HHV(C,10)-LLV(L,10)){XG51};
GJTJ3:=100*(C-LLV(L,20))/(HHV(C,20)-LLV(L,20)){XG51};
GJTJ4:=100*(C-LLV(L,30))/(HHV(C,30)-LLV(L,30)){XG51};
A:=BArslAst(crOSS(30,GJTJ1))<2 AND BARSLAST(CROSS(GJTJ1,50))<2{XG51};
B:=BARSLAST(CROSS(GJTJ4,GJTJ1))<2 AND GJTJ1>GJTJ4{XG51};
E:=GJTJ1>60 AND GJTJ4>70{XG51};
ENTERLONG:A AND B AND E{X_G!5.1_C_N_{};

源码正文：

0,COLOR0080FF,LINETHICK2{XG51};
0.35,COLORFF0000{XG51};
A:=EVERY(C,20)/C{XG51};
A1:=C/C{XG51};
A2:=(A1-A)/A*100{XG51};
dif:ema(CLOSE,12)-Ema(CLOSE,26){XG51};
DEA:EMA(DIF,9){XG51};
macd:(DIF-DEA)*2,COLORstICK{XG51};
冒牌脉冲:(A2-REF(A2,1))*-0.01,COLOR00FF00{X.G!5~1.C.N.{};