通达信副图源码:主动买卖盘拆解(源码)

{QS 量能买卖副图：按价格波动把成交量分摊到买卖两侧，同时给出预测量、换手率、流通盘与成交额}

{实际成交量，单位万手}

实际量（万）:VOL/10000,LINETHICK0;

{预测全日量：量比乘前一日 5 日均量；第二行判断当前是否为当日实时数据}

QS_PREDVOL:=DYNAINFO(17)*REF(MA(VOL,5),1);

QS_RTFLAG:=DYNAINFO(7)=CLOSE AND DYNAINFO(10)=AMOUNT;

预测:IF(DYNAINFO(7)=CLOSE AND DYNAINFO(10)=AMOUNT,QS_PREDVOL,QS_RTFLAG)/10000;

预测量:STICKLINE(IF(DYNAINFO(7)=CLOSE AND DYNAINFO(10)=AMOUNT,QS_PREDVOL,QS_RTFLAG),QS_PREDVOL,0,4,1),COLORGREEN;

{量能分配基数：单位价格波动承载的成交量，买卖分摊都用它}

QS_VOLDIST:=VOL/((HIGH-LOW)*2-ABS(CLOSE-OPEN));

{主动买盘：阳线取整根振幅，阴线取上影加实体上半，平盘对半分}

QS_BUYVOL:=IF(CLOSE>OPEN,QS_VOLDIST*(HIGH-LOW),IF(CLOSE<OPEN,QS_VOLDIST*((HIGH-OPEN)+

(CLOSE-LOW)),VOL/2)),POINTDOT,COLORRED;

主动买（万）:QS_BUYVOL/10000,COLORRED,NODRAW;

{主动卖盘：阴线取整根振幅，阳线取下影加实体下半，平盘对半分，取负值}

QS_SELLVOL:=IF(CLOSE>OPEN,0-QS_VOLDIST*((HIGH-CLOSE)+(OPEN-LOW)),IF(CLOSE<OPEN,

0-QS_VOLDIST*(HIGH-LOW),0-VOL/2)),LINETHICK0,COLORGREEN;

主动卖（万）:QS_SELLVOL/10000,COLORGREEN,NODRAW;

{基础数据：换手率按流通股本计算，流通盘单位为亿股，成交额单位为千万元}

换手率％:VOL/CAPITAL*100,POINTDOT,COLORYELLOW;

流通盘（亿）:CAPITAL/1000000,POINTDOT;

流通市值（亿）:(CAPITAL/100*C)/10000,POINTDOT,COLOR33CCFF;

成交额（千万）:AMOUNT/10000000,POINTDOT;

{买卖柱：白框柱标总量，品红柱标主动买盘，绿柱标主动卖盘，正上负下}

STICKLINE(QS_BUYVOL>0,0,VOL,2,1),COLORWHITE;

STICKLINE(QS_BUYVOL>0,0,QS_BUYVOL,2,0),COLORMAGENTA;

STICKLINE(QS_SELLVOL<0,0,-VOL,2,1),COLORWHITE;

STICKLINE(QS_SELLVOL<0,0,QS_SELLVOL,2,0),COLORGREEN;