主题：选股模型编写问题呢

code:STRTONUM(STKLABEL);//品种代码，读取品种代码之后加以判断
aa:0;//取到的值放在aa里面。
if code>600000 and code<699999 then
begin
a1:CALLSTOCK('SH000001',vtclose,6,-20);//20日前的收盘前
a2:CALLSTOCK('SH000001',vtclose,6,0);//当前收盘价
aa:=(a2-a1)/a1;
end

 

 

 

这里是一部分，剩下部分复制修改下，你需要修改这个几个地方。

1.code>600000 and code<699999 股票代码所在段的判断。

2.

1中判断的段不一样最终引用的目标值不一样。比如这里判断是上海的。那么下面的代码是SH000001，如果是别的相应的也要改下。

a1:CALLSTOCK('SH000001',vtclose,6,-20);//20日前的收盘前
a2:CALLSTOCK('SH000001',vtclose,6,0);//当前收盘价