通达信MACD主升浪选股指标公式源码

通达信MACD主升浪选股指标公式源码

源码正文：

dif1:=ema(CLOSE,12)-Ema(CLOSE,26),COLOR00FF00,LINETHICK1{XG51};
DEA1:=EMA(DIF1,9),COLOR00FF00,LINETHICK1{XG51};
DRAWICON(crOSS(DIF1,DEA1),DEA1,1){XG51};
DRAWICON(CROSS(DEA1,DIF1),DEA1,2){XG51};
DI:=EMA(CLOSE,4)-EMA(CLOSE,13),COLORLIMAGENTA,LINETHICK2{XG51};
D1:=EMA(DI,5),COLORBROWN{XG51};
D2:=EMA(DI,10),COLORBROWN{XG51};
D3:=EMA(DI,20),COLORBROWN{XG51};
D4:=EMA(DI,30),COLORBROWN{XG51};
D5:=EMA(DI,60),COLORBROWN{XG51};
D6:=EMA(DI,90),COLORBROWN{XG51};
D7:=EMA(DI,120),COLORBROWN{XG51};
D8:=EMA(DI,250),COLORBROWN{XG51};
AA:=stICKLINE(DI>=REF(DI,1) AND D1>=REF(D1,1) AND D2>=REF(D2,1) AND D3>=REF(D3,1) AND
D4>=REF(D4,1) AND D5>=REF(D5,1) AND D6>=REF(D6,1) AND D7>=REF(D7,1) AND
D8>=REF(D8,1) AND C>EMA(C,11) AND DI>-0.8,DI,0,2,0),COLORWHITE{XG51};
STICKLINE(AA,DIF1,DEA1,3,0),COLORE6E8FA{XG51};
macd1:=(DIF1-DEA1)*2{XG51};
STICKLINE(MacD1>REF(MACD1,1),0,MACD1,3.2,0),COLOR0000FF{XG51};
STICKLINE(MACD1>REF(MACD1,1),0,MACD1,2.7,0),,COLOR0000FF{XG51};
STICKLINE(MACD1>REF(MACD1,1),0,MACD1,2.1,0),COLOR0000FF{XG51};
STICKLINE(MACD1>REF(MACD1,1),0,MACD1,1.5,0),COLOR0000FF{XG51};
STICKLINE(MACD1>REF(MACD1,1),0,MACD1,0.9,0),COLOR0000FF{XG51};
STICKLINE(MACD1>REF(MACD1,1),0,MACD1,0.3,0),COLORCC66FF{XG51};
STICKLINE(MACD1<REF(MACD1,1),0,MACD1,3.2,0),COLORFF9900{XG51};
STICKLINE(MACD1<REF(MACD1,1),0,MACD1,2.7,0),COLORFF9900{XG51};
STICKLINE(MACD1<REF(MACD1,1),0,MACD1,2.1,0),COLORFF9900{XG51};
STICKLINE(MACD1<REF(MACD1,1),0,MACD1,1.5,0),COLORFF9900{XG51};
STICKLINE(MACD1<REF(MACD1,1),0,MACD1,0.9,0),COLORFF9900{XG51};
STICKLINE(MACD1<REF(MACD1,1),0,MACD1,0.3,0),COLORFFCC00{XG51};
STICKLINE(MACD1>=0 OR MACD1<=0,0,0,50,1),COLORRED{XG51};
A1:=BArslAST(REF(CROSS(DIF1,DEA1),1)){XG51};
BL:=REF(CLOSE,A1+1)>CLOSE AND DIF1>REF(DIF1,A1+1) AND CROSS(DIF1,DEA1){XG51};
DRAWICON(BL,DEA1,23){XG51};
A2:=BARSLAST(REF(CROSS(DEA1,DIF1),1)){XG51};
DBL:=REF(CLOSE,A2+1)<CLOSE AND REF(DIF1,A2+1)>DIF1 AND CROSS(DEA1,DIF1){XG51};
DRAWICON(DBL,DEA1,12){XG51};
低位金叉:=CROSS(DIF1,DEA1) AND DIF1<-0.1{XG51};
DRAWTEXT(低位金叉,DIF1,' 低位金叉'){XG51};
JCCOUNT:=COUNT(CROSS(DIF1,DEA1),BARSLAST(DEA1>=0)){XG51};
二次金叉:=CROSS(DIF1,DEA1) AND DEA1<0 AND COUNT(JCCOUNT=2,21)=1{XG51};
DRAWICON(二次金叉,DEA1*1.04,13) {XG51};
DRAWTEXT(二次金叉,-0.1,' 二次金叉'),COLORFF00FF{XG51};
A10:=BARSLAST(REF(CROSS(DIF1,DEA1),1)){XG51};
底背离:=REF(CLOSE,A10+1)>CLOSE AND DIF1>REF(DIF1,A10+1) AND CROSS(DIF1,DEA1){XG51};
DRAWLINE(A10=0,DEA1,底背离,DEA1,0),COLORWHITE,LINETHICK2{XG51};
DRAWTEXT(底背离,-0.50,' 底背离'),COLOR00FF00{XG51};
A20:=BARSLAST(REF(CROSS(DEA1,DIF1),1)){XG51};
顶背离:=REF(CLOSE,A20+1)<CLOSE AND REF(DIF1,A20+1)>DIF1 AND CROSS(DEA1,DIF1){XG51};
DRAWLINE(A20=0,DEA1,顶背离,DEA1,0),COLORRED,LINETHICK2{XG51};
WY1001:=(2*CLOSE+HIGH+LOW)/4{XG51};
WY1002:=EMA(WY1001,4){XG51};
WY1003:=EMA(WY1002,4){XG51};
WY1004:=EMA(WY1003,4){XG51};
X:=(WY1004-REF(WY1004,1))/REF(WY1004,1)*100{XG51};
X1:=IF(X<REF(X,1),X,DRAWNULL),COLORRED,LINETHICK2{XG51};
XO:=MA(X,2),COLOR9932CD{XG51};
SI:=REF(X,1){XG51};
STICKLINE(X>SI,X,SI,2.3,0),COLOR0000FF{XG51};
STICKLINE(X>SI,X,SI,0.3,0),COLORCC66FF{XG51};
STICKLINE(X<SI,X,SI,2.3,0),COLOR00BB00{XG51};
STICKLINE(X<SI,X,SI,0.3,0),COLOR00FF00{XG51};
STICKLINE(底背离,X,SI,1,0),COLORBLUE{XG51};
STICKLINE(低位金叉,X,SI,1,0),COLORRED{XG51};
STICKLINE(低位金叉 AND 底背离,X,SI,0.1,0),COLORBLUE{XG51};
VAR2:=REF(LOW,1){XG51};
VAR3:=SMA(Abs(LOW-VAR2),3,1)/SMA(MAX(LOW-VAR2,0),3,1)*100{XG51};
VAR4:=EMA(IF(CLOSE*1.3,VAR3*10,VAR3/10),3){XG51};
VAR5:=LLV(LOW,13){XG51};
VAR6:=HHV(VAR4,13){XG51};
VAR7:=IF(MA(CLOSE,34),1,0){XG51};
VAR8:=EMA(IF(LOW<=VAR5,(VAR4+VAR6*2)/2,0),3)/618*VAR7{XG51};
VAR9:=IF(VAR8>100,100,VAR8){XG51};
VAR10:=IF(VAR9>-120,VAR9,0){XG51};
VAR11:=VAR10<REF(VAR10,1){XG51};
DRAWTEXT(VAR11 AND REF(NOT(VAR11),1),0,'☆'),COLORBLUE{XG51};
DIF:DIF1,LINETHICK1,COLORCYAN{XG51};
DEA:DEA1,LINETHICK1,COLORCYAN{XG51};
DIF2:IF(MACD>REF(MACD,1),DIF1,DRAWNULL),COLORWHITE,LINETHICK1{XG51};
DEA2:IF(DEA1<DIF1,DEA1,DRAWNULL),COLORFF00FF,LINETHICK1{XG51};
VAR12:=REF((LOW+OPEN+CLOSE+HIGH)/4,1){XG51};
VAR13:=SMA(ABS(LOW-VAR12),13,1)/SMA(MAX(LOW-VAR12,0),10,1){XG51};
VAR14:=EMA(VAR13,10){XG51};
VAR15:=LLV(LOW,33){XG51};
VAR16:=EMA(IF(LOW<=VAR15,VAR14,0),3){XG51};
主力进场:=IF(VAR16>REF(VAR16,1),VAR16,0),COLORWHITE,NODRAW{XG51};
STICKLINE(主力进场,X,SI,0.1,0),COLORWHITE{X_G~5^1_C_N_{};