{钱庄风向} a:=BUYVOL*DYNAINFO(7)/100;
bz:=SUM(a,0);
b:=SELLVOL*DYNAINFO(7)/100;
sz:=SUM(b,0);
z:=bz+sz;
cz:=bz-sz;
总买:bz,COLOR0000FF,LINETHICK2;{扩展数据1}
总卖:sz,COLOR00FF00,LINETHICK2;;{扩展数据2}
总额:bz+sz,COLOR0066FF,LINETHICK2;;{扩展数据3}
总净:cz,COLOR00FFFF,LINETHICK2;;{扩展数据4}
{L2大盘--风向标}
DRAWGBKLAST(c>0,STRIP(RGB(0,0,0),RGB(0,0,153),0)),colorFF3333;
DRAWTEXTREL(220,18,STKLABEL),LINETHICK4,Colorffff00;
DRAWTEXTREL(300,18,STKNAME),LINETHICK4,Color00ffff;
{www.fxjgsw.com}
{画直方图}
DRAWRECTREL(0,0,200,499,RGB(0,51,0));
DRAWRECTREL(0,0,200,268,RGB(0,0,0));
DRAWRECTABS(0,0,210,16,rgb(0,102,0)),coloryellow;
DRAWTEXTREL(6,8,'大盘风向标(%)'), colorbbffff;
bz:=SELFDATA('总买');
sz:=SELFDATA('总卖');
z:=SELFDATA('总额');
大盘买卖差:=bz/z*100-sz/z*100;
当天:大盘买卖差,COLOR0099FF,LINETHICK0;
大盘资金流速:IF(bz/z*100>=50,bz/z*100-50,IF(bz/z*100<50,-sz/z*100+50,0)),COLORFF00FF,LINETHICK0;{个股资金流速统计};
0,POINTDOT,COLOR00FFFF,LINETHICK1;
{www.fxjgsw.com}
一天:=ma(当天,1);
三天:ma(当天,3),LINETHICK1,Colorwhite;
五天:ma(当天,5),LINETHICK2,Coloryellow;
十天:ma(当天,10),LINETHICK3,ColorFF00FF;
廿天:ma(当天,20),LINETHICK4,Colorgreen;
{显示数字}
IF BARSTATUS=2 and (一天) THEN BEGIN DRAWTEXTREL(76,118,''+NUMTOSTRN(一天,2)),LINETHICK3,COLORccffcc;end;
IF BARSTATUS=2 and (一天) THEN BEGIN DRAWTEXTREL(153,118,''+NUMTOSTRN(三天,2)),LINETHICK3,COLORccffcc;end;
IF BARSTATUS=2 and (一天) THEN BEGIN DRAWTEXTREL(76,330,''+NUMTOSTRN(五天,2)),LINETHICK3,COLORccffcc;end;
IF BARSTATUS=2 and (一天) THEN BEGIN DRAWTEXTREL(153,330,''+NUMTOSTRN(十天,2)),LINETHICK3,COLORccffcc;end;
{显示文字}
DRAWTEXTREL(9,60,'近期趋势:'), color00ffff,LINETHICK2;
DRAWTEXTREL(78,206,'1'), colorffffff,LINETHICK2;
DRAWTEXTREL(87,206,'天'), colorffffff,LINETHICK2;
DRAWTEXTREL(157,206,'3'), colorffffff,LINETHICK2;
DRAWTEXTREL(168,206,'天'), colorffffff,LINETHICK2;
DRAWTEXTREL(9,280,'远期趋势:'), colorffff00,LINETHICK2;
DRAWTEXTREL(78,420,'5'), colorffffff,LINETHICK2;
DRAWTEXTREL(88,420,'天'), colorffffff,LINETHICK2;
DRAWTEXTREL(155,420,'10'), colorffffff,LINETHICK2; |
