寻庄MACD指标公式 在普通macd的基础上加入了选股公式，方便看盘。
DIFF : EMA(CLOSE,SHORT) - EMA(CLOSE,LONG);
DEA : EMA(DIFF,M);
MACD : 2*(DIFF-DEA);
Zero : 0;
DIFF:( EMA(CLOSE,12) - EMA(CLOSE,26))*100,colorred;
DEA: EMA(DIFF,9),coloryellow,LINETHICK1;
MACD:= 2*(DIFF-DEA);
{PARTLINE(DIFF,DIFF>=REF(DIFF,1),RGB(255,0,0),
DIFF<REF(DIFF,1),RGB(0,255,0)),LINETHICK1;}
STICKLINE(MACD>0 AND MACD>=REF(MACD,1),0,MACD,2,0),colorred;
STICKLINE(MACD>0 AND MACD<REF(MACD,1),0,MACD,2,0),colorcyan;
STICKLINE(MACD<0 AND MACD>=REF(MACD,1),0,MACD,2,0),colormagenta;
STICKLINE(MACD<0 AND MACD<REF(MACD,1),0,MACD,2,0),colorgreen;
STICKLINE(MACD<REF(MACD,1)AND MACD>0,0,MACD,4,0 ),colorcyan;
低位金叉:=CROSS(DIFF,DEA) AND DIFF<-0.1;
STICKLINE(低位金叉,DEA*0.86,DEA*0.66,6,0),coloryellow;
DRAWTEXT(低位金叉,dea*0.86,' 金叉'),coloryellow;
JCCOUNT:=COUNT(CROSS(DIFF,DEA),BARSLAST(DEA>=0));
二次金叉:=CROSS(DIFF,DEA) AND DEA<0 AND COUNT(JCCOUNT=2,21)=1;
STICKLINE(二次金叉,DEA*0.96,DEA*0.76,6,0),ColorFF00FF;
DRAWICON(二次金叉,dea*1.1,'BUY') ;
DRAWTEXT(二次金叉,DEA*0.96,' 金叉'),ColorFF00FF;
A1:=BARSLAST(REF(CROSS(DIFF,DEA),1));
底背离:=REF(CLOSE,A1+1)>CLOSE AND DIFF>REF(DIFF,A1+1) AND CROSS(DIFF,DEA);
STICKLINE(底背离,DEA*1.09,DEA*0.86,6,0),Color00FF00;
DRAWLINE(A1=0,DEA,底背离,DEA,0),colorred,linethick1;
DRAWTEXT(底背离,DEA*1.09,' 底背'),Color6600FF;
A2:=BARSLAST(REF(CROSS(DEA,DIFF),1));
顶背离:=REF(CLOSE,A2+1)<CLOSE AND REF(DIFF,A2+1)>DIFF AND CROSS(DEA,DIFF);
DRAWLINE(A2=0,DEA,顶背离,DEA,0),colorgreen,linethick1;
DRAWTEXT(顶背离,DEA*1.2,' 顶背'),Color00FF00;
MTM:=C-REF(C,1);
DX:=100*EMA(EMA(MTM,6),6)/EMA(EMA(ABS(MTM),6),6);
YXF:=IF(LLV(DX,2)=LLV(DX,7) AND COUNT(DX<0,2) AND CROSS(DX,MA(DX,2)),1,0);
蓝:IF(FILTER(YXF=1,5),20,0),colorliblue,LINETHICK3;
红: IF(FILTER(YXF=1,5),10,0),colorred,LINETHICK2;
黄: IF(FILTER(YXF=1,5),5,0),coloryellow,LINETHICK1;
DIFF:=EMA(CLOSE,12)-EMA(CLOSE,26);
DEA:=EMA(DIFF,9);
macd上拐:REF(DEA,2)>REF(DEA,1) AND REF(DEA,1)<DEA;
支撑位:IF((EMA(CLOSE,15)-REF(EMA(CLOSE,15),1))/REF(EMA(CLOSE,15),1)*100>=0,REF(EMA(CLOSE,15),BARSLAST(CROSS((EMA(CLOSE,15)-REF(EMA(CLOSE,15),1))/REF(EMA(CLOSE,15),1)*100,0))+1),DRAWNULL),colorred,LINETHICK1;
阻力位:IF((EMA(CLOSE,15)-REF(EMA(CLOSE,15),1))/REF(EMA(CLOSE,15),1)*100<0,REF(EMA(CLOSE,15),BARSLAST(CROSS(0,(EMA(CLOSE,15)-REF(EMA(CLOSE,15),1))/REF(EMA(CLOSE,15),1)*100))+1),DRAWNULL),colorgreen,LINETHICK1;
过渡:IF(BBI,10,DRAWNULL),colorwhite,LINETHICK2;
持股:IF(C>BBI AND BBI>REF(BBI,1),10,DRAWNULL), colorred,LINETHICK2;
持币:IF(C<=BBI AND BBI<=REF(BBI,1),10,DRAWNULL),colorgreen,LINETHICK2;
Zero : 0;
|
