通达信【新改编主动买卖盘】（ 副图源码改编）

以下是通达信【新改编主动买卖盘】（ 副图源码改编）

本指标是根据 @杨小宝XX 老师的《主动买卖盘》基础上改编而成.

    在量柱的基础上增加：预测量、量比、换手率和主动买卖盘。

   原《主动买卖盘》指标在显示主动买盘时有些缺陷，因程序运行时是从上往下，有先后的，所以当主动买盘小于主动卖盘时，主动买盘红柱就被主动卖盘绿柱掩盖了（见附图）。

   经改编后主动买卖盘以百分比显示彩柱，淡洋红色为主动买盘，深绿色为主动卖盘，就是以深绿色为背景，以淡洋红色从下往上覆盖来显示比例。为了区别于量柱，主动买卖盘柱比量设置细了一点，这样可以看清量柱随K线涨跌而改变的红、青颜色。

   为方便朋友们理解，在源码中有分段提示。

量:VOL,VOLSTICK;

{预测量}

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

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

预测量:IF(DYNAINFO(7)=CLOSE AND DYNAINFO(10)=AMOUNT,VAR1,VAR2);

STICKLINE(IF(DYNAINFO(7)=CLOSE AND DYNAINFO(10)=AMOUNT,VAR1,VAR2),0,VAR1,4,1);

{量比}

TT:=IF(HOUR>12,(HOUR-13)*60+MINUTE+120,(HOUR-9)*60+MINUTE-30);

P:=IF(ISLASTBAR,BARSLAST(TT=1),0);

T:=BACKSET(P,P+1);

VV:=IF(T=1,V,0);

量比:100*DYNAINFO(17)*(SUM(VV,TT)/TT)/(DYNAINFO(8)/FROMOPEN),;

换手率％:VOL/CAPITAL*100;

{主动买卖盘}

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

主动买盘:=IF(CLOSE>OPEN,AA*(HIGH-LOW),IF(CLOSE<OPEN,AA*((HIGH-OPEN)+(CLOSE-LOW)),VOL/2)),COLORRED;

主动卖盘:=IF(CLOSE>OPEN,0-AA*((HIGH-CLOSE)+(OPEN-LOW)),IF(CLOSE<OPEN,0-AA*(HIGH-LOW),0-VOL/2)),COLORGREEN;

主动买盘％:主动买盘/VOL*100,COLOR6600FF,NODRAW;

主动卖盘％:ABS(主动卖盘/VOL*100),COLOR008800,NODRAW;

STICKLINE(VOL>0,0,VOL,0.8,0),COLOR008800;

STICKLINE(主动买盘>0,0,主动买盘,0.8,0),COLOR6600FF;