通達信MACD資金趨勢公式源碼（附圖）

源碼：

{★MACD資金趨勢★}

{M 2.00250.00 10.00}

A:=VOL*C;

B:=SUM(A,1)/SUM(VOL,1);

B1:=EMA(B,17);

資金:=(B-B1)*100/B;

DIFF:EMA(資金,12)-EMA(資金,26),COLORYELLOW;

DEA:EMA(DIFF,9),COLORLIGRAY;

MAC: 2*(DIFF-DEA),COLORSTICK;

STICKLINE(MAC>=REF(MAC,1)ANDMAC>0,0,MAC,3,0),COLOR0000AA;{紅色}

STICKLINE(MAC>=REF(MAC,1)ANDMAC>0,0,MAC,2,0),COLOR0000CC;

STICKLINE(MAC>=REF(MAC,1)ANDMAC>0,0,MAC,1,0),COLOR0000EE;

STICKLINE(MAC>=REF(MAC,1)ANDMAC>0,0,MAC,0.1,0),COLOR5555FF;

STICKLINE(MAC>=REF(MAC,1)ANDMAC>0,0,MAC,0,0),COLOR8080FF;

STICKLINE(MAC0,0,MAC,3,0),COLOR770077;{紫色}

STICKLINE(MAC0,0,MAC,2,0),COLOR990099;

STICKLINE(MAC0,0,MAC,1,0),COLORBB00BB;

STICKLINE(MAC0,0,MAC,0,0),COLORDD00DD;

STICKLINE(MAC0,0,MAC,0.1,0),COLORFF00FF;

STICKLINE(MAC>REF(MAC,1)ANDMAC<0,0,MAC,3,0),COLORFF0000;{藍色}

STICKLINE(MAC>REF(MAC,1)ANDMAC<0,0,MAC,2,0),COLORFF5500;

STICKLINE(MAC>REF(MAC,1)ANDMAC<0,0,MAC,1,0),COLORFF9900;

STICKLINE(MAC>REF(MAC,1)ANDMAC<0,0,MAC,0,0),COLORFFFF00;

STICKLINE(MAC<=REF(MAC,1)ANDMAC<0,0,MAC,3,0),COLOR155500;{綠色}

STICKLINE(MAC<=REF(MAC,1)ANDMAC<0,0,MAC,2,0),COLOR208000;

STICKLINE(MAC<=REF(MAC,1)ANDMAC<0,0,MAC,1,0),COLOR2BAA00;

STICKLINE(MAC<=REF(MAC,1)ANDMAC<0,0,MAC,0.1,0),COLOR35D500;

STICKLINE(MAC<=REF(MAC,1)ANDMAC<0,0,MAC,0,0),COLOR40FF00;

EMA(DIFF,26),CROSSDOT,COLORRED,LINETHICK2;

DIFF,COLORYELLOW;