CYC:=BARSLAST(DATE<>REF(DATE,1))+1;
cpj:VALUEWHEN(CYC=1,OPEN);
qatr:stkindi(\'\',\'atr.atr\',0,6,-1);
variable:s=0;
variable:m=0;
if h>=cpj+qatr and s=0 and time>=090000 and time<145800 then begin
sellshort(1,0,market);
buy(1,1,market);
s:=1;
hhh:=h;
zs:=qatr;
end
if holding>0 and h>hhh then begin
hhh:=h;
end
if l<=cpj-qatr and m=0 and time>=090000 and time<145800 then begin
sell(1,0,market);
buyshort(1,1,market);
m:=1;
lll:=l;
zs:=qatr;
end
if holding<0 and l<lll then begin
lll:=l;
end