通达信大小单分时主图指标公式

量:=SUM(V,FROMOPEN);
现:=100*(C-REF(C,1))/REF(C,1);
大买:=SUM(IF(现>0 AND V>=500,V,0),FROMOPEN);
大卖:=SUM(IF(现<0 AND V>=500,V,0),FROMOPEN);
B1:=大买/量*100;
B2:=大卖/量*100;
DRAWRECTREL(600,CONST(100-B1)*1000/100,620,1000,RGB(255,0,0))COLOR000000;
DRAWRECTREL(625,CONST(100-B2)*1000/100,645,1000,RGB(0,255,0))COLOR000000;
DRAWTEXT_FIX(PERIOD=0,0,8,0,STRCAT(STRCAT('【大买】',CON2STR(B1,2)),'％')),COLOR0000FF;
DRAWTEXT_FIX(PERIOD=0,0.2,8,0,STRCAT(STRCAT('【大卖】',CON2STR(B2,2)),'％')),COLOR00FF00;
小买:=SUM(IF(现>0 AND V<500,V,0),FROMOPEN);
小卖:=SUM(IF(现<0 AND V<500,V,0),FROMOPEN);
B3:=小买/量*100;
B4:=小卖/量*100;
DRAWRECTREL(650,CONST(100-B3)*1000/100,670,1000,90);
DRAWRECTREL(675,CONST(100-B4)*1000/100,695,1000,RGB(0,255,0));
DRAWTEXT_FIX(PERIOD=0,0.6,8,0,STRCAT(STRCAT('【小买】',CON2STR(B3,2)),'％')),COLOR0000FF;
DRAWTEXT_FIX(PERIOD=0,0.8,8,0,STRCAT(STRCAT('【小卖】',CON2STR(B4,2)),'％')),COLOR00FF00;