【原】通达信MACD面积【副图】选股指标公式

{周期放大开关：1为普通模式，0为放大模式}
周期放大:=1;
数显开关:=1;
倍数:=
IF(PERIOD=11,1,{年}
IF(PERIOD=10,4,{季}
IF(PERIOD=9,6, {多日}
IF(PERIOD=8,10,{多分钟}
IF(PERIOD=7,12,{月}
IF(PERIOD=6,5, {周}
IF(PERIOD=5,5, {日}
IF(PERIOD=4,4, {60F}
IF(PERIOD=3,8, {30F}
IF(PERIOD=2,4, {15F}
IF(PERIOD=1,6, {5F}
IF(PERIOD=0,5, {1F}
1))))))))))));
N1:=IF(周期放大,12,12*倍数);
N2:=IF(周期放大,26,26*倍数);
N3:=IF(周期放大,9,9*倍数);
difF:ema(CLOSE,N1) - EMA(CLOSE,N2),COLORRED,NODRAW;
DEA:EMA(DIFF,N3),COLORBLUE,NODRAW;
macd: (DIFF-DEA)*2,COLORSTICK,NODRAW;
红柱面积:IF(MACD>0,SUM(MACD,BArslAST(MACD<0)),0),NODRAW,COLORWHITE;
绿柱面积:Abs(IF(MACD<0,SUM(MACD,BARSLAST(MACD>0)),0)),NODRAW,COLORLIBLUE;
MACD面积:=IF(MACD>0,红柱面积,绿柱面积),NODRAW,COLORFFFF00;
位置:=MAX(HHV(DIFF,100),ABS(LLV(DIFF,100)));
{柱变与交叉临界}
开盘价格:=O,COLORBLUE,NODRAW;
收盘价格:=C,COLORBLUE,NODRAW;
最高价格:=H,COLORBLUE,NODRAW;
最低价格:=L,COLORBLUE,NODRAW;
振幅:=(H-L)/REF(C,1)*100,COLORBLUE,NODRAW;
柱变临界:REF((EMA(CLOSE,12)*1134-EMA(CLOSE,26)*910-DEA*702)/224,1),COLORMAGENTA,NODRAW;
交叉临界:351/28*
(EMA(REF(DIFF,1),9)-11/13*EMA(REF(C,1),12)+25/27*EMA(REF(C,1),26)),COLORMAGENTA,NODRAW;
明日柱变临界: (EMA(CLOSE,12)*1134-EMA(CLOSE,26)*910-DEA*702)/224,COLORLIGREEN,NODRAW;
明日交叉临界:351/28*(EMA(DIFF,9)-11/13*EMA(C,12)+25/27*EMA(C,26)),COLORLIGREEN,NODRAW;
{MACD重建-避免遮挡}
STICKLINE(MACD>0,0,MACD,1,0),COLORWHITE;
STICKLINE(MACD<0,0,MACD,1,0),COLORCYAN;
STICKLINE(MACD>0 AND MACD<=REF(MACD,1),0,MACD,1,0),COLORBLUE;
STICKLINE(MACD<0 AND MACD>=REF(MACD,1),0,MACD,1,0),COLORRED;
NOTEXTDIFF:EMA(CLOSE,N1) - EMA(CLOSE,N2),COLORRED;
NOTEXTDEA:EMA(DIFF,N3),COLORBLUE;
{数显开关:1为打开,0为关闭}
DRAWNUMBER(数显开关=1 AND LONGcrOSS(DEA,DIFF,3),位置*0.8,REF(红柱面积,1)),COLORWHITE;
DRAWNUMBER(数显开关=1 AND LONGCROSS(DIFF,DEA,3),0-位置*0.5,REF(绿柱面积,1)),COLORCYAN;
NOTEXTLMH: DRAWNUMBER(数显开关=1 AND ISLASTBAR AND MACD>0,位置*0.8,红柱面积),COLORWHITE;
NOTEXTLML: DRAWNUMBER(数显开关=1 AND ISLASTBAR AND MACD<0,0-位置*0.5,绿柱面积),COLORCYAN;