通达信主图成交量图源码
通达信主图成交量图源码
{DG-V}
{GH:8,548,58;GF:8,68,48;}
万手:VOL/10000,LINETHICK0,NODRAW;
BB:=VOL/((H-L)*2-ABS(C-O));
主动买:=IF(C>O,BB*(H-L),IF(C<O,BB*((H-O)+(C-L)),V/2));
主买:主动买/10000,COLORRED,NODRAW;
主动卖:=IF(C>O,0-BB*((H-C)+(O-L)),IF(C<O,0-BB*(H-L),0-VOL/2));
主卖:-主动卖/10000,COLORGREEN,NODRAW;
差额:(主动买+主动卖)/10000,COLORFFFF00,NODRAW;
AAA:=CONST(LLV(L,GH))*0.85;
AV:=(V/((EMA(VOL,250)/EMA(C,250))*GF));
TC:=C/AV;TH:=H/AV;TL:=L/AV;TO:=O/AV;
ZB:=AV/((TH-TL)*2-ABS(TC-TO));
ZM:=IF(TC>TO,ZB*(TH-TL),IF(TC<TO,ZB*((TH-TO)+(TC-TL)),AV/2));
ZP:=IF(TC>TO,0-ZB*((TH-TC)+(TO-TL)),IF(TC<TO,0-ZB*(TH-TL),0-AV/2));
AA:=IF(CURRBARSCOUNT=1 AND PERIOD=5,AV*240/FROMOPEN,DRAWNULL);
STICKLINE(CURRBARSCOUNT=1 AND PERIOD=5,AA+AAA,0+AAA,2,0),COLOR0055FF;{预测VOL}
STICKLINE(ZM>0,AAA,ZM+AAA,0.5,0),COLORYELLOW;
STICKLINE(ZP<0,AV+AAA,ZM+AAA,0.5,0),COLORAAAA00;
MA5:MA(C,5),COLORFFFFFF,LINETHICK1;
MA10:MA(C,10),COLORFF00FF,LINETHICK1;
MA20:MA(C,20),COLOR00FFFF,LINETHICK1;
{公式在线提供：www.gszx.com.cn}
