免费分笔BBD的一种想法！~

前段时间写一个免费BBD的东东，不过中间有其他事，一直没继续完，现在公布出来，顺便说说思路，希望能给有些老师或同学一点帮助。如果对您有用，希望您能动动手，帮顶一下，只为了让需要的人看到，谢谢！~
{委买1委卖1数量}
B:BIDVOL(1),LINETHICK0;
S:ASKVOL(1),LINETHICK0;
{委买1委卖1价格}
BJ:BIDPRICE(1),LINETHICK0;
SJ:ASKPRICE(1),LINETHICK0;

{上一笔时委买1委卖1数量及价格}
B1:=REF(B,1);
BJ1:=REF(BJ,1);
S1:=REF(S,1);
SJ1:=REF(SJ,1);
{理论上是可以多记录几档的}

MMVOL:VOL,LINETHICK0;{本笔成交量}
HBBD:=IF(VOL =1000 OR CLOSE*VOL*100 =200000,VOL,0);{我是以 成交金额大于 20 万 或者 成交数量大于 1000手 认为是大单}

{判断HBBD是卖出或是买入单}
{买入}
HMBBD:=IF((HBBD 0 AND ((S S1 AND BJ=BJ1 AND SJ=SJ1 ) OR BJ BJ1 OR SJ SJ1 OR CLOSE REF(CLOSE,1)) AND BJ 0 ) OR (BJ=0 AND CLOSE REF(CLOSE,1)),HBBD,0);
HMBBD:=IF(BJ=BJ1 AND B B1,HMBBD-(B1-B),HMBBD);
{卖出}
HMBSD:=IF((HBBD 0 AND (BJ BJ1 OR (B B1 AND BJ=BJ1 AND SJ=SJ1 ) OR SJ SJ1 OR CLOSE REF(CLOSE,1) ) AND SJ 0) OR (SJ=0 AND CLOSE REF(CLOSE,1)),HBBD,0);
HMBSD:=IF(SJ=SJ1 AND S S1,HMBSD-(S1-S),HMBSD);

{计算买入与卖出的单差}
MFVOL:(SUM(HMBBD,0)-SUM(HMBSD,0));
如果你仔细看你会发现这个指标有一个极为严重的问题，就是没有考虑在涨停与跌停时的买入与卖出，如何排除的问题，其实很简单，加几个条件就可以了，由于本人比较懒没写，希望有兴趣的可以去折腾折腾。