mods/sethome/init.lua

   1 local homes_file = minetest.get_worldpath() .. "/homes"
   2 local homepos = {}
   3
   4 local function loadhomes()
   5     local input = io.open(homes_file, "r")
   6     if input then
   7                 repeat
   8             local x = input:read("*n")
   9             if x == nil then
  10                 break
  11             end
  12             local y = input:read("*n")
  13             local z = input:read("*n")
  14             local name = input:read("*l")
  15             homepos[name:sub(2)] = {x = x, y = y, z = z}
  16         until input:read(0) == nil
  17         io.close(input)
  18     else
  19         homepos = {}
  20     end
  21 end
  22
  23 loadhomes()
  24
  25 minetest.register_privilege("home", "Can use /sethome and /home")
  26
  27 local changed = false
  28
  29 minetest.register_chatcommand("home", {
  30     description = "Teleport you to your home point",
  31     privs = {home=true},
  32     func = function(name)
  33         local player = minetest.get_player_by_name(name)
  34         if player == nil then
  35             -- just a check to prevent the server crashing
  36             return false
  37         end
  38         if homepos[player:get_player_name()] then
  39             player:setpos(homepos[player:get_player_name()])
  40             minetest.chat_send_player(name, "Teleported to home!")
  41         else
  42             minetest.chat_send_player(name, "Set a home using /sethome")
  43         end
  44     end,
  45 })
  46
  47 minetest.register_chatcommand("sethome", {
  48     description = "Set your home point",
  49     privs = {home=true},
  50     func = function(name)
  51         local player = minetest.get_player_by_name(name)
  52         local pos = player:getpos()
  53         homepos[player:get_player_name()] = pos
  54         minetest.chat_send_player(name, "Home set!")
  55         changed = true
  56         if changed then
  57                 local output = io.open(homes_file, "w")
  58             for i, v in pairs(homepos) do
  59                 output:write(v.x.." "..v.y.." "..v.z.." "..i.."\n")
  60             end
  61             io.close(output)
  62             changed = false
  63         end
  64     end,
  65 })