var5:=buyvol;
var6:=sellvol;
x0:=50000;
x1:=150000;
x2:=500000;
x3:=2000000;
x4:=4000000;
特买:=IF(AMOUNT>=x4,Var5,0);
特卖:=IF(AMOUNT>=x4,Var6,0);
主买:=IF(AMOUNT<x4 and amount>=x3,Var5,0);
主卖:=IF(AMOUNT<x4 and amount>=x3,Var6,0);
大买:=IF(AMOUNT<x3 and amount>=x2,Var5,0);
大卖:=IF(AMOUNT<x3 and amount>=x2,Var6,0);
游买:=IF(AMOUNT<x2 and amount>=x1,Var5,0);
游卖:=IF(AMOUNT<x2 and amount>=x1,Var6,0);
中买:=IF(AMOUNT<x1 and amount>=x0,Var5,0);
中卖:=IF(AMOUNT<x1 and amount>=x0,Var6,0);
小买:=IF(AMOUNT<x0,Var5,0);
小卖:=IF(AMOUNT<x0,Var6,0);
特买量:=sum(特买,0);
特卖量:=sum(特卖,0);
主买量:=sum(主买,0);
主卖量:=sum(主卖,0);
大买量:=sum(大买,0);
大卖量:=sum(大卖,0);
游买量:=sum(游买,0);
游卖量:=sum(游卖,0);
中买量:=sum(中买,0);
中卖量:=sum(中卖,0);
小买量:=sum(小买,0);
小卖量:=sum(小卖,0);
小量差:=小买量-小卖量;
中量差:=中买量-中卖量;
游量差:=游买量-游卖量;
大量差:=大买量-大卖量;
主量差:=主买量-主卖量;
特量差:=特买量-特卖量;
主力量差:=游量差+大量差+主量差+特量差;
总量:=sum(vol,0);
flow:=capital/100;
xbb:=小买量/总量;
xsb:=小卖量/总量;
mbb:=中买量/总量;
msb:=中卖量/总量;
ybb:=游买量/总量;
ysb:=游卖量/总量;
dbb:=大买量/总量;
dsb:=大卖量/总量;
zbb:=主买量/总量;
zsb:=主卖量/总量;
tbb:=特买量/总量;
tsb:=特卖量/总量;
allc:=xbb+xsb+mbb+msb+ybb+ysb+dbb+dsb+zbb+zsb+tbb+tsb;
left1:=120;
right1:=left1+xbb*400;
left2:=right1;
right2:=left2+xsb*400;
left3:=right2;
right3:=left3+mbb*400;
left4:=right3;
right4:=left4+msb*400;
left5:=right4;
right5:=left5+ybb*400;
left6:=right5;
right6:=left6+ysb*400;
left7:=right6;
right7:=left7+dbb*400;
left8:=right7;
right8:=left8+dsb*400;
left9:=right8;
right9:=left9+zbb*400;
left10:=right9;
right10:=left10+zsb*400;
left11:=right10;
right11:=left11+tbb*400;
left12:=right11;
right12:=left12+tsb*400;
y1:=15;
y2:=25;
drawtextabs(10,y1,'混合比例'),colorwhite;
DRAWRECTABS(left1-2, y1-2 ,left1+402, y2+3 ,RGB(30,30,30)),colorgray,linethick2;
DRAWRECTABS(left1, y1 ,right1, y2 ,RGB(50,0,0)),colorblack,linethick0;
DRAWRECTABS(left2, y1 ,right2, y2 ,RGB(0,50,0)),colorblack,linethick0;
DRAWRECTABS(left3, y1 ,right3, y2 ,RGB(80,0,0)),colorblack,linethick0;
DRAWRECTABS(left4, y1 ,right4, y2 ,RGB(0,80,0)),colorblack,linethick0;
DRAWRECTABS(left5, y1 ,right5, y2 ,RGB(130,0,0)),colorblack,linethick0;
DRAWRECTABS(left6, y1 ,right6, y2 ,RGB(0,130,0)),colorblack,linethick0;
DRAWRECTABS(left7, y1 ,right7, y2 ,RGB(180,0,0)),colorblack,linethick0;
DRAWRECTABS(left8, y1 ,right8, y2 ,RGB(0,180,0)),colorblack,linethick0;
DRAWRECTABS(left9, y1 ,right9, y2 ,RGB(210,0,0)),colorblack,linethick0;
DRAWRECTABS(left10, y1 ,right10, y2 ,RGB(0,210,0)),colorblack,linethick0;
DRAWRECTABS(left11, y1 ,right11, y2 ,RGB(240,0,0)),colorblack,linethick0;
DRAWRECTABS(left12, y1 ,right12, y2 ,RGB(0,240,0)),colorblack,linethick0;
drawtextabs(10,y1+20,'游资比例:'+(ybb-ysb)*100),colorwhite;
DRAWRECTABS(left1-2, y1-2+20 ,left1+402, y2+3+20 ,RGB(30,30,30)),colorgray,linethick2;
r1:=left1+ybb*400;
l2:=r1;
r2:=l2+ysb*400;
DRAWRECTABS(left1, y1+20 ,r1, y2+20 ,RGB(130,0,0)),colorblack,linethick0;
DRAWRECTABS(l2, y1+20 ,r2, y2+20 ,RGB(0,130,0)),colorblack,linethick0;
drawtextabs(10,y1+20*2,'大资比例:'+(dbb-dsb)*100),colorwhite;
DRAWRECTABS(left1-2, y1-2+20*2 ,left1+402, y2+3+20*2 ,RGB(30,30,30)),colorgray,linethick2;
rr1:=left1+dbb*400;
ll2:=rr1;
rr2:=ll2+dsb*400;
DRAWRECTABS(left1, y1+20*2 ,rr1, y2+20*2 ,RGB(180,0,0)),colorblack,linethick0;
DRAWRECTABS(ll2, y1+20*2 ,rr2, y2+20*2 ,RGB(0,180,0)),colorblack,linethick0;
drawtextabs(10,y1+20*3,'主资比例:'+(zbb-zsb)*100),colorwhite;
DRAWRECTABS(left1-2, y1-2+20*3 ,left1+402, y2+3+20*3 ,RGB(30,30,30)),colorgray,linethick2;
rrr1:=left1+zbb*400;
lll2:=rrr1;
rrr2:=lll2+zsb*400;
DRAWRECTABS(left1, y1+20*3 ,rrr1, y2+20*3 ,RGB(210,0,0)),colorblack,linethick0;
DRAWRECTABS(lll2, y1+20*3 ,rrr2, y2+20*3 ,RGB(0,210,0)),colorblack,linethick0;
drawtextabs(10,y1+20*4,'特资比例:'+(tbb-tsb)*100),colorwhite;
DRAWRECTABS(left1-2, y1-2+20*4 ,left1+402, y2+3+20*4 ,RGB(30,30,30)),colorgray,linethick2;
rrrr1:=left1+tbb*400;
llll2:=rrrr1;
rrrr2:=llll2+tsb*400;
DRAWRECTABS(left1, y1+20*4 ,rrrr1, y2+20*4 ,RGB(240,0,0)),colorblack,linethick0;
DRAWRECTABS(llll2, y1+20*4 ,rrrr2, y2+20*4 ,RGB(0,240,0)),colorblack,linethick0;
zllc:=(tbb+zbb+dbb+ybb)-(tsb+zsb+dsb+ysb);
drawtextabs(10,y1+20*5,'游上累差:'+zllc*100),colorwhite;
DRAWRECTABS(left1-2, y1-2+20*5 ,left1+402, y2+3+20*5 ,RGB(30,30,30)),colorgray,linethick2;
rrrrr1:=left1+abs(zllc*400);
DRAWRECTABS(left1, y1+20*5 ,rrrrr1, y2+20*5 ,if(zllc>0, RGB(250,0,0) , RGB(0,250,0))),colorblack,linethick0;
drawtextabs(left1+75,y1+20*5.6,'|20%'),colorgray;
drawtextabs(left1+155,y1+20*5.6,'|40%'),colorgray;
drawtextabs(left1+235,y1+20*5.6,'|60%'),colorgray;
drawtextabs(left1+315,y1+20*5.6,'|80%'),colorgray; |
