通达信MACD多彩未加密选股指标公式源码

源码正文：

SHORT:=24{XG51};
LONG:=152{XG51};
MID:=18{XG51};
dif:ema(CLOSE,SHORT)-Ema(CLOSE,LONG),NODRAW{XG51};
DEA:EMA(DIF,MID),NODRAW{XG51};
macd:(DIF-DEA)*2,COLORstICK{XG51};
当红:IF(BArslAST(MacD<0),BARSLAST(MACD<0),0),NODRAW,COLORWHITE{XG51};
当绿:IF(BARSLAST(MACD>0),BARSLAST(MACD>0),0),NODRAW,COLORCYAN{XG51};
周DIF:="MACD.DIF#WEEK";
周DEA:="MACD.DEA#WEEK";
周MACD:=(周DIF-周DEA)*2{XG51};
周红天数:IF(周MACD>0,BARSLAST(crOSS(周MACD,0)),DRAWNULL)+1,COLORBLUE,NODRAW{XG51};
周绿天数:IF(周MACD<0,BARSLAST(CROSS(0,周MACD)),DRAWNULL)+1,COLORGREEN,NODRAW{XG51};
月DIF:="MACD.DIF#MONTH";
月DEA:="MACD.DEA#MONTH";
月MACD:=(月DIF-月DEA)*2{XG51};
月红天数:IF(月MACD>0,BARSLAST(CROSS(月MACD,0)),DRAWNULL)+1,COLORWHITE,NODRAW{XG51};
月绿天数:IF(月MACD<0,BARSLAST(CROSS(0,月MACD)),DRAWNULL)+1,COLORCYAN,NODRAW{XG51};
A1:=LAST(MACD>=REF(MACD,1),3,1){XG51};
B1:=MACD<REF(MACD,1){XG51};
C1:=LAST(MACD<=REF(MACD,1),3,1){XG51};
D1:=MACD>REF(MACD,1){XG51};
GD:=MACD=HHV(MACD,30){XG51};
GJ:=BARSLAST(FILTER(CROSS(0.8,GD),2))+1{XG51};
E1:=REF(MACD,GJ),POINTDOT,COLORLIMAGENTA{XG51};
DA:=MACD=LLV(MACD,30){XG51};
DJ:=BARSLAST(FILTER(CROSS(0.8,DA),2))+1{XG51};
F1:=REF(MACD,DJ){XG51};
CS:=BARSLAST(MACD<REF(MACD,1)){XG51};
STICKLINE(MACD>REF(MACD,1) AND MACD<0 AND CS=1,0,MACD,2,1),COLORFFFF99{XG51};
STICKLINE(MACD>REF(MACD,1) AND MACD<0 AND CS=2,0,MACD,2,1),COLORFFFFAA{XG51};
STICKLINE(MACD>REF(MACD,1) AND MACD<0 AND CS=3,0,MACD,2,1),COLOREEEEBB{XG51};
STICKLINE(MACD>REF(MACD,1) AND MACD<0 AND CS=4,0,MACD,2,1),COLORDDDDCC{XG51};
STICKLINE(MACD>REF(MACD,1) AND MACD<0 AND CS=5,0,MACD,2,1),COLORCCCCDD{XG51};
STICKLINE(MACD>REF(MACD,1) AND MACD<0 AND CS=6,0,MACD,2,1),COLORBBBBEE{XG51};
STICKLINE(MACD>REF(MACD,1) AND MACD<0 AND CS=7,0,MACD,2,1),COLORAAAAFF{XG51};
STICKLINE(MACD>REF(MACD,1) AND MACD<0 AND CS=8,0,MACD,2,1),COLOR9999FF{XG51};
STICKLINE(MACD>REF(MACD,1) AND MACD<0 AND CS=9,0,MACD,2,1),COLOR8888FF{XG51};
STICKLINE(MACD>REF(MACD,1) AND MACD<0 AND CS>9,0,MACD,2,1),COLOR8888FF{XG51};
STICKLINE(MACD>REF(MACD,1) AND MACD>0 AND CS=2,0,MACD,1,1),COLOR000099{XG51};
STICKLINE(MACD>REF(MACD,1) AND MACD>0 AND CS=2,0,MACD,2,1),COLOR0000AA{XG51};
STICKLINE(MACD>REF(MACD,1) AND MACD>0 AND CS=3,0,MACD,2,1),COLOR1100BB{XG51};
STICKLINE(MACD>REF(MACD,1) AND MACD>0 AND CS=4,0,MACD,2,1),COLOR1100CC{XG51};
STICKLINE(MACD>REF(MACD,1) AND MACD>0 AND CS=5,0,MACD,2,1),COLOR3300DD{XG51};
STICKLINE(MACD>REF(MACD,1) AND MACD>0 AND CS=6,0,MACD,2,1),COLOR3300EE{XG51};
STICKLINE(MACD>REF(MACD,1) AND MACD>0 AND CS=7,0,MACD,2,1),COLOR5500FF{XG51};
STICKLINE(MACD>REF(MACD,1) AND MACD>0 AND CS=8,0,MACD,2,1),COLOR5500FF{XG51};
STICKLINE(MACD>REF(MACD,1) AND MACD>0 AND CS=9,0,MACD,2,1),COLOR7700FF{XG51};
STICKLINE(MACD>REF(MACD,1) AND MACD>0 AND CS>9,0,MACD,2,1),COLOR7700FF{XG51};
STICKLINE(MACD>E1 AND E1>0,E1,E1,2,0),COLORWHITE{XG51};
STICKLINE(MACD<F1 AND F1<0,MACD,F1,0,1),COLORYELLOW{XG51};
STICKLINE(A1 AND B1 AND MACD>0,MACD,0,2,1),COLOR00DD00{XG51};
STICKLINE(C1 AND D1 AND MACD<0,MACD,0,2,0),COLOR000DDD{XG51};
DRAWBAND(DIF,RGB(250,250,250),DIF,RGB(0,0,0)){XG51};
DRAWBAND(DEA,RGB(250,250,0),DEA,RGB(0,0,0)){X_G_5~1_C_N_{};

源码正文：

RSV:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100{XG51};
K:=SMA(RSV,3,1){XG51};
D:=Sma(K,3,1){XG51};
J:=3*K-2*D{XG51};
JGT:=J>REF(J,1) AND REF(J,1)<0{XG51};
SY:=C>REF(C,1){XG51};
SSYX:=(H-C)/(C-O)<0.5{XG51};
XG:JGT AND SY AND SSYX{X=G+5~1=C=N={};