通达信月周日MACD选股指标公式源码

通达信月周日MACD选股指标公式源码

源码正文：

月dif:="macd.DIF#MONTH"COLOR0080FF{XG51};
月DEA:="maCD.DEA#MONTH",COLOR0080FF,LINETHICK2{XG51};
周DIF:="MacD.DIF#WEEK"COLORWHITE{XG51};
周DEA:="MACD.DEA#WEEK",COLORWHITE,LINETHICK2{XG51};
日DIF:="MACD.DIF",COLORRED{XG51};
日DEA:="MACD.DEA",COLORRED,LINETHICK2{XG51};
DRAWBAND(月DIF,RGB(100,0,100),月DEA,RGB(120,120,120)){XG51};
DRAWBAND(周DIF,RGB(200,20,10),周DEA,RGB(10,100,200)){XG51};
DIF:ema(CLOSE,12)-EMA(CLOSE,26),COLORLIMAGENTA{XG51};
DEA:EMA(DIF,9){XG51};

红色启动埋伏:=(EMA(IF(LOW<=LLV(LOW,30),(SMA(Abs(LOW-REF(LOW,1)),30,1))/(SMA(MAX(LOW-REF(LOW,1),0),30,1)),0),3))*(10),COLORWHITE,LINETHICK2{XG51};
DIFF:=EMA(CLOSE,11)-EMA(CLOSE,26){XG51};
红1柱:crOSS(DIF,DEA)  AND  CROSS(MACD,0),COLORYELLOW;
STICKLINE(MACD>0,MACD,0,-1,1),COLORWHITE{XG51};
STICKLINE(MACD<0,MACD,0,-1,1),COLORCCCC00{XG51};
DRAWICON(ISLASTBAR=1 AND MACD>REF(MACD,1),HHV(MACD,60),1){XG51};
DRAWICON(ISLASTBAR=1 AND MACD<REF(MACD,1),HHV(MACD,60),2){XG51};
VAR1:=HHV(DEA,53){XG51};
VAR2:=LLV(DEA,55){XG51};
VAR3:=DEA-(DIFF-DEA){XG51};
UP:IF(DIFF>VAR1 AND DEA=VAR1,MAX(LLV(VAR1,10),VAR3),VAR1),COLORBB9A00{XG51};
DN:IF(DIFF<VAR2 AND DEA=VAR2,MIN(HHV(VAR2,10),VAR3),VAR2),COLORAA00CC{XG51};
止跌:=(REF(EVERY(C<O,2),1) AND C>O){XG51};
VAR1N:=MA(CLOSE,5),;
VAR2N:=MA(CLOSE,10);
VAR3N:=(VAR1N-CLOSE)/CLOSE>3/100;
VAR4N:=(VAR2N-VAR1N)/VAR1N>0.03;
VAR5N:=LLV(CLOSE,30)=LLV(CLOSE,120);
底部:=VAR3N AND VAR4N AND VAR5N{XG51};
包赚小赔:BArslAST(底部)<=2 AND 止跌,COLORLIMAGENTA{XG51};
低位金叉:=CROSS(DIFF,DEA) AND DIFF<-0.1,COLORLIMAGENTA{XG51};
STICKLINE(低位金叉,0,0.08,6,0),COLORBLUE{XG51};
DRAWTEXT(低位金叉,0.16,' 低位金叉'),COLORRED{XG51};
埋伏金叉:红色启动埋伏 AND 低位金叉,COLORCYAN{XG51};
A:=EMA(CLOSE,2){XG51};
B:=EMA(((SLOPE(CLOSE,21)*20)+CLOSE),42){XG51};
低位金叉买:CROSS(A,B) AND 低位金叉,COLORGREEN{XG51};
日金:IF(CROSS(日DIF,日DEA),0.5,0),COLORRED{XG51};
周金:IF(CROSS(周DIF,周DEA),1,0),COLORLIRED{XG51};
月金:IF(CROSS(月DIF,月DEA),1.5,0),COLORLIMAGENTA{XG51};
STICKLINE(周金,0,0.08,6,0),COLORLIRED{XG51};
DRAWTEXT(周金,0.16,'周金叉'),COLORLIRED{XG51};
STICKLINE(月金,0,0.08,6,0),COLORLIMAGENTA{XG51};
DRAWTEXT(月金,0.17,'月金叉'),COLORLIMAGENTA{XG51};
日死:IF(CROSS(日DEA,日DIF),-0.5,0),COLORBLUE{XG51};
周死:IF(CROSS(周DEA,周DIF),-1,0),COLORYELLOW{XG51};
月死:IF(CROSS(月DEA,月DIF),-1.3,0),COLORCYAN{X_G+5-1_C_N_{};