1
0
mirror of https://github.com/sys4-fr/server-nalc.git synced 2024-11-05 01:50:25 +01:00
server-nalc/minetestforfun_game/mods/sethome/init.lua
LeMagnesium 53588bf528 Sethome modifications
- (I hope) sethome works
2014-11-01 16:23:22 +01:00

118 lines
3.4 KiB
Lua
Executable File

local real_homes_file = minetest.get_worldpath() .. "/real_homes"
local nether_homes_file = minetest.get_worldpath() .. "/nether_homes"
local homepos = {real = {},nether = {}}
local function loadhomes()
local input = io.open(real_homes_file, "r")
if input then
repeat
local x = input:read("*n")
if x == nil then
break
end
local y = input:read("*n")
local z = input:read("*n")
local name = input:read("*l")
homepos.real[name:sub(2)] = {x = x, y = y, z = z}
until input:read(0) == nil
io.close(input)
else
homepos.real = {}
end
input = io.open(nether_homes_file, "r")
if input then
repeat
local x = input:read("*n")
if x == nil then
break
end
local y = input:read("*n")
local z = input:read("*n")
local name = input:read("*n")
homepos.nether[name:sub(2)] = {x = x, y = y, z = z}
until input:read(0) == nil
io.close(input)
else
homepos.nether = {}
end
end
loadhomes()
minetest.register_privilege("home", "Can use /sethome and /home")
local changed = false
minetest.register_chatcommand("home", {
description = "Teleport you to your home point",
privs = {home=true},
func = function(name)
local player = minetest.env:get_player_by_name(name)
if not player_in_nether then return end
local is_in_nether = table.icontains(players_in_nether, name)
if player == nil then
-- just a check to prevent the server crashing
return false
end
if homepos[player:get_player_name()] then
if is_in_nether then
player:setpos(nether.homepos[player:get_player_name()])
else
player:setpos(real.homepos[player:get_player_name()])
end
minetest.chat_send_player(name, "Teleported to home!")
else
minetest.chat_send_player(name, "Set a home using /sethome")
end
end,
})
minetest.register_chatcommand("sethome", {
description = "Set your home point",
privs = {home=true},
func = function(name)
local player = minetest.env:get_player_by_name(name)
local pos = player:getpos()
-- Find players in the nether
local players_in_nether = {}
local seeking = 0
local nether_file = io.open(minetest.get_worldpath().."/nether_players","r")
if not nether_file then return end
local player_in_nether_read = nether_file:read()
--if player_in_nether_read == "" then
--if not players_in_nether then return end
player_in_nether = player_in_nether_read:split(" ")
local is_in_nether = table.icontains(players_in_nether, name)
if is_in_nether == true then
homepos.nether[player:get_player_name()] = pos
else
homepos.real[player:get_player_name()] = pos
end
minetest.chat_send_player(name, "Home set!")
changed = true
if changed then
local output = 0
if is_in_nether then
output = io.open(nether_homes_file, "w")
if output == 0 then return end -- Had not open the file
for i, v in pairs(homepos.nether) do
output:write(v.x.." "..v.y.." "..v.z.." "..i.."\n")
end
else
output = io.open(real_homes_file, "w")
for i, v in pairs(homepos.real) do
output:write(v.x.." "..v.y.." "..v.z.." "..i.."\n")
end
end
io.close(output)
changed = false
end
end,
})