通达信指标公式源码 MACD 暴风面积 副图源码.docVIP

{MACD扩展公式 *暴风音符* }{周期放大开关：1为普通模式，0为放大模式}倍数:=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(周期放大,6,6*倍数);N2:=IF(周期放大,19,19*倍数);N3:=IF(周期放大,9,9*倍数);DIFF:EMA(CLOSE,N1) - EMA(CLOSE,N2),COLORWHITE,NODRAW;DEA:EMA(DIFF,N3),COLORYELLOW,NODRAW;MACD: (DIFF-DEA)*2,COLORSTICK,NODRAW;红柱面积:=IF(MACD0,SUM(MACD,BARSLAST(MACD0)),0),NODRAW,COLORRED;绿柱面积:=ABS(IF(MACD0,SUM(MACD,BARSLAST(MACD0)),0)),NODRAW,COLORLIGREEN;MACD面积:=IF(MACD0,红柱面积,绿柱面积),NODRAW,COLORFFFF00;位置:=MAX(HHV(DIFF,100),ABS(LLV(DIFF,100))); {柱变与交叉临界}开盘价格:=O,COLORYELLOW,NODRAW;收盘价格:=C,COLORYELLOW,NODRAW;最高价格:=H,COLORYELLOW,NODRAW;最低价格:=L,COLORYELLOW,NODRAW;振幅:=(H-L)/REF(C,1)*100,COLORYELLOW,NODRAW;柱变临界:REF((EMA(CLOSE,12)*1134-EMA(CLOSE,26)*910-DEA*702)/224,1),COLORLIMAGENTA,NODRAW;交叉临界:351/28*(EMA(REF(DIFF,1),9)-11/13*EMA(REF(C,1),12)+25/27*EMA(REF(C,1),26)),COLORLIMAGENTA,NODRAW;明日柱变: (EMA(CLOSE,6)*1134-EMA(CLOSE,19)*910-DEA*702)/224,COLORLIBLUE,NODRAW;明日交叉:351/28*(EMA(DIFF,9)-11/13*EMA(C,12+25/27*EMA(C,26)),COLORLIBLUE,NODRAW; {MACD重建-避免遮挡}STICKLINE(MACD0,0,MACD,1,0),COLORRED;STICKLINE(MACD0,0,MACD,1,0),COLORGREEN;STICKLINE(MACD0 AND MACD=REF(MACD,1),0,MACD,1,0),COLORYELLOW;STICKLINE(MACD0 AND MACD=REF(MACD,1),0,MACD,1,0),COLORWHITE;NOTEXTDIFF:EMA(CLOSE,N1) - EMA(CLOSE,N2),COLORWHITE;NOTEXTDEA:EMA(DIFF,N3),COLORYELLOW; {数显开关:1为打开,0为关闭}DRAWNUMBER(数显开关=1 AND LONGCROSS(DEA,DIFF,3),位置*0.8,REF(红柱面积,1)),COLORRED;DRAWNUMBER(数显开关=1 AND LONGCROSS(DIFF,DEA,3),0-位置*0.5,REF(绿柱面积,1)),COLORGREEN;NOTEXTLMH: DRAWNUMBER(数显开关=1 AND ISLASTBAR AND MACD0,位置*0.8,红柱面积),COLORRED;NOTEXTLML: DRAWNUMBER(数显开关=1 AND ISLASTBAR AND MACD0,0-位置*0.5,绿柱面积),COLORGREEN;