通达信整理突破未加密选股指标公式源码

源码正文：

macd:="maCD.MacD"{XG51};
VA1:=HHVBARS(MACD,BArslAst(MACD<0)+1){XG51};
VA2:=crOSS(BACKSET(CROSS(0,MACD),REF(VA1,1)+2),0.5){XG51};
VA3:=LLVBARS(MACD,BARSLAST(MACD>0)+1){XG51};
VA4:=CROSS(BACKSET(CROSS(MACD,0),REF(VA3,1)+2),0.5){XG51};
前高:=DRAWLINE(VA2,MACD,REF(VA2,1),REF(MACD,1),1){XG51};
GT:=BARSLAST(VA2){XG51};
DT:=BARSLAST(VA4){XG51};
条件A:=VA2 AND MACD<REF(MACD,REF(GT,1)+1){XG51};
条件B:=VA4 AND MACD>REF(MACD,REF(DT,1)+1){XG51};
选股:=条件B AND COUNT(条件A,REF(DT,1))=1{XG51};
XG:CROSS(MACD>前高 AND COUNT(选股,GT)=1,0.5){X.G.5.1.C.N.{};

源码正文：

熊:=ema(Ema(EMA(CLOSE,3),3),3){XG51};
牛:=6*HHV(熊,2.5)-5*熊{XG51};
离卦:2*熊-牛,COLORCYAN,DOTLINE{XG51};
牛2:EMA(EMA(EMA(CLOSE,3),3),3),COLORWHITE{XG51};
DRAWBAND(牛,RGB(190,10,10),牛2,RGB(10,10,0)){XG51};
DRAWBAND(牛2,RGB(70,80,190),离卦,RGB(10,10,0)){XG51};
DRAWKLINE(H,O,L,C){XG51};
DRAWTEXT(熊-离卦>0.65 AND REF(离卦,1)<=REF(离卦,2) AND 离卦>REF(离卦,1),离卦,'熊笑'),COLORRED{XG51};
昨日涨幅:=C/REF(C,1){XG51};
DFT:=熊-离卦>0.3 AND REF(离卦,1)<=REF(离卦,2) AND 离卦>REF(离卦,1){XG51};
DRAWTEXT(FILTER(离卦>REF(离卦,1) AND ATAN((离卦/REF(离卦,1)-1)*100)*55.3>40 AND DFT,3),离卦-0.2,'熊抱'),COLORBLUE{X!G~5~1!C!N!{};