制个看盘面版 把"资金分布图"放进 可时正常 时不正常 请老师帮帮 谢谢
{资金图叠加主图}
{N 1.0 100.0 1.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;
净流入:=SUM(ABS(超B+大B+中B+小B),N)-SUM(ABS(超S+大S+中S+小S),N),NODRAW;
超大单:=SUM((ABS(超B)-ABS(超S)),N);
大单:=SUM(ABS(大B),N)-SUM(ABS(大S),N);
中单:=SUM(ABS(中B),N)-SUM(ABS(中S),N);
小单:=SUM(ABS(小B),N)-SUM(ABS(小S),N);
DAZHI:=CONST(MAX(ABS(净流入),MAX(ABS(超大单),MAX(ABS(大单),MAX(ABS(中单),ABS(小单)))))),NODRAW;
总流入比:=SUM((超B+大B+中B+小B),N)/SUM((超B+大B+中B+小B+超S+大S+中S+小S),N)*100,NODRAW;
总流出比:=SUM((超S+大S+中S+小S),N)/SUM((超B+大B+中B+小B+超S+大S+中S+小S),N)*100,NODRAW;
大宗进:=SUM(((超B)+(大B)),N),NODRAW;
大宗出:=SUM(((超S)+(大S)),N),NODRAW;
非大宗进:=SUM(((中B)+(小B)),N),NODRAW;
非大宗出:=SUM(((中S)+(小S)),N),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;
大宗净流入:=SUM(((超B+大B)-(超S+大S)),N),NODRAW;
大宗流入比:=大宗净流入*1000000/AMOUNT,NODRAW;
{空方}
DRAWRECTREL(20,1000,350,935,RGB(0,135,0));
DRAWRECTREL(20,1000,350,940,RGB(0,140,0));
DRAWRECTREL(20,995,350,945,RGB(0,145,0));
DRAWRECTREL(20,990,350,950,RGB(0,150,0));
DRAWRECTREL(20,985,350,955,RGB(0,165,0));
DRAWRECTREL(20,980,350,960,RGB(0,180,0));
DRAWRECTREL(20,975,350,965,RGB(0,195,0));
DRAWRECTREL(20,970,350,970,RGB(0,210,0));
{多方}
DRAWRECTREL(20,1000,20+CONST(总流入比*350/100),935,RGB(108,0,0));
DRAWRECTREL(20,1000,20+CONST(总流入比*350/100),940,RGB(128,0,0));
DRAWRECTREL(20,995,20+CONST(总流入比*350/100),945,RGB(148,0,0));
DRAWRECTREL(20,990,20+CONST(总流入比*350/100),950,RGB(168,0,0));
DRAWRECTREL(20,985,20+CONST(总流入比*350/100),955,RGB(188,0,0));
DRAWRECTREL(20,980,20+CONST(总流入比*350/100),960,RGB(208,0,0));
DRAWRECTREL(20,975,20+CONST(总流入比*350/100),965,RGB(228,0,0));
DRAWRECTREL(20,970,20+CONST(总流入比*350/100),970,RGB(248,0,0));
DRAWRECTREL(20+CONST(总流入比*350/100),1000,20+CONST(总流入比*350/100),935,RGB(130,0,0));{多空交接线}
{修边}
DRAWRECTREL(195,900,195.2,1000,RGB(0,0,10));
DRAWRECTREL(21,900,21,1000,RGB(0,0,10));
DRAWRECTREL(351,900,351,1000,RGB(0,0,10));
{主力买卖---------------问题出于此段,搞不定了 ! }
TESTSKIP(NOT(超B OR 大B OR 中B OR 小B OR 超S OR 大S OR 中S OR 小S)!=0);
统计额:=SUM((ABS(超B)+ABS(大B)+ABS(超S)+ABS(大S)+ABS(中B)+ABS(小B)+ABS(中S)+ABS(小S)),N),NODRAW;
DAZHIV:=CONST(MAX(ABS(统计额),MAX(ABS(大宗进),MAX(ABS(大宗出),MAX(ABS(非大宗进),ABS(非大宗出)))))),NODRAW;
{买}
{DRAWRECTREL(20+CONST(大宗进*238/DAZHIV),960,195,980,RGB(0,0,0));{?}
DRAWRECTREL(195-CONST(大宗进*238/DAZHIV),960,195-CONST(大宗进*238/DAZHIV),980,RGB(0,0,0));
DRAWRECTREL(195,980,195-CONST(大宗进*238/DAZHIV),960,RGB(108,0,0));
DRAWRECTREL(195,975,195-CONST(大宗进*238/DAZHIV),965,RGB(128,0,0));
DRAWRECTREL(195,970,195-CONST(大宗进*238/DAZHIV),970,RGB(148,0,0));
DRAWRECTREL(195,965,195-CONST(大宗进*238/DAZHIV),975,RGB(168,0,0));
DRAWRECTREL(195,960,195-CONST(大宗进*238/DAZHIV),980,RGB(188,0,0));
{卖}
DRAWRECTREL(195+CONST(大宗出*238/DAZHIV),960,195+CONST(大宗出*238/DAZHIV),980,RGB(0,0,0));{?}
DRAWRECTREL(195+CONST(大宗出*238/DAZHIV),980,195,967,RGB(0,135,0));
DRAWRECTREL(195+CONST(大宗出*238/DAZHIV),975,195,968,RGB(0,140,0));
DRAWRECTREL(195+CONST(大宗出*238/DAZHIV),970,195,969,RGB(0,145,0));
DRAWRECTREL(195+CONST(大宗出*238/DAZHIV),965,195,970,RGB(0,150,0));
DRAWRECTREL(195+CONST(大宗出*238/DAZHIV),960,195,980,RGB(0,155,0));
图:
|