Add skeleton of seasonal calculation, doesn't work yet. Fix error

- Fix error leading to crash on boot if no time_speed key is configured in minetest.conf
 - Add the basic algorithm and system for seasonal calculation; unoperating at the moment
This commit is contained in:
LeMagnesium 2016-04-17 18:51:01 +02:00
parent a4a09c5cfd
commit 5eb7cb8df2

View File

@ -8,11 +8,15 @@
-- Namespace first, with basic informations
time_reg = {}
time_reg.version = "00.01.10"
time_reg.version = "00.01.15"
time_reg.authors = {"Mg/LeMagnesium"}
-- Definitions
time_reg.enabled = not (minetest.setting_getbool("disable_time_regulation") or false)
time_reg.seasons_mode = minetest.setting_getbool("seasonal_time_regulation") or false
time_reg.offset = 0.2
time_reg.day_of_year = tonumber(os.date("%j"))
time_reg.time_speed = 72
@ -27,12 +31,12 @@ time_reg.moment = ""
time_reg.duration = 1440 / time_reg.time_speed
time_reg.day_time_speed = 0
time_reg.night_time_speed = 0
--[[ Status :
0: Dead
1: Idle
2: Active
]]
time_reg.status = 2
time_reg.ratio = { -- Expressed in percent
@ -78,8 +82,20 @@ function time_reg.do_calculation()
time_reg.night_time_speed = 1440 / (night_htime * 2)
end
function time_reg.seasonal_calculation()
local year = tonumber(os.date("%Y"))
local nbdays = 365
if (year % 4) == 0 and not (year % 1000) ~= 0 then
nbdays = 366
end
time_reg.ratio.night = ((math.cos((time_reg.day_of_year / 1) * 2 * math.pi) * time_reg.offset) / 2.0) + 0.5
time_reg.ratio.day = 100 - time_reg.ratio.night
minetest.log("action", "[TimeRegulation] Seasonal calculation done")
end
function time_reg.update_constants()
time_reg.time_speed = minetest.setting_get("time_speed")
time_reg.time_speed = minetest.setting_get("time_speed") or time_reg.time_speed
time_reg.do_calculation()
if time_reg.status == 1 and time_reg.time_speed > 0 then
time_reg.set_status(2, "ACTIVE")
@ -116,6 +132,14 @@ end
function time_reg.loop(loop, forceupdate)
-- Determine TOD and current moment
local tod = minetest.get_timeofday() * 24000
local doy = tonumber(os.date("%j"))
if time_reg.seasons_mode then
if doy ~= time_reg.day_of_year then
time_reg.seasonal_calculation()
end
time_reg.day_of_year = doy
end
local moment = "day"
if tod < time_reg.threshold.day or tod > time_reg.threshold.night then
@ -202,11 +226,16 @@ minetest.register_chatcommand("time_reg", {
elseif #params > 3 then
return false, "You entered too many parameters"
end
local moment, perc = params[2], tonumber(params[3])
if not perc or perc < 0 or perc > 100 then
return false, "Invalid percentage : " .. params[3]
end
if time_reg.seasons_mode then
return false, "Season mode is enabled. Turn it off before changing the ratios (see /time_reg help)"
end
if moment == "day" then
time_reg.ratio.day = perc
time_reg.ratio.night = 100 - perc
@ -223,6 +252,30 @@ minetest.register_chatcommand("time_reg", {
time_reg.loop(false, true)
return true, "Operation succeeded.\nRatio: " .. time_reg.ratio.day .. "% day and " .. time_reg.ratio.night .. "% night"
elseif param:split(" ")[1] == "seasons" then
local params = param:split(" ")
if #params ~= 2 then
return false, "Invalid amount of parameters"
end
if params[2] == "on" then
if time_reg.seasons_mode then
return true, "Seasonal ratio calculation is already on"
else
time_reg.seasons_mode = true
return true, "Seasonal ratio calculation is on"
end
elseif params[2] == "off" then
if time_reg.seasons_mode then
time_reg.seasons_mode = false
return true, "Seasonal ratio calculation is off"
else
return true, "Seasonal ratio calculation is already off"
end
else
return false, "Unknown state : " .. params[2] .. ". Use either 'on' or 'off'"
end
else
return false, "Unknown subcommand: " .. param
end
@ -237,12 +290,19 @@ log("Status: " .. time_reg.status)
log("Absolute Time Speed: " .. time_reg.time_speed)
log("Duration: " .. time_reg.duration)
log("Loop interval: " .. time_reg.loop_interval .. "s")
if time_reg.seasons_mode then
time_reg.seasonal_calculation()
log("Seasonal ratio calculation: on")
else
log("Seasonal ratio calculation: off")
end
log("Ratio:")
log("\tDay: " .. time_reg.ratio.day .. "%")
log("\tNight: " .. time_reg.ratio.night .. "%")
log("Applied time speeds:")
log("\tDay: " .. time_reg.day_time_speed)
log("\tNight: " .. time_reg.night_time_speed)
if not time_reg.enabled then
log("Time Regulation is disabled by default. Use /time_reg start to start it")
end