VMACD副图 源码 说明

今天高兴送全码量潮MACD指标，此指标为飞狐，如果是其它软件请自己调整函数。量能指标仅仅供参考，必须结合形态进行分析研判

源码

DRAWGBK(DATE>900101,COLORRGB(110,95,0),COLORRGB(0,20,0),1);
STICKLINE(C>0,0,0,10,0),COLORGRAY;
zxj:=if((H-MAX(C,O))>((MIN(C,O)-L)) AND C>L,((H+2*L)/3+3*C+2*O)/6,
IF((H-MAX(C,O))<((MIN(C,O)-L)) AND C 均价:=if(DATATYPE>=6 AND DATATYPE<10,AMOUNT/(VOL*100),zxj);
重心:=if(STKTYPE=0,zxj,(zxj+均价)/2);
VV:=AMOUNT/100000000;
LB:=(MA(VV,1)/HHV(VV,0)+MA(VV,1)/HHV(VV,IF(N=0,0,IF(n=1,738,if(N=2,369,184)))))/2;
XS:=2;
s:=if((H-MAX(C,O))>ABS(C-O)AND (MIN(C,O)-L) x:=IF((MIN(C,O)-L)>ABS(C-O)AND (H-MAX(C,O)) sx:=IF(c>REF(C,1)and H>REF(H,1)AND 重心>REF(重心,1),S,IF(c qr:=(0.809*C+0.191*sx);
obv:=SUM(IF(qr>REF(qr,1),vv,IF(qr wobv:=(WMA(obv,2)+WMA(obv,4)+WMA(obv,8))/3;
sAobv:=(WMA(wobv,24)+WMA(wobv,6)+WMA(wobv,12))/3,LINEDOT,COLORFAABEC;
sbobv:=(WMA(sAobv,24)+WMA(sAobv,6)+WMA(sAobv,12))/3,LINEDOT;
skobv:=(WMA(sbobv,24)+WMA(sbobv,6)+WMA(sbobv,12))/3,LINEDOT;
soobv:=(WMA(skobv,24)+WMA(skobv,6)+WMA(skobv,12))/3,LINEDOT;
Swobv:=((wobv+SBobv)/2+SAobv)/2,LINETHICK2;
DLv21:=EMA(Swobv,13);
DLv36:=EMA(Swobv,34);
DLv60:=EMA(Swobv,55);
rOBY:=DMA(Swobv,LB/xs);
sOBV:=DMA(Swobv,LB/XS/xs);
YOBV:=DMA(Swobv,LB/XS/XS/xs);
SSOBC:=DMA(Swobv,LB/XS/XS/XS/xs),COLORFAABEC,COLORRED,LINETHICK2;
LOBV:=DMA(Swobv,LB/XS/XS/XS/XS/xs),COLOR00bb00;
QROBV:(((sOBV-SSOBC)/2+(YOBV-SSOBC))/2+(((wobv-sbobv)/2+sAobv-sbobv)/2+(Swobv-DLv21)+((DLv21-DLv60)/2+DLv36-DLv60)/2))/4,COLOR00CCCC;
MQR:MA(qrobv,8),COLORGRAY;
FILLRGN(QROBV>=MQR,QROBV,MQR),COLORBROWN;
FILLRGN(QROBV OBc:((sOBV-SSOBC+rOBY-YOBV)/2+(wobv-sbobv+(wobv-soobv)/