[PEL] 复制代码 variable:iszs:=0;//最近一次是否止损信号
ma5:ma(c,5);
ma20:ma(c,20);
ma30:ma(c,30);
kd:=cross(ma5,ma20);
pd:=cross(ma20,ma5);
kk:=cross(ma20,ma5);
pk:=cross(ma20,ma30);
if kd and iszs<=0 and holding=0 then
begin
buy(1,1,market);
end
if pd then sell(1,holding,market);
if avgenterprice-c>=10*mindiff and holding>0 then
begin
多止损:sell(1,holding,market);
iszs:=1;
end
if kk and iszs>=0 and holding=0 then
begin
buyshort(1,1,market);
end
if pk then sellshort(1,holding,market);
if c-avgenterprice=10*mindiff and holding>0 then
begin
空止损:sellshort(1,holding,market);
iszs:=-1;
end
用全局变量 在止损地方进行控制就行 了。 |