同花顺价量MACD源码附图 EA

用法：橙色大胆做多，黄色多转空，蓝色、绿色持币

r

long 1 100 26
rshort 1 100 12
rm 1 100 9
rOBV:=EMA(SUM(IF(C>REF(C,1),VOL,IF(C<REF(C,1),-V,0)),0)/1000,2);
robve:=EMA(OBV,3);
rDIFF:=(EMA(obve,12)-EMA(obve,26));
rbbDIFF:=DIFF-REF(DIFF,1);
rDEA:=EMA(DIFF,9);
rbbDEA:=DEA-REF(DEA,1);
rMACD:2*(DIFF-DEA);
rPARTLINE(IF(C,0,0),0,colorwhite);
rSTICKLINE(DIFF>=REF(DIFF,1) AND DEA>REF(DEA,1),DIFF,dea,8,0),LINETHICK4,Color0089FF;//{橙}
r//DRAWTEXT(DIFF>=REF(DIFF,1) AND DEA>REF(DEA,1),L*0.98,"介入");
rSTICKLINE(DIFF>DEA,DIFF,DEA,8,0),Color0089FF;//{橙–加宽}
rSTICKLINE(DIFF<REF(DIFF,1) AND DEA<REF(DEA,1),DIFF,DEA,8,0),LINETHICK4,colorblue;//{蓝}
rSTICKLINE(DIFF<DEA,DIFF,DEA,8,0),colorblue;//{蓝–加宽}
rSTICKLINE(DIFF>=REF(DIFF,1) AND DEA<REF(DEA,1),DIFF,DEA,8,0),LINETHICK4,Color00C500;//{绿}
rSTICKLINE(DIFF<REF(DIFF,1) AND DEA>REF(DEA,1),DIFF,DEA,8,0),LINETHICK4,coloryellow;//{黄}
rSTICKLINE(MACD>REF(MACD,1) AND MACD>0,0,MACD,2,0),colorred;
rSTICKLINE(MACD<REF(MACD,1) AND MACD>0,0,MACD,2,0),coloryellow;
rSTICKLINE(MACD<REF(MACD,1) AND MACD<0,0,MACD,2,0),colorgreen;
rSTICKLINE(MACD>REF(MACD,1) AND MACD<0,0,MACD,2,0),COLOR0099FF;
rIF(C,2*(DEA-DIFF),MACD),LINETHICK2,colorgray;//{加速线}

r