//用循环语句写成的历史流通盘公式
//说明：本公式，无法计算增发、职工股上市等情形，公式原型为原子兄用VBS设计的代码
var1:=splitdata(1)+splitdata(2);
cap:=c;
cap[datacount]:=1;
for i=datacount downto 2 do cap[i-1]:=cap[i]/(1+var1[i]/10);
capi:=cap*capital/100;
历史流通盘∥万股:capi;
drawnumber(cap>ref(cap,1) or barscount(c)=1,capi,capi,0);

[[i] 本帖最后由 hx817 于 2008-5-4 23:57 编辑 [/i]]

以前一个根据除权数据来推算历史流通盘的公式

谢谢