variable:x:=0,y:=0;
if time>000930 and time<001530 and A and x=0 then
begin
sellshort(1,0,market);
buy(1,1,market);
x:=x+1;
end
if time>000930 and time<001530 and b and y=0 then
begin
sell(1,0,market);
buyshort(1,1,market);
y:=y+1;
end
if time>000930 and time<001530 and A and C and x=1 then
begin
buy(1,1,market);
end
if time>000930 and time<001530 and A and x=1 then
begin
sellshort(1,0,market);
end
if time>000930 and time<001530 and B and D and y=1 then
begin
buyshort(1,1,market);
end
if time>000930 and time<001530 and B and y=1 then
begin
sell(1,0,market);
end