赤腳火麒麟MACD-大智慧平臺
大智慧MACD指標，公式中的M可以分別設為1（標準）、5、25形成三個指標，同時加入副圖中達到同時觀察三個級別MACD的目的，三級別聯立。新指標建立方法可以baidu。
{macd面積赤腳}
INPUT:M(5,1,9999);
MM:=9*M;
SHORT:=MM*4/3;
LONG:=MM*26/9;
DIF:1000*(EMA(CLOSE,SHORT)-EMA(CLOSE,LONG))/ABS(EMA(CLOSE,SHORT));
MACD:EMA(DIF,MM),COLOR58FF58;
DEF:2*(DIF-MACD),COLORFFFF00,LINETHICK0;
STICKLINE(DEF>=0 ANDDEF>=REF(DEF,1),0,DEF,6,1),COLOR6058FF;
STICKLINE(DEF>=0 AND DEF<REF(DEF,1),0,DEF,6,0),COLOR6058FF;
STICKLINE(DEF<0 ANDDEF>=REF(DEF,1),0,DEF,6,1),COLORFFFF00;
STICKLINE(DEF<0 AND DEF<REF(DEF,1),0,DEF,6,0),COLORFFFF00;
PARTLINE(DIF<1000,0),COLORBROWN;
多頭趨勢:=IF(DIF>=0 AND MACD>=0 OR(DIF<0 AND MACD>=0),1,0);
空頭趨勢:=DIF<0 AND MACD<0 OR(DIF>=0 AND MACD<0);
縮頭:=IF(DEF>0 ANDREF(DEF,1)>REF(DEF,2) AND DEF<REF(DEF,1),1,0);
縮腳:=IF(DEF<0 AND REF(DEF,1)<REF(DEF,2) AND DEF>REF(DEF,1),1,0);
阻力:=IF(CROSS(CLOSE,MA(CLOSE,20)) ORCROSS(CLOSE,MA(CLOSE,60)),1,0);
支撐:=IF(CROSS(MA(CLOSE,20),CLOSE) ORCROSS(MA(CLOSE,60),CLOSE),1,0);
做多:=IF(CROSS(MACD,DIF) AND DIF>0 ANDMACD>0,1,0);
放空:=IF(CROSS(DIF,MACD) AND DIF<0 ANDMACD<0,1,0);
PARTLINE(DIF,DIF<1000),COLORCCFFFF,LINETHICK2;
PARTLINE(MACD,MACD<1000),COLOR58FF58;
DRAWICON(FILTER(縮頭,3) AND 縮頭,DEF+0.5,8),ALIGN0;
DRAWICON(FILTER(縮腳,3) AND 縮腳,DEF,10),ALIGN1;
BV:=SUM(DEF,0);
BA:=IF(MAX(BV,REF(BV,2))<REF(BV,1) ORMIN(BV,REF(BV,2))>REF(BV,1),1,0);
BC:=BARSLAST(BA)+1;
SMACD:=BV-REF(BV,BC);
var3:=IF(DEF>0,HHV(ABS(DEF),bc),LLV(DEF,bc));
var4:=(DEF)/20;{圖形比例縮小1/20,可修改}
var5:=SMACD;
DRAWtext(REF(var4,1)>0 andvar4<=0,REF(var3,1),''+REF(var5,1)){,pxup100},colorgreen;
DRAWtext(REF(var4,1)<0 and var4>=0,REF(var3,1),''+REF(ABS(var5),1)),{pxdn40,}colorff00ff;
DRAWtext(BARSTATUS=2 andvar4<0,REF(var3,1),''+ABS(var5)),align2,colorff00ff{,pxup40};
DRAWtext(BARSTATUS=2 andvar4>0,REF(var3,1),''+var5),align2,colorgreen{,pxdn100};
M1:=REF(DEF,1);
jc := MACD-dif;
綠柱面積:IF(DEF<0,SUM(DEF,BARSLAST(jc<0)),0),linethick0,colorblue;
紅柱面積:IF(DEF>0,SUM(DEF,BARSLAST(jc>0)),0),linethick0,colorred;