checkpoints={
-- checkpoints argument: tilex, tiley
     {12,56}     -- example checkpoint id 1
}
stats={}
-- stats argument ischeckpoint id, health, armor, weapon
addhook("movetile","idlersmove")
function idlersmove(id,x,y)
     for num, val in ipairs(checkpoints) do
          if x==val[1] and y==val[2] then
               stats[id].checkpoints={num,player(id,"health"),player(id,"armor")}
               stats[id].weapons=playerweapons(id)
               msg2(id,string.char(169).."255255255Your status has been saved")
          end
     end
     if x==checkpoints[11].[1] and y==checkpoints[11].[2] then
          stats[id].checkpoints={0,0,0}
     end
end

addhook("spawn","idlersspawn")
function idlersspawn(id)
     if stats[id].checkpoint[1]>0 then
          parse("setpos "..id.." "..checkpoints[stats[id].checkpoints[1]].[1].." "..checkpoints[stats[id].checkpoints[1]].[2])
     parse("sethealth "..id.." "..stats[id].checkpoints[2])
     parse("setarmor "..id.." "..stats[id].checkpoints[3])
          for _, wpn in ipairs(stats[id].weapons) do
               parse("equip "..id.." "..wpn)
          end
     end
end