variable:bj=0,n=1,m=2;
variable:t=1,s=2;
ma5:=ma(c,5);
if ma5<10*n and bj=0 and m=n+1 then begin
sellshort((1,1,market);
n:=n+1;
m:=m+1;
end
if holding>0 and bj=0 and openprofit>=1000 then BEGIN
sell(1,0,market);
bj:=1;
end
if ma5<valuewhen(t=1,close)+10*t and bj=1 and s=t+1 then begin
sellshort((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;
ma5:=ma(c,5);
if ma5<valuewhen(t=1,close)-10*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