通达信超级macd未加密选股指标公式源码

源码正文：

difF:ema(DCLOSE,12)-Ema(DCLOSE,26){XG51};
DEA:EMA(DIFF,9),COLORFF0000{XG51};
macd:(DIFF-DEA)*2{XG51};
stICKLINE(MacD>=0 AND MACD>=REF(MACD,1),0,MACD,1,0),COLORWHITE{XG51};
STICKLINE(MACD>=0 AND MACD<=REF(MACD,1),0,MACD,1,0),COLORCYAN{XG51};
STICKLINE(MACD<=0 AND MACD>=REF(MACD,1),0,MACD,1,0),COLORFF00FF{XG51};
STICKLINE(MACD<=0 AND MACD<=REF(MACD,1),0,MACD,1,0),COLOR00FFFF{XG51};
多转空:=((((LLV(MACD,4)>0) AND (MACD<REF(MACD,1))) AND (REF(MACD,1)>REF(MACD,2))) AND (REF(MACD,2)>REF(MACD,3))){XG51};
空转多:=((((HHV(MACD,4)<0) AND (MACD>REF(MACD,1))) AND (REF(MACD,1)<REF(MACD,2))) AND (REF(MACD,2)<REF(MACD,3))){XG51};
DRAWICON(多转空,MACD,2){XG51};
DRAWICON(空转多,MACD,1){XG51};
低叉:=crOSS(DIFF,DEA) AND DIFF<-0.1{XG51};
DRAWTEXT(低叉,DEA,' 低叉'),COLORFF00FF{XG51};
JCCOUNT:=COUNT(CROSS(DIFF,DEA),BArslAST(DEA>=0)){XG51};
二叉:=CROSS(DIFF,DEA) AND DEA<0 AND COUNT(JCCOUNT=2,21)=1{XG51};
STICKLINE(二叉,0,0.2,2,0),COLORFF00FF{XG51};
DRAWTEXT(二叉,DEA*1.06,'二叉'),COLORWHITE{XG51};
A1:=BARSLAST(REF(CROSS(DIFF,DEA),1)){XG51};
底背离:=REF(CLOSE,A1+1)>CLOSE AND DIFF>REF(DIFF,A1+1) AND CROSS(DIFF,DEA){XG51};
DRAWTEXT(底背离,-0.2-MACD,'底背离'),COLORRED{XG51};
A2:=BARSLAST(REF(CROSS(DEA,DIFF),1)){XG51};
顶:=REF(CLOSE,A2+1)<CLOSE AND REF(DIFF,A2+1)>DIFF AND CROSS(DEA,DIFF){XG51};
DRAWTEXT(顶,0.2+MACD,'顶'),COLORRED{X*G-5~1*C*N*{};

源码正文：

RSV:=(((C-LLV(L,9))/(HHV(H,9)-LLV(L,9)))*100){XG51};
K:=SMA(RSV,3,1){XG51};
D:=Sma(K,3,1){XG51};
J:=((3*K)-(2*D)){XG51};
difF:=(ema(C,12)-EMA(C,26)){XG51};
DEA:=EMA(DIFF,9){XG51};
macd2:=(2*(DIFF-DEA)){XG51};
DIF:=DIFF{XG51};
MacD:=DEA{XG51};
DEF:=MACD2{XG51};
CA1:=REF(C,1)>REF(O,1){XG51};
CA2:=O>=(REF(C,1)+REF(O,1))/2 AND REF(C,1)>=O{XG51};
CA3:=C>(REF(C,1)+REF(O,1))/2{XG51};
CA:=CA1 AND CA2 AND CA3{XG51};
CB1:=REF(C,1)<REF(O,1){XG51};
CB2:=C>O;CB:=CA2 AND CB1 AND CB2{XG51};
CC1:=(REF(C,1)+REF(O,1))/2>=O AND O>=REF(C,1){XG51};
CC2:=(REF(C,1)+REF(O,1))/2>=C{XG51};
CC:=CB1 AND CC1 AND CC2{XG51};
CD1:=(REF(C,1)+REF(O,1))/2>=O{XG51};
CD2:=O>=C{XG51};
CD:=CA1 AND CD1 AND CD2{XG51};
CE:=Abs((C-REF(C,1))/REF(C,1)*100)<3{XG51};
EB1:=(CA OR CB OR CC OR CD) AND CE{XG51};
CF:=BArslAst(EB1){XG51};
EB2:=IF(REF(C,CF)>REF(O,CF),REF(O,CF),REF(C,CF)){XG51};
EA1:=C>O; EA2:=C-MIN(MIN(REF(C,1),REF(O,1)),O){XG51};
EA3:=EA2/ABS(EB2-REF(C,1))*100>50;EA4:=J>REF(J,1){XG51};
EA5:=MAX(REF(C,2),REF(O,2))>MIN(O,MIN(REF(C,1),REF(O,1))){XG51};
EA6:=(DEF>REF(DEF,1) OR DEF>0) AND (MACD>REF(MACD,1) OR DIF>REF(DIF,1)){XG51};
买进:EA1 AND EA3 AND EA4 AND EA5 AND EA6{X_G~5^1_C_N_{};