'2018-12-18T16:09:42
'22:01 31/07/2022
'DATESTAMPER
'% filename   "OxyDateTimeStamper.exe"
'uses RTL32
#compact
uses TimeUtil
string s=getfile("main.inc")
if len s then
  int a=instr(s,"o2datetimestamp")
  if a then
    a=instr(a,s,chr(34))-1
    string ti=TimeStr()
    string d=chr(34)+left(ti,19)+chr(34)
    int b=instr(a,s,chr(13))
    s=left(s,a)+d+mid(s,b)
    putfile "main.inc",s
  end if
end if
