FreeBlock/mods/ENVIRONMENT/mcl_moon/init.lua

65 lines
1.6 KiB
Lua

local MOON_PHASES = 8
local MOON_PHASES_HALF = MOON_PHASES / 2
local SHEET_W = 4
local SHEET_H = 2
-- Randomize initial moon phase, based on map seed
local phase_offset
local mg_seed = minetest.get_mapgen_setting("seed")
local rand = PseudoRandom(mg_seed)
local phase_offset = rand:next(0, MOON_PHASES - 1)
rand = nil
minetest.log("info", "[mcl_moon] Moon phase offset of this world: "..phase_offset)
mcl_moon = {}
mcl_moon.MOON_PHASES = MOON_PHASES
mcl_moon.get_moon_phase = function()
local after_midday = 0
-- Moon phase changes after midday
local tod = minetest.get_timeofday()
if tod > 0.5 then
after_midday = 1
end
return (minetest.get_day_count() + phase_offset + after_midday) % MOON_PHASES
end
local get_moon_texture = function()
local phase = mcl_moon.get_moon_phase()
local x = phase % MOON_PHASES_HALF
local y
if phase >= MOON_PHASES_HALF then
y = 1
else
y = 0
end
return "mcl_moon_moon_phases.png^[sheet:"..SHEET_W.."x"..SHEET_H..":"..x..","..y
end
local timer = 0
local last_reported_phase = nil
minetest.register_globalstep(function(dtime)
timer = timer + dtime
if timer < 8 then
return
end
timer = 0
local phase = mcl_moon.get_moon_phase()
-- No-op when moon phase didn't change yet
if last_reported_phase == phase then
return
end
minetest.log("info", "[mcl_moon] New moon phase: "..phase)
last_reported_phase = phase
local moon_arg = {texture = get_moon_texture()}
local players = minetest.get_connected_players()
for p=1, #players do
players[p]:set_moon(moon_arg)
end
end)
minetest.register_on_joinplayer(function(player)
player:set_moon({texture = get_moon_texture(), scale=3.75})
end)