发现一个很不错的免费股票资金分析系统！！ [推广有奖]

11楼

bewithjessie 发表于 2007-11-29 10:54:00

以下披露该套分析系统的代码，有兴趣者修改。

a:=BUYVOL*c/100;
bz:=SUM(a,0);
b:=SELLVOL*c/100;
sz:=SUM(b,0);
z:=bz+sz;
cz:=bz-sz;
xb5:=IF(a<=5 ,a,0);b5:=SUM(xb5,0);
xs5:=IF(b<=5 ,b,0);s5:=SUM(xs5,0);
xb20:=IF(a<=20 and a>5 ,a,0);b20:=SUM(xb20,0);
xs20:=IF(b<=20 and b>5,b,0);s20:=SUM(xs20,0);
xb50:=IF(a<=50 and a>20 ,a,0);b50:=SUM(xb50,0);
xs50:=IF(b<=50 and b>20 ,b,0);s50:=SUM(xs50,0);
xb55:=IF(a>50 ,a,0);b55:=SUM(xb55,0);
xs55:=IF(b>50 ,b,0);s55:=SUM(xs55,0);
xb100:=IF(a<=100 and a>50,a,0);b100:=SUM(xb100,0);
xs100:=IF(b<=100 and b>50,b,0);s100:=SUM(xs100,0);
xb150:=IF(a>100 ,a,0);b150:=SUM(xb150,0);
xs150:=IF(b>100 ,b,0);s150:=SUM(xs150,0);
xb300:=IF(a>300 ,a,0);b300:=SUM(xb300,0);
xs300:=IF(b>300 ,b,0);s300:=SUM(xs300,0);
xb500:=IF(a>500 ,a,0);b500:=SUM(xb500,0);
xs500:=IF(b>500 ,b,0);s500:=SUM(xs500,0);
j5:=b5-s5;
j20:=b20-s20;
j50:=b50-s50;
j55:=b55-s55;
j100:=b100-s100;
j150:=b150-s150;
j300:=b300-s300;
j500:=b500-s500;
总金额:=DYNAINFO(10)/10000;
买入金额:=bz;{买入金额}
卖出金额:=sz;{卖出金额}
净买入金额:cz;{买入-卖出}
五万以下:=j5;{5W以下}
二十万以下:=j20;{5W-20W}
二十至五十:=j50;{20W-50W}
五十万以上:=j55;{50W以上}
五十至一百:=j100;{50W~100W}
一百万以上:j150;{100W以上}
三百万以上:j300;{300W以上}
五百万以上:j500;{500W以上};