主题：请老师帮我编写一个程序

我想编写一个股票交易模型

N:=INTPART（(7-C)/0.05);

T=（(7-C)/0.05；

买入条件：T=N，并且现在的价格低于上次买入的价格，买入量为10*N；

 

卖出条件：价格等于1.

大概是这么个意思，请老师给我帮帮忙

老师，这个是取整函数啊

因为我对金字塔的编写结构不是很熟悉，所以还多多麻烦老师了

老师，这里不需要四舍五入，只需要取整就可以了。

n:=INTPART((7-c)/0.05);
T:=(7-C)/0.05；
if date=1120502 and time=093100 then begin
 buy(1,1,THISCLOSE);
 
end

if  t=n and c<enterprice then buy(1,10*n,THISCLOSE);

if h>=1 and c<=1 then  sell(1,1,THISCLOSE);

修改之后的程序差不多是这个样子。

但是在计算的时候，出了问题。应该是每0.05就买入一次的，但是实际上每隔0.25才买入一次。还请老师帮我看看问题出在哪里

我的模型的判断依据就是(7-c)/0.05在取整的时候买入。所以就应该是每0.05买入。而且我不需要四舍五入。我从计算的结果看到的，但是也有点问题，因为结果显示有四十多次交易，但是明细上只有几次，不知道哪个是对的

老师，我需要多次连续买入，所以holding这里进行限制是不行的。按照你的思路，我做了回测，结果有点混乱。

这是我修改过的模型

 T:=(7-C)/0.05；
 n:=INTPART(t);

cond:=mod(t*20*10,10)=0;
if date=1120502 and time=093100 then begin
 buy(1,1,THISCLOSE);
end

if  cond and c<enterprice then buy(1,10*n,THISCLOSE);

if c<=1 then  sell(1,10,THISCLOSE);

这个没事，但是结果不对啊，你可以随便拿一只价格低于7元的股票试试，结果非常混乱

老师，你这个只能买一次，看不出来问题啊。我需要的是一个多次连续买入的模型，所以holding函数必须去掉。而且我采用在一个确定时间买入1手的动作，是因为后面需要对前面的买入价格进行对比。既然买入了而且没有卖出，这个时候holding肯定不为零。

所以你这个程序是没办法实现的，需要进行修改，而且既然如此了，m也就成为一个不需要的参数了。所以我才把它去掉了

呵呵，公式无效

 
t:=(7-C)/0.05；
n:=INTPART(t);

variable:m=0;

cond:=mod(t*20*10,10)=0;
if holding=0 and cond and m=0  and date=1120502 and time=093100 then begin
 buy(1,1,market);
 m:=1;
end

if  m=1 and cond and l<enterprice and h>enterprice or h<enterprice then buy(1,10*n,market);

if h>=1 and l<=1 then  sell(1,10,market);
 

这是现在的，一个交易都没有。老师你可以自己测试一下看看