OnStop

function OnStop()
  message(string.format("OnStop %s (%s)", osTime(), tostring(os.clock())))
  return 5000
end

function osTime()
  local _date = os.date("*t")
  return string.format("%02d:%02d:%02d",_date.hour, _date.min, _date.sec)
end

function main() 
  while true do
    message(string.format("main... %s (%s)", osTime(), tostring(os.clock())))
    sleep(1000)
  end
end

local run = true

local function Print(text)
  PrintDbgStr(os.clock() .. ' ' .. text)
end

function main()
  while run do
    sleep(100)
    Print('main')
  end
  sleep(4000)
  Print('Quit')
end
function OnStop(s)
  Print('OnStop')
  run = nil
  _sleep(3000)   -- Здесь вы можете добавить некоторую работу, выполняющуюся на вашем компьютере определённое количество времени
  Print('OnStop')
  return 5000
end