飞狐大道至简MACD副图指标

源码

{大道至简MACD}

DRAWGBK(1,COLORRGB(30,20,50),COLORRGB(0,0,0),1);
DIFF: EMA(CLOSE,12) - EMA(CLOSE,26),COLORRED;
DEA : EMA(DIFF,9),COLORYELLOW;
MACD:=2*(DIFF-DEA), COLORSTICK;
CDA:=MACD0;
CDB:=MACD>=ref(MACD,1) and MACD>0;
CDC:=MACD>ref(MACD,1) and MACD<0;
CDD:=MACD<=ref(MACD,1) and MACD<0;
PARTLINE(DIFF PARTLINE(DEA STICKLINE(CDA,0,macd,5,0),COLOR00AAFF;{黄色段}
STICKLINE(CDA,0,macd,4,0),COLOR00BBFF;
STICKLINE(CDA,0,macd,3,0),COLOR00CCFF;
STICKLINE(CDA,0,macd,2,0),COLOR00DDFF;
STICKLINE(CDA,0,macd,1,0),COLOR00EEFF;
STICKLINE(CDA,0,macd,0.1,0),COLOR00FFFF;
STICKLINE(CDB,0,macd,5,0),COLOR0000AA; {红色段}
STICKLINE(CDB,0,macd,4,0),COLOR0011BB;
STICKLINE(CDB,0,macd,3,0),COLOr0022CC;
STICKLINE(CDB,0,macd,2.3,0),COLOR0033DD;
STICKLINE(CDB,0,macd,1.2,0),COLOR0044EE;
STICKLINE(CDB,0,macd,0.1,0),COLOR0055FF;
STICKLINE(CDC,0,macd,5,0),COLORAA00BB;{向上粉红}
STICKLINE(CDC,0,macd,4,0),COLORBB11BB;
STICKLINE(CDC,0,macd,3,0),COLORCC22BB;
STICKLINE(CDC,0,macd,2,0),COLORDD33BB;
STICKLINE(CDC,0,macd,1.2,0),COLOREE44BB;
STICKLINE(CDC,0,macd,0.1,0),COLORFF55BB;
STICKLINE(CDD,0,macd,5,0),COLORFF7700;
STICKLINE(CDD,0,macd,4,0),COLORFF8811;
STICKLINE(CDD,0,macd,3,0),COLORFFAA22;
STICKLINE(CDD,0,macd,2,0),COLORFFBB33;
STICKLINE(CDD,0,macd,1.2,0),COLORFFDD44;
STICKLINE(CDD,0,macd,0.1,0),COLORFFDD55;
Var1:=LOW=LLV(LOW,120) OR REF(LOW,1)=LLV(REF(LOW,1),120) OR REF(LOW,2)=LLV(REF(LOW,2),120);
Var2:=CLOSE/REF(CLOSE,1)>=1.06;
反转点1:if(Var1 AND Var2,0.5,0),colorff00ff;
Var3:=(CLOSE-MA(CLOSE,12))/MA(CLOSE,12)*100;
Var4:=(CLOSE-MA(CLOSE,24))/MA(CLOSE,24)*100;
反转点2:if(CROSS(Var4,-20)+0,0.5,0),coloryellow;
RSV:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100;
K:=SMA(RSV,3,1);
D:=SMA(K,3,1);
J:=3*K-2*D;
关注点:if(CROSS(CLOSE,MA(CLOSE,5)) AND CROSS(CLOSE,MA(CLOSE,10)) AND CROSS(CLOSE,MA(CLOSE,20)) AND CROSS(Var3,0) AND CROSS(Var4,0) AND (CROSS(CLOSE,MA(CLOSE,5)) AND CROSS(CLOSE,MA(CLOSE,10)) AND CROSS(CLOSE,MA(CLOSE,20)) AND CROSS(Var3,0) AND CROSS(Var4,0)),0.5,0),COLORbbEE00;
Var5:=EMA(CLOSE,12)*2-EMA(CLOSE,26)*2;
Var6:=EMA(Var5,9);
BIAS3:=(CLOSE-MA(CLOSE,24))/MA(CLOSE,24)*100;
金叉点:if(Var5<-0.9 AND Var6<=-0.7 AND CROSS(Var5,Var6) OR Var5<-0.5 AND Var6<-0.6 AND CROSS(Var5,Var6) AND J>89 OR Var5<-0.5 AND Var6<-0.5 AND CROSS(