真实成交

 原作者：一发千钧}
JE:=VOL;
JJ:=(HIGH+LOW+CLOSE)/3;
QJ0:=VOL/IF(HIGH=LOW,4,HIGH-LOW);

主力买:(QJ0*(JJ-MIN(CLOSE,OPEN))),COLOR0000FF,NODRAW;
主力卖:(QJ0*(MIN(OPEN,CLOSE)-LOW)),COLOR00FF00,NODRAW;
散户买:(QJ0*(HIGH-MAX(OPEN,CLOSE))),COLORFF00FF,NODRAW;
散户卖:(QJ0*(MAX(CLOSE,OPEN)-JJ)),COLORFF8800,NODRAW;

总:VOL,STICK;
M5:MA(VOL,5),COLOR0080FF;
M35:MA(VOL,35);
M135:MA(VOL,135);

{虚拟量}
VVOL:IF(CURRBARSCOUNT=1 AND PERIOD=5,VOL*240/FROMOPEN,DRAWNULL),NODRAW;
STICKLINE(CURRBARSCOUNT=1 AND PERIOD=5,VVOL,0,-1,-1),COLOR00C0C0;

STICKLINE(H=L AND C<REF(C,1),0,JE,1,0),COLOR00EE00;
STICKLINE(H=L AND C>REF(C,1),0,JE,1,0),COLOR0000FF;
STICKLINE(散户卖>0,0,主力买+主力卖+散户买+散户卖,1,0),COLORFF8800;
STICKLINE(散户买>0,0,主力买+主力卖+散户买,1,0),COLORFF00FF;
STICKLINE(主力卖>0,0,主力买+主力卖,1,0),COLOR00FF00;
STICKLINE(主力买>0,0,主力买,1,0),COLOR0000FF;


仅提供源码