标题：老师，看一下我这套策略写的对不对

if holding>0 and bj=0 and openprofit>=1000 then BEGIN
 sell(1,0,market);
 bj:=1;
end

if open>valuewhen(t=1,close)+1*t and bj=1 and s=t+1 then begin
 buy(1,1,market);
 t:=t+1;
 s:=s+1;
end

if bj=1 and holding>0 and openprofit>=1000 then begin
 sell(1,0,market);
 t:=1;
 s:=2;
end

variable:n=1,m=2;
variable:t=1,s=2;
Valuewhen(date<>ref(date,1),open);;

if open<valuewhen(t=1,close)-1*t  and s=t+1 then begin
 buyshort(1,1,market);
 t:=t+1;
 s:=s+1;
end

if holding<0 and openprofit>=1000 then begin
 sellshort(1,0,market);
 t:=1;
 s:=2;
end

variable:bj=0,n=1,m=2;
variable:t=1,s=2;
Valuewhen(date<>ref(date,1),open);
if open>30*n  and bj=0 and m=n+1 then begin
  buyshort(1,1,market);
 n:=n+1;
 m:=m+1;
end

variable:n=1,m=2;
variable:t=1,s=2;
Valuewhen(date<>ref(date,1),open);;