{必杀MACD}
DIF:EMA(CLOSE,12)-EMA(CLOSE,26);
DIFF:=EMA(C,S*1) - EMA(C,P);
DEA:EMA(DIFF,M);
MACD:(DIF-DEA)*2,COLORSTICK;
MACDB:=2*(DIFF-DEA),COLORSTICK;
BV:=SUM(MACDB,0);
BA:=IF(MAX(BV,REF(BV,2))<REF(BV,1) OR MIN(BV,REF(BV,2))>REF(BV,1),1,0);
BC:=BARSLAST(BA)+1;
SMACD:=BV-REF(BV,BC);
VAR3:=IF(MACDB>0,HHV(ABS(MACDB),BC),LLV(MACDB,BC));
VAR4:=(MACDB)/20;{图形比例缩小1/20,可修改}
面积1:=ROUND(SMACD*100),NODRAW;
面积:SMACD*100,NODRAW;
DRAWNUMBER(REF(VAR4,1)>0 AND VAR4<=0 ,REF(VAR3,1)*0.9,REF(面积1,1)),COLORFF00FF;
DRAWNUMBER(REF(VAR4,1)<0 AND VAR4>=0 ,REF(VAR3,1)*0.9,REF(ABS(面积1),1)),COLORGREEN;
DRAWNUMBER(ISLASTBAR AND VAR4<0,REF(VAR3,1)*0.9,ABS(面积1)),COLORGREEN;
DRAWNUMBER(ISLASTBAR AND VAR4>0,REF(VAR3,1)*0.9,面积1),COLORFF00FF;
M1:=REF(MACDB,1);{分析家公式网WWW.fxjgsw.com}
STICKLINE(MACDB>0 AND MACDB<=M1,0,MACDB,0,0),COLORYELLOW;
STICKLINE(MACDB<0 AND MACDB>=M1,0,MACDB,0,0),COLORWHITE;
IF(DIFF>=REF(DIFF,1),DIFF,DRAWNULL),COLORGREEN,LINETHICK2;
空中加油:IF(DIF>REF(DIF,1) AND DIF>=DEA AND REF(DIF,1)<=REF(DIF,2) AND REF(DIF,1)>=REF(DEA,1) ,1,0),NODRAW;
DRAWICON(空中加油=1,DIF,23);
DRAWICON(CROSS(DIF,DEA),DEA,1);
DRAWICON(CROSS(DEA,DIF),DEA,2);
强:IF(DIF>=DEA,DIF,DRAWNULL),COLORRED,LINETHICK2;
弱:IF(DEA>=DIF,DEA,DRAWNULL),COLORBLUE,LINETHICK2;
继续下跌:IF(DIF<REF(DIF,1) AND DIF<=DEA AND REF(DIF,1)>=REF(DIF,2) AND REF(DIF,1)<=REF(DEA,1) ,1,0),NODRAW;
DRAWICON(继续下跌=1,DIF,8);
{DRAWICON(CROSS(DIF,DEA),DEA,1);
DRAWICON(CROSS(DEA,DIF),DEA,2);}; |
