短:=12;
長:=26;
差:=9;
DIF:EMA(C,短)-EMA(C,長),COLORWHITE;
DEA:EMA(DIF,差),COLORYELLOW;
MACD:(DIF-DEA)*2,COLORSTICK;
輸出0軸:0,DOTLINE;
輸出MACD:=MA(MACD,1);
綠柱縮量條件:=輸出MACD<0 AND 輸出MACD>REF(輸出MACD,1);
綠柱放量條件:=輸出MACD<0 AND 輸出MACD<REF(輸出MACD,1);
紅柱縮量條件:=輸出MACD>0 AND 輸出MACD<REF(輸出MACD,1);
紅柱放量條件:=輸出MACD>0 AND 輸出MACD>REF(輸出MACD,1);
STICKLINE(綠柱縮量條件,輸出0軸,輸出MACD,2,0),COLORRED;
STICKLINE(綠柱放量條件,輸出0軸,輸出MACD,2,0),COLORGREEN;
STICKLINE(紅柱縮量條件,輸出0軸,輸出MACD,2,0),COLORCYAN;
STICKLINE(紅柱放量條件,輸出0軸,輸出MACD,2,0),COLORMAGENTA;
IF(DEA>REF(DEA,1),DEA,DRAWNULL),COLORRED;
IF(DIF>REF(DIF,1),DIF,DRAWNULL),COLORMAGENTA;
金叉CORO:=CROSS(DIF,DEA);
DRAWICON(金叉CORO,DIF,1);