量能布林，很好的

{量能布林}
VAR1:=VOL/((HIGH-LOW)*2-ABS(CLOSE-OPEN));
主动买盘:=IF(CLOSE>OPEN,VAR1*(HIGH-LOW),IF(CLOSE<OPEN,VAR1*((HIGH-OPEN)+(CLOSE-LOW)),VOL/2)),COLORRED,NODRAW;
主动卖盘:=IF(CLOSE>OPEN,0-VAR1*((HIGH-CLOSE)+(OPEN-LOW)),IF(CLOSE<OPEN,0-VAR1*(HIGH-LOW),0-VOL/2)),COLOR00FF00,NODRAW;
主净占盘:(主动买盘+主动卖盘)/CAPITAL*100,NODRAW;

A:=EMA(EMA(主净占盘,5),10);
MID:(EMA(A,3)+EMA(A,6)+EMA(A,12)+EMA(A,24))/4,COLOR00FFFF;
B:=REF(A,1);{www.tzj123.com}
UP:=MID+3*STD(MID,10);
DW:=MID-3*STD(MID,10);
STICKLINE(UP>REF(UP,1),UP,REF(UP,1),2,1),COLORFFFFFF;
STICKLINE(DW>REF(DW,1),DW,REF(DW,1),2,1),COLOR00FFFF;
STICKLINE(UP<REF(UP,1),UP,REF(UP,1),2,1),COLOR33FF33;
STICKLINE(DW<REF(DW,1),DW,REF(DW,1),2,1),COLOR33FF33;
持多:STICKLINE(A>B,A,B,2,0),COLORRED;
持空:STICKLINE(A<B,A,B,2,0),COLORFF0000;

十日飘红:COUNT(主净占盘>0,10),NODRAW;
五日飘红:COUNT(主净占盘>0,5),NODRAW;
连红: BARSLASTCOUNT(主净占盘>0),NODRAW;
连增:BARSLASTCOUNT(主净占盘>REF(主净占盘,1)),COLORRED,NODRAW;
连减:BARSLASTCOUNT(主净占盘<REF(主净占盘,1)),COLORGREEN,NODRAW;