通达信收阳K线收阴MACD K线副图指标 源码

CC:=FORCAST(C,3); OO:=FORCAST(O,3); HH:=FORCAST(H,3); LL:=FORCAST(L,3);
SHORT:=12; LONG:=26; M:=9;
{1.MACD}
DIF:EMA(CLOSE,12)-EMA(CLOSE,26);
DEA:EMA(DIF,9);
MACD:=(DIF-DEA)*2,COLORSTICK;
IF(DIF<REF(DIF,1),DIF,DRAWNULL),COLORGREEN;
IF(DIF>=REF(DIF,1),DIF,DRAWNULL),COLORRED;
{2.MACD的线}
{差可能是正,是负-----相当与DIFF}
DC:=WMA(CC,SHORT/2)-WMA(CC,LONG/2); {收盘价的DIFF}
DK:=WMA(OO,SHORT/2)-WMA(OO,LONG/2); {开盘价的DIFF}
DH:=(WMA(HH,SHORT/2)-WMA(HH,LONG/2))*1.25; {最高价的DIFF}
DL:=(WMA(LL,SHORT/2)-WMA(LL,LONG/2))*1.25; {最低价的DIFF}
{另类:收阳K线 -------收盘的DIFF>开盘的DIFF--------}
STICKLINE(DC>=DK,DH,DC,0,0),COLOR0099FF;
STICKLINE(DC>=DK,DL,DK,0,0),COLOR0099FF;
STICKLINE(DC>=DK,DC,DK,4,0),COLOR0F33AA;
STICKLINE(DC>=DK,DC,DK,3,0),COLOR0F55AA;
STICKLINE(DC>=DK,DC,DK,2,0),COLOR0F77CC;
STICKLINE(DC>=DK,DC,DK,1,0),COLOR0F99DD;
{另类:收阴K线 --------收盘的DIFF<开盘的DIFF-------}
STICKLINE(DC<DK,DH,DK,0,0),COLOR00FF99;
STICKLINE(DC<DK,DL,DC,0,0),COLOR00FF99;
STICKLINE(DC<DK,DC,DK,4,0),COLOR003300;
STICKLINE(DC<DK,DC,DK,3,0),COLOR006600;
STICKLINE(DC<DK,DC,DK,2,0),COLOR009900;
STICKLINE(DC<DK,DC,DK,1,0),COLOR00BB00;