通达信买卖大小单分时指标公式

现:=100*(C-REF(C,1))/REF(C,1);
量:=SUM(V,FROMOPEN);
大买:=SUM(IF(现>=0 AND V>CAPITAL*0.0005 AND PERIOD=0,V,0),FROMOPEN);
大卖:=SUM(IF(现<0 AND V>CAPITAL*0.0005 AND PERIOD=0,V,0),FROMOPEN);
小买:=SUM(IF(现>=0 AND V<CAPITAL*0.0005 AND PERIOD=0,V,0),FROMOPEN);
小卖:=SUM(IF(现<0 AND V<CAPITAL*0.0005 AND PERIOD=0,V,0),FROMOPEN);
B1:=100*大买/量;
B2:=100*大卖/量;
B3:=100*小买/量;
B4:=100*小卖/量;
{NOFRAME}
DRAwrECTREL(433,CONST(100-B1)*1000/100,459,1000,RGB(255,0,0));
DRAWRECTREL(469,CONST(100-B2)*1000/100,494,1000,RGB(0,255,0));
DRAWRECTREL(505,CONST(100-B3)*1000/100,526,1000,RGB(128,0,0));
DRAWRECTREL(536,CONST(100-B4)*1000/100,557,1000,RGB(0,128,0));
DRAWTEXT_FIX(PERIOD=0,0.4355,8,0,CON2STR(B1,0)) COLORFFFFFF;
DRAWTEXT_FIX(PERIOD=0,0.4713,8,0,CON2STR(B2,0)) COLORFF0000;
DRAWTEXT_FIX(PERIOD=0,0.5053,8,0,CON2STR(B3,0)) COLORFFFFFF;
DRAWTEXT_FIX(PERIOD=0,0.5388,8,0,CON2STR(B4,0)) COLORFF0000;