
var:op(0),hi(0),lo(0),cl(0),str("");
if t=0920 then begin
op=o;
hi=h;
lo=l;
cl=c;
end;
str=numtostr(date,0)+","+numtostr(op,0)+","+numtostr(hi,0)+","+numtostr(lo,0)+","+numtostr(cl,0);
once filedelete("C:\data.txt");
if t=0920 then fileappend("C:\data.txt",str+newline);