[通达信指标]三款MACD面积公式

DIFF:EMA(CLOSE,12) – EMA(CLOSE,26);

DEA:EMA(DIFF,9);

MACD:2*(DIFF-DEA),NODRAW;

绿柱面积:10*IF(MACD<0,SUM(MACD,BARSLAST(MACD>0)),0),NODRAW,COLOR00FF00;

红柱面积:10*IF(MACD>0,SUM(MACD,BARSLAST(MACD<0)),0),NODRAW,COLORRED;

DRAWNUMBER(REF(MACD,1)>0 AND MACD<=0 ,HHV(MACD,4),REF(红柱面积,1))COLORRED;

DRAWNUMBER(REF(MACD,1)<0 AND MACD>=0 ,LLV(MACD,4),REF(ABS(绿柱面积),1)),COLOR00FF00;

DRAWNUMBER(ISLASTBAR AND MACD<0,LLV(MACD,8),ABS(绿柱面积))COLORWHITE;

DRAWNUMBER(ISLASTBAR AND MACD>0,HHV(MACD,4),ABS(红柱面积)),COLORYELLOW;

D1:=(CROSS(DIFF,DEA));

K1:=(CROSS(DEA,DIFF));

倒数1红面积:REF(红柱面积,SUMBARS(K1,1)),COLORRED,NODRAW;

倒数2红面积:REF(红柱面积,SUMBARS(K1,2)),COLORRED,NODRAW;

倒数1绿面积:REF(ABS(绿柱面积),SUMBARS(D1,1)),COLORGREEN,NODRAW;

倒数2绿面积:REF(ABS(绿柱面积),SUMBARS(D1,2)),COLORGREEN,NODRAW;

MACDHS:=(MACD>0 AND MACD>REF(MACD,1));

MACDHX:=(MACD>0 AND MACD<REF(MACD,1));

MACDLX:=(MACD<0 AND MACD<REF(MACD,1));

MACDLS:=(MACD<0 AND MACD>REF(MACD,1));

{公众号：  量化爱好者之家}

STICKLINE(MACDHS,0,MACD,3,0),COLORBB0000;

STICKLINE(MACDHS,0,MACD,2.5,0),COLORCC0000;

STICKLINE(MACDHS,0,MACD,2,0),COLORCC0000;

STICKLINE(MACDHS,0,MACD,1.5,0),COLORDD0000;

STICKLINE(MACDHS,0,MACD,1,0),COLORDD3300;

STICKLINE(MACDHS,0,MACD,0.5,0),COLOREE5533;

STICKLINE(MACDHS,0,MACD,0,0),COLOREE7766;

STICKLINE(MACDHS,0,MACD,0,0),COLORFF8888;

STICKLINE(MACDHS,0,MACD,0,0),COLORFF9999;

STICKLINE(MACDLS,0,MACD,3,0),COLORBB7700;

STICKLINE(MACDLS,0,MACD,2.5,0),COLORCC8800;

STICKLINE(MACDLS,0,MACD,2,0),COLORCC9900;

STICKLINE(MACDLS,0,MACD,1.5,0),COLORDDAA00;

STICKLINE(MACDLS,0,MACD,1,0),COLORDDBB11;

STICKLINE(MACDLS,0,MACD,0.5,0),COLOREECC22;

STICKLINE(MACDLS,0,MACD,0,0),COLOREEDD33;

STICKLINE(MACDLS,0,MACD,0,0),COLORFFEE44;

STICKLINE(MACDLS,0,MACD,0,0),COLORFFFF55;

STICKLINE(MACDHX,0,MACD,3,0),COLORBB7700;

STICKLINE(MACDHX,0,MACD,2.5,0),COLORCC8800;

STICKLINE(MACDHX,0,MACD,2,0),COLORCC9900;

STICKLINE(MACDHX,0,MACD,1.5,0),COLORDDAA00;

STICKLINE(MACDHX,0,MACD,1,0),COLORDDBB11;

STICKLINE(MACDHX,0,MACD,0.5,0),COLOREECC22;

STICKLINE(MACDHX,0,MACD,0,0),COLOREEDD33;

STICKLINE(MACDHX,0,MACD,0,0),COLORFFEE44;

STICKLINE(MACDHX,0,MACD,0,0),COLORFFFF55;

STICKLINE(MACDLX,MACD,0,3,0),COLOR007700;

STICKLINE(MACDLX,MACD,0,2.5,0),COLOR009900;

STICKLINE(MACDLX,MACD,0,2,0),COLOR00AA00;

STICKLINE(MACDLX,MACD,0,1.5,0),COLOR00BB00;

STICKLINE(MACDLX,MACD,0,1,0),COLOR11CC11;

STICKLINE(MACDLX,MACD,0,0.5,0),COLOR22DD22;

STICKLINE(MACDLX,MACD,0,0,0),COLOR33FF33;

STICKLINE(MACDLX,MACD,0,0,0),COLOR44FF44;

STICKLINE(MACDLX,MACD,0,0,0),COLOR55FF55;

S:=26;

M:=9;

DIFF:EMA(C,P) – EMA(C,S);

DEA:EMA(DIFF,M);

MACD值:2*(DIFF-DEA),COLORSTICK; 

BV:=SUM(MACD值,0);

BA:=IF(MAX(BV,REF(BV,2))<REF(BV,1) OR MIN(BV,REF(BV,2))>REF(BV,1),1,0);

BC:=BARSLAST(BA)+1;

SMACD:=BV-REF(BV,BC);

VAR3:=IF(MACD值>0,HHV(ABS(MACD值),BC),LLV(MACD值,BC));

VAR4:=(MACD值)/20;

面积:SMACD,NODRAW;

DRAWNUMBER(REF(VAR4,1)>0 AND VAR4<=0 ,REF(VAR3,1),REF(面积,1)),COLORMAGENTA;

DRAWNUMBER(REF(VAR4,1)<0 AND VAR4>=0 ,REF(VAR3,1),REF(ABS(面积),1)),COLORGREEN;

DRAWNUMBER(ISLASTBAR AND VAR4<0,REF(VAR3,1),ABS(面积)),COLORMAGENTA;

DRAWNUMBER(ISLASTBAR AND VAR4>0,REF(VAR3,1),面积),COLORGREEN;

DEA:EMA(DIF,9),COLORRED;

MACD:(DIF-DEA)*2,COLORSTICK,NODRAW;

ZX:=MACD;

HMJ:SUM(MACD,BARSLAST(MACD<0))*(MACD>0),NODRAW;

LMJ:SUM(MACD,BARSLAST(MACD>0))*(MACD<0),NODRAW;

AA:=INTPART(REF(LMJ,1)*100);

BB:=INTPART(REF(HMJ,1)*100);

DRAWNUMBER(CROSS(0,MACD),HHV(REF(MACD,1),5)+0.03,ABS(BB)),COLORGREEN;

DRAWNUMBER(CROSS(MACD,0),LLV(REF(MACD,1),5)-0.03,ABS(AA)),COLORMAGENTA;

DRAWNUMBER(CROSS(DIF,DEA),DIF,DIF),COLORRED;

DRAWNUMBER(CROSS(DEA,DIF),DIF,DIF),COLORGREEN;

STICKLINE(ZX>0 AND ZX>REF(ZX,1) ,0 , ZX,2,0 ),COLORRED;

STICKLINE(ZX>0 AND ZX<REF(ZX,1) ,0 , ZX, 2,0 ), COLORYELLOW;

STICKLINE(ZX<0 AND ZX>REF(ZX,1) ,0 , ZX,2 ,0 ),COLORGREEN;

STICKLINE(ZX<0 AND ZX<REF(ZX,1) ,0 , ZX,2,0 ),COLORMAGENTA;

IF(DIF<REF(DIF,1),DIF,DRAWNULL),COLORGREEN;

IF(DEA<REF(DEA,1),DEA,DRAWNULL),COLORGREEN;