macd叠加通达信公式 副图 源码附图

M:=30;

DIF:=EMA(CLOSE,12)-EMA(CLOSE,26);

DEA:=EMA(DIF,9);

MACD:=(DIF-DEA)*2;

OBVH:=CONST(HHV(OBV,FROMOPEN));

OBVL:=CONST(LLV(OBV,FROMOPEN));

DIFH:=CONST(HHV(DIF,FROMOPEN));

DIFL:=CONST(LLV(DIF,FROMOPEN));

X:=(OBVH-OBVL)/(DIFH-DIFL); 

XBASE:=(OBVH+OBVL)/2;

XDIF:DIF*X+XBASE,COLORWHITE;

XDEA:EMA(XDIF,9),COLORYELLOW;

XMACD:=MACD*X;

STICKLINE(XMACD>0,XBASE,XMACD+XBASE,0,1),COLORRED,LINETHICK2;

STICKLINE(XMACD<0,XBASE,XMACD+XBASE,0,1),COLORFFFF00,LINETHICK2;

VA:=IF(CLOSE>REF(CLOSE,1),VOL,-VOL);

OBV:SUM(IF(CLOSE=REF(CLOSE,1),0,VA),0)COLORGRAY;

MAOBV:MA(OBV,M),DOTLINE,COLORLIRED;

N:=10;{股票指标网}

A1:=REF(OBV,N)=HHV(OBV,2*N+1);

B1:=FILTER(A1,N);

C1:=BACKSET(B1,N+1);

D1:=FILTER(C1,N);

T线:REF(OBV,BARSLAST(D1)),COLORFF6600,NODRAW;

STICKLINE(C>0,T线,T线,6,0),COLORFF6600;

DRAWICON(CROSS(OBV,T线),T线*0.99,1);

 

原理解析：
M赋值:30
DIF赋值:收盘价的12日指数移动平均-收盘价的26日指数移动平均
DEA赋值:DIF的9日指数移动平均
MACD:=(DIF-DEA)*2
OBVH赋值:CONST(FROMOPEN日内OBV最高值)
OBVL赋值:CONST(FROMOPEN日内OBV最低值)
DIFH:=CONST(FROMOPEN日内DIF最高值)
DIFL:=CONST(FROMOPEN日内DIF最低值)
X赋值:(OBVH-OBVL)/(DIFH-DIFL)
 
XBASE:=(OBVH+OBVL)/2
X输出DIF:DIF*X+XBASE,画白色
X输出DEA:XDIF的9日指数移动平均,画黄色
XMACD:=MACD*X
当满足条件XMACD>0时,在XBASE和XMACD+XBASE之间画柱状线
当满足条件XMACD<0时,在XBASE和XMACD+XBASE之间画柱状线
VA赋值:IF(收盘价>1日前的收盘价,成交量,-成交量)
输出OBV:SUM(IF(收盘价=1日前的收盘价,0,VA),0)COLORGRAY
MA输出OBV:OBV的M日简单移动平均,DOTLINE,COLORLIRED
N赋值:10
{股票指标网}
A1赋值:N日前的OBV=2*N+1日内OBV最高值
B1赋值:A1的N过滤
C1赋值:BACKSET(B1,N+1)
D1赋值:C1的N过滤
输出T线:REF(OBV,上次D1距今天数),COLORFF6600,NODRAW
当满足条件C>0时,在T线和T线之间画柱状线
DRAWICON(OBV上穿T线,T线*0.99,1)