|
以下是很好的成交量优化（无密码，无未来）（无源码的请下载附件导入）
很好的成交量优化（无密码，无未来）
{}
DRAWRECTREL(0,0,285,999.2,IF(120,RGB(0,10,10),0));
超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),NODRAW;
超大单:=(超B)-(超S);
大单:=(大B)-(大S);
中单:=(中B)-(中S);
小单:=(小B)-(小S);
DAZHI:=CONST(MAX(ABS(净流入),MAX(ABS(超大单),MAX(ABS(大单),MAX(ABS(中单),ABS(小单)))))),NODRAW;
DRAWRECTREL(0,CONST(880-(ABS(净流入)*500/DAZHI)),50,930,IF(CONST(净流入)>0,RGB(255,0,0),RGB(23,125,255)));
DRAWRECTREL(58,CONST(880-(ABS(超大单)*500/DAZHI)),108,930,IF(CONST(超大单)>0,RGB(102,0,204),RGB(23,125,255)));
DRAWRECTREL(116,CONST(880-(ABS(大单)*500/DAZHI)),166,930,IF(CONST(大单)>0,RGB(255,0,0),RGB(23,125,255)));
DRAWRECTREL(174,CONST(880-(ABS(中单)*500/DAZHI)),224,930,IF(CONST(中单)>0,RGB(255,0,0),RGB(23,125,255)));
DRAWRECTREL(232,CONST(880-(ABS(小单)*500/DAZHI)),282,930,IF(CONST(小单)>0,RGB(255,0,0),RGB(0,128,0)));
DRAWTEXT_FIX(CURRBARSCOUNT=1,0.002,1,0,'净流入'),COLORRED;
DRAWTEXT_FIX(CURRBARSCOUNT=1,0.060,1,0,'超大单'),COLOR660099;
DRAWTEXT_FIX(CURRBARSCOUNT=1,0.126,1,0,'大单'),COLORRED;
DRAWTEXT_FIX(CURRBARSCOUNT=1,0.181,1,0,'中单'),COLORRED;
DRAWTEXT_FIX(CURRBARSCOUNT=1,0.241,1,0,'小单'),COLORGREEN;
{DRAWTEXT_FIX(CURRBARSCOUNT=1,0.0,0.001,0,'单位（万元）'),COLORYELLOW;}
DRAWTEXT_FIX(CURRBARSCOUNT=1,0,0,0,'资金博弈今日分类持仓 单位(万元)'),COLORYELLOW;
{M:=0.53;M1:=0.33;}M:=0.58;M1:=0.39;
DRAWNUMBER_FIX(CURRBARSCOUNT=1,0.001,0.790,0,CEILING(净流入));
DRAWNUMBER_FIX(CURRBARSCOUNT=1,0.059,0.790,0,CEILING(超大单));
DRAWNUMBER_FIX(CURRBARSCOUNT=1,0.116,0.790,0,CEILING(大单));
DRAWNUMBER_FIX(CURRBARSCOUNT=1,0.175,0.790,0,CEILING(中单));
DRAWNUMBER_FIX(CURRBARSCOUNT=1,0.232,0.790,0,CEILING(小单));
大宗进:=(超B)+(大B),NODRAW;
大宗出:=(超S)+(大S),NODRAW;
非大宗进:=(中B)+(小B),NODRAW;
非大宗出:=(中S)+(小S),NODRAW;
总流入比:=(超B+大B+中B+小B)/(超B+大B+中B+小B+超S+大S+中S+小S)*100,NODRAW;
总流出比:=(超S+大S+中S+小S)/(超B+大B+中B+小B+超S+大S+中S+小S)*100,NODRAW;
大宗进限制:=IF((超B+大B)=0,0,大宗进),NODRAW;
大宗出限制:=IF((超S+大S)=0,0,大宗出),NODRAW;
非大宗进限制:=IF(中B+小B=0,0,非大宗进),NODRAW;
非大宗出限制:=IF(中S+小S=0,0,非大宗出),NODRAW;
资金流向买:=大宗进限制+非大宗进限制;
资金流向卖:=大宗出限制+非大宗出限制;
流入比:=净流入*1000000/AMOUNT,NODRAW;
大宗净流入:=(超B+大B)-(超S+大S),NODRAW;
大宗流入比:=大宗净流入*1000000/AMOUNT,NODRAW;
DRAWRECTREL(50,110,285,55,RGB(0,100,0));
DRAWRECTREL(50,110,160,55,RGB(0,250,50));
DRAWRECTREL(50,110,50+CONST(总流入比*160/100),55,RGB(175,50,250));
DRAWTEXT_FIX(1,0.00,0.06,0,STRCAT(STRCAT('资金流向图 ',CON2STR(资金流向买,0)),' ')),COLORYELLOW;
DRAWTEXT_FIX(1,0.24,0.06,0,STRCAT(STRCAT(' ',CON2STR(资金流向卖,0)),' ')),COLORYELLOW;
大单流入:=(超B+大B)/(超B+大B+超S+大S)*100,NODRAW;
大单流入限制:=IF((超B+大B+超S+大S)=0,0,大单流入);
{大单流出比:=(超S+大S)/(超B+大B+超S+大S)*100,NODRAW;
大单流出限制:=IF((超B+大B+超S+大S)=0,0,大单流出比);}
大单买比:=LARGEINTRDVOL*100/(LARGEINTRDVOL+LARGEOUTTRDVOL),NODRAW;
大单卖比:=LARGEOUTTRDVOL*100/(LARGEINTRDVOL+LARGEOUTTRDVOL),NODRAW;
DRAWRECTREL(50,175,285,120,RGB(0,100,0));
DRAWRECTREL(50,175,285,120,RGB(0,250,50));
DRAWRECTREL(50,175,90+CONST(大单买比*160/100),120,RGB(200,0,50));
DRAWTEXT_FIX(1,0.00,0.12,0,STRCAT(STRCAT('逐笔大单比 ',CON2STR(大单买比,0)),' ')),COLORYELLOW;
DRAWTEXT_FIX(1,0.24,0.12,0,STRCAT(STRCAT(' ',CON2STR(大单卖比,0)),' ')),COLORYELLOW;
成交总量:=(超B+大B+中B+小B+超S+大S+中S+小S),NODRAW;
机构参与度:=(超B+超S+大B+大S)/成交总量*100,COLORYELLOW,NODRAW;
DRAWRECTREL(50,240,285,191,RGB(0,250,50));
DRAWRECTREL(50,240,285,191,RGB(200,0,50));
DRAWRECTREL(50,240,50+CONST(大宗流入比*160/100),191,RGB(175,50,250));
DRAWTEXT_FIX(1,0.27,0.19,1,STRCAT(STRCAT('机构介入度 ',CON2STR(大宗流入比,0)),' ')),COLORYELLOW;
DRAWRECTREL(50,305,285,255,RGB(200,0,50));
DRAWRECTREL(50,305,160,255,RGB(200,0,50));
DRAWRECTREL(50,305,50+CONST(流入比*160/100),255,RGB(175,50,250));
DRAWTEXT_FIX(1,0.27,0.25,1,STRCAT(STRCAT('资金介入度 ',CON2STR(流入比,0)),' ')),COLORYELLOW;
19388697.jpg
|
