{通達信}
DIFF:EMA(CLOSE,12)-EMA(CLOSE,26);
DEA:EMA(DIFF,9);
MACD:2*(DIFF-DEA),NODRAW;
MACDHS:=IF(MACD>0 ANDMACD>REF(MACD,1),MACD,0);
MACDHX:=IF(MACD>0 ANDMACD<REF(MACD,1),MACD,0);
MACDLX:=IF(MACD<0 ANDMACD<REF(MACD,1),MACD,0);
MACDLS:=IF(MACD<0 ANDMACD>REF(MACD,1),MACD,0);
STICKLINE(MACDHS>0,0,MACD,2,0),COLORRED;
STICKLINE(MACDHX>0,0,MACD,2,0),COLORYELLOW;
STICKLINE(MACDLX<0,MACD,0,2,0),COLORCYAN;
STICKLINE(MACDLS<0,MACD,0,2,0),COLORLIGREEN;
綠柱面積:10*IF(MACD<0,SUM(MACD,BARSLAST(MACD>0)),0),NODRAW,COLORCYAN;
紅柱面積:10*IF(MACD>0,SUM(MACD,BARSLAST(MACD<0)),0),NODRAW,COLORRED;
DRAWNUMBER(REF(MACD,1)>0 AND MACD<=0,HHV(MACD,8),REF(紅柱面積,1)),COLORRED;
DRAWNUMBER(REF(MACD,1)<0 AND MACD>=0,LLV(MACD,4),REF(ABS(綠柱面積),1)),COLORCYAN;
DRAWNUMBER(ISLASTBAR ANDMACD<0,LLV(MACD,8),ABS(綠柱面積)),COLORCYAN;
DRAWNUMBER(ISLASTBAR ANDMACD>0,HHV(MACD,4),ABS(紅柱面積)),COLORRED;
{大智慧}
{MACD紅綠柱面積(大智慧L2版副圖)參數(shù)默認值:p=26;s=12;m=9}
p:=26;
s:=12;
m:=9;
DIFF:EMA(CLOSE,s) - EMA(CLOSE,p);
DEA:EMA(DIFF,m);
MACD:2*(DIFF-DEA),LINETHICK0;
MACDhs:=IF(MACD>0 ANDMACD>REF(MACD,1),MACD,0);
MACDhx:=IF(MACD>0 ANDMACD<REF(MACD,1),MACD,0);
MACDlx:=IF(MACD<0 ANDMACD<REF(MACD,1),MACD,0);
MACDls:=IF(MACD<0 ANDMACD>REF(MACD,1),MACD,0);
STICKLINE(MACDhs>0,0,MACD,9,0),Color0000BB;
STICKLINE(MACDhs>0,0,MACD,8,0),Color0000CC;
STICKLINE(MACDhs>0,0,MACD,7,0),Color0000CC;
STICKLINE(MACDhs>0,0,MACD,6,0),Color0000DD;
STICKLINE(MACDhs>0,0,MACD,5,0),Color0033DD;
STICKLINE(MACDhs>0,0,MACD,4,0),Color3355EE;
STICKLINE(MACDhs>0,0,MACD,3,0),Color6677EE;
STICKLINE(MACDhs>0,0,MACD,2,0),Color8888FF;
STICKLINE(MACDhs>0,0,MACD,1,0),Color9999FF;
STICKLINE(MACDhx>0,0,MACD,9,0),Color0077BB;
STICKLINE(MACDhx>0,0,MACD,8,0),Color0088CC;
STICKLINE(MACDhx>0,0,MACD,7,0),Color0099CC;
STICKLINE(MACDhx>0,0,MACD,6,0),Color00AADD;
STICKLINE(MACDhx>0,0,MACD,5,0),Color11BBDD;
STICKLINE(MACDhx>0,0,MACD,4,0),Color22CCEE;
STICKLINE(MACDhx>0,0,MACD,3,0),Color33DDEE;
STICKLINE(MACDhx>0,0,MACD,2,0),Color44EEFF;
STICKLINE(MACDhx>0,0,MACD,1,0),Color55FFFF;
STICKLINE(MACDlx<0,MACD,0,9,0),ColorBB0000;
STICKLINE(MACDlx<0,MACD,0,8,0),ColorCC0000;
STICKLINE(MACDlx<0,MACD,0,7,0),ColorCC2200;
STICKLINE(MACDlx<0,MACD,0,6,0),ColorDD4400;
STICKLINE(MACDlx<0,MACD,0,5,0),ColorDD6611;
STICKLINE(MACDlx<0,MACD,0,4,0),ColorEE8822;
STICKLINE(MACDlx<0,MACD,0,3,0),ColorEEAA33;
STICKLINE(MACDlx<0,MACD,0,2,0),ColorFFBB44;
STICKLINE(MACDlx<0,MACD,0,1,0),ColorFFCC55;
STICKLINE(MACDls<0,MACD,0,9,0),Color007700;
STICKLINE(MACDls<0,MACD,0,8,0),Color009900;
STICKLINE(MACDls<0,MACD,0,7,0),Color00AA00;
STICKLINE(MACDls<0,MACD,0,6,0),Color00BB00;
STICKLINE(MACDls<0,MACD,0,5,0),Color11CC11;
STICKLINE(MACDls<0,MACD,0,4,0),Color22DD22;
STICKLINE(MACDls<0,MACD,0,3,0),Color33FF33;
STICKLINE(MACDls<0,MACD,0,2,0),Color44EF44;
STICKLINE(MACDls<0,MACD,0,1,0),Color55FF55;
綠柱面積:10*IF(MACD<0,SUM(MACD,BARSLAST(MACD>0)),0),LINETHICK0,Color00ff00;
紅柱面積:10*IF(MACD>0,SUM(MACD,BARSLAST(MACD<0)),0),LINETHICK0,colorred;
DRAWTEXT(ref(MACD,1)>0 and MACD<=0,HHV(MACD,8),''+ref(紅柱面積,1)),ALIGN1,VALIGN1,colorred;
DRAWTEXT(ref(MACD,1)<0 and MACD>=0,LLV(MACD,4),''+ref(abs(綠柱面積),1)),ALIGN1,Color00ff00;
DRAWTEXT(BARSTATUS=2 ANDMACD<0,LLV(MACD,8),''+abs(綠柱面積)),align2,Color004A00;
DRAWTEXT(BARSTATUS=2 ANDMACD>0,HHV(MACD,4),''+abs(紅柱面積)),align2,VALIGN1,colorred;