超B:=L2_AMO(0,2)/10000.0;
大B:=L2_AMO(1,2)/10000.0;
中B:=L2_AMO(2,2)/10000.0;
小B:=L2_AMO(3,2)/10000.0;
超S:=L2_AMO(0,3)/10000.0;
大S:=L2_AMO(1,3)/10000.0;
中S:=L2_AMO(2,3)/10000.0;
小S:=L2_AMO(3,3)/10000.0;
TESTSKIP(NOT(超B OR 大B OR 中B OR 小B OR 超S OR 大S OR 中S OR 小S)!=0);
净流入:=(超B+大B+中B+小B)-(超S+大S+中S+小S);
超大单:=(超B)-(超S);
大单:=(大B)-(大S);
中单:=(中B)-(中S);
小单:=(小B)-(小S);
DAZHI:=CONST(MAX(ABS(净流入),MAX(ABS(超大单),MAX(ABS(大单),MAX(ABS(中单),ABS(小单)))))),NODRAW;
近3净入:=SUM(净流入,3);
近3超:=SUM(超大单,3);
近3大:=SUM(大单,3);
近3中:=SUM(中单,3);
近3小:=SUM(小单,3);
近5净入:=SUM(净流入,5);
近5超:=SUM(超大单,5);
近5大:=SUM(大单,5);
近5中:=SUM(中单,5),;
近5小:=SUM(小单,5);
近10净入:=SUM(净流入,10);
近10超:=SUM(超大单,10);
近10大:=SUM(大单,10);
近10中:=SUM(中单,10),;
近10小:=SUM(小单,10);
流入:=ABS(超B+大B+中B+小B)*1000/VOL;
流出:=ABS(超S+大S+中S+小S)*1000/VOL;
近3流入:=ABS(SUM(超B,3)+SUM(大B,3)+SUM(中B,3)+SUM(小B,3))*1000/VOL;
近3流出:=ABS(SUM(超S,3)+SUM(大S,3)+SUM(中S,3)+SUM(小S,3))*1000/VOL;
近5流入:=ABS(SUM(超B,5)+SUM(大B,5)+SUM(中B,5)+SUM(小B,5))*1000/VOL;
近5流出:=ABS(SUM(超S,5)+SUM(大S,5)+SUM(中S,5)+SUM(小S,5))*1000/VOL;
近10流入:=ABS(SUM(超B,10)+SUM(大B,10)+SUM(中B,10)+SUM(小B,10))*1000/VOL;
近10流出:=ABS(SUM(超S,10)+SUM(大S,10)+SUM(中S,10)+SUM(小S,10))*1000/VOL;
净流买比:=流入*100/(流入+流出);
净流买比3:=近3流入*100/(近3流入+近3流出);
净流买比5:=近5流入*100/(近5流入+近5流出);
净流买比10:=近10流入*100/(近10流入+近10流出);
AAS:=CONST(MAX(ABS(流入),ABS(流出)))*4,NODRAW;
{当日}
DRAWRECTREL(0,0,243,999.2,IF(120,RGB(10,0,0),0));
{DRAWTEXT_FIX(CURRBARSCOUNT=1,0.0,0.001,0,'单位（万元）'),COLORDDDDDD;}
DRAWRECTREL(10,ABS(CONST(880-(ABS(净流入)*50/DAZHI))),25,880,IF(CONST(净流入)>0,RGB(170,0,170),RGB(0,155,0)));
DRAWRECTREL(48,ABS(CONST(880-(ABS(超大单)*50/DAZHI))),80,880,IF(CONST(超大单)>0,RGB(240,130,140),RGB(23,125,255)));
DRAWRECTREL(96,ABS(CONST(880-(ABS(大单)*50/DAZHI))),128,880,IF(CONST(大单)>0,RGB(255,0,0),RGB(23,125,255)));
DRAWRECTREL(144,ABS(CONST(880-(ABS(中单)*50/DAZHI))),176,880,IF(CONST(中单)>0,RGB(255,0,0),RGB(23,125,255)));
DRAWRECTREL(192,ABS(CONST(880-(ABS(小单)*50/DAZHI))),224,880,IF(CONST(小单)>0,RGB(255,0,0),RGB(23,125,255)));
DRAWRECTREL(30,205,190,145,RGB(0,140,0));
DRAWRECTREL(30,195,190,155,RGB(0,160,0));
DRAWRECTREL(30,185,190,165,RGB(0,180,0));
DRAWRECTREL(30,175,190,175,RGB(0,210,0));
DRAWRECTREL(30,205,30+CONST(净流买比*160/100),145,RGB(140,0,0));
DRAWRECTREL(30,195,30+CONST(净流买比*160/100),155,RGB(160,0,0));
DRAWRECTREL(30,185,30+CONST(净流买比*160/100),165,RGB(180,0,0));
DRAWRECTREL(30,175,30+CONST(净流买比*160/100),175,RGB(210,0,0));
DRAWTEXT_FIX(1,0.05,0.01,0,STRCAT(STRCAT('净流买比',CON2STR(净流买比,2)),'％')),COLORYELLOW;
DRAWRECTREL(110,205,110,145,RGB(250,250,0));
DRAWTEXT_FIX(CURRBARSCOUNT=1,0.2,0.001,0,'当日'),COLORFFFFFF;
DRAWTEXT_FIX(CURRBARSCOUNT=1,0.005,1,0,'净流'),COLORFFFFFF;
DRAWTEXT_FIX(CURRBARSCOUNT=1,0.050,1,0,'超大'),COLOR00FFFF;
DRAWTEXT_FIX(CURRBARSCOUNT=1,0.095,1,0,'大单'),COLORRED;
DRAWTEXT_FIX(CURRBARSCOUNT=1,0.145,1,0,'中单'),COLORRED;
DRAWTEXT_FIX(CURRBARSCOUNT=1,0.192,1,0,'小单'),COLORGREEN;
DRAWNUMBER_FIX(CURRBARSCOUNT=1,0.005,0.79,0,CEILING(净流入)),COLORYELLOW;
DRAWNUMBER_FIX(CURRBARSCOUNT=1,0.048,0.71,0,CEILING(超大单)),COLORYELLOW;
DRAWNUMBER_FIX(CURRBARSCOUNT=1,0.096,0.63,0,CEILING(大单)),COLORYELLOW;
DRAWNUMBER_FIX(CURRBARSCOUNT=1,0.148,0.55,0,CEILING(中单)),COLORYELLOW;
DRAWNUMBER_FIX(CURRBARSCOUNT=1,0.192,0.47,0,CEILING(小单)),COLORYELLOW;
{3日}
DRAWRECTREL(243,0,505,999.2,IF(120,RGB(10,0,0),0));
DRAWRECTREL(260,ABS(CONST(880-(ABS(近3净入)*35/DAZHI))),275,880,IF(CONST(近3净入)>0,RGB(180,0,180),RGB(000,155,000)));
DRAWRECTREL(301,ABS(CONST(880-(ABS(近3超)*35/DAZHI))),333,880,IF(CONST(近3超)>0,RGB(240,130,140),RGB(23,125,255)));
DRAWRECTREL(349,ABS(CONST(880-(ABS(近3大)*35/DAZHI))),381,880,IF(CONST(近3大)>0,RGB(255,0,0),RGB(23,125,255)));
DRAWRECTREL(397,ABS(CONST(880-(ABS(近3中)*35/DAZHI))),429,880,IF(CONST(近3中)>0,RGB(255,0,0),RGB(23,125,255)));
DRAWRECTREL(445,ABS(CONST(880-(ABS(近3小)*35/DAZHI))),477,880,IF(CONST(近3小)>0,RGB(255,0,0),RGB(23,125,255)));
DRAWRECTREL(280,205,440,145,RGB(0,155,0));
DRAWRECTREL(280,205,280+CONST(净流买比3*160/100),145,RGB(160,0,0));
DRAWTEXT_FIX(1,0.3,0.01,0,STRCAT(STRCAT('净流买比',CON2STR(净流买比3,2)),'％')),COLORYELLOW;
DRAWRECTREL(360,205,360,145,RGB(250,250,0));
DRAWTEXT_FIX(CURRBARSCOUNT=1,0.460,0.001,0,'3日'),COLORFFFFFF;
DRAWTEXT_FIX(CURRBARSCOUNT=1,0.260,1,0,'净流'),COLORFFFFFF;
DRAWTEXT_FIX(CURRBARSCOUNT=1,0.305,1,0,'超大'),COLOR00FFFF;
DRAWTEXT_FIX(CURRBARSCOUNT=1,0.353,1,0,'大单'),COLORRED;
DRAWTEXT_FIX(CURRBARSCOUNT=1,0.400,1,0,'中单'),COLORRED;
[1] [2] 下一页
