DIF:=EMA(CLOSE,12)-EMA(CLOSE,26);
DEA:=EMA(DIF,9);
macd:=(DIF-DEA)*2,COLORSTICK;
W1:STICKLINE(MACD>0,MACD,0,2,1),COLORRED;
W2:STICKLINE(MACD<0,MACD,0,2,0),COLORCYAN;
VA1:=HHVBARS(MACD,BARSLAST(MACD<0)+1);
VA2:=crOSS(BACKSET(CROSS(0,MACD) OR (ISLASTBAR AND MACD>0),REF(VA1,1)+2),0.5);
前高:DRAWLINE(VA2,MACD,REF(VA2,1),REF(MACD,1),1),COLORWHITE;
VA3:=LLVBARS(MACD,BARSLAST(MACD>0)+1);
VA4:=CROSS(BACKSET(CROSS(MACD,0) OR (ISLASTBAR AND MACD<0),REF(VA3,1)+2),0.5);
前低:DRAWLINE(VA4,MACD,REF(VA4,1),REF(MACD,1),1),COLORYELLOW;
W3:STICKLINE(MACD>0 AND MACD>前高 AND 前高>0,MACD,前高,2,0),COLORYELLOW;
W4:STICKLINE(MACD<0 AND MACD<前低 AND 前低<0,MACD,前低,2,0),COLORGREEN;
AK: EMA(前高,1)*1.22,COLORRED;
AD1: EMA(AK,3),COLORGREEN;
W5:DRAWTEXT(REFX(VA2,1),AK*0.98,'临界高点'),COLORWHITE;
W6:DRAWTEXT(REFX(VA4,1),MACD,'临界低点'),COLORYELLOW;
