Files
wnsrc/lua/entities/logic_weather_set.lua
lifestorm 9c918c46e5 Upload
2024-08-04 23:12:27 +03:00

84 lines
2.2 KiB
Lua

--[[
| This file was obtained through the combined efforts
| of Madbluntz & Plymouth Antiquarian Society.
|
| Credits: lifestorm, Gregory Wayne Rossel JR.,
| Maloy, DrPepper10 @ RIP, Atle!
|
| Visit for more: https://plymouth.thetwilightzone.ru/
--]]
--[[-------------------------------------------------------------------------
A weather relay
---------------------------------------------------------------------------]]
ENT.Type = "point"
ENT.Base = "base_point"
ENT.PrintName = "logic_weather_set"
ENT.Author = "Nak"
ENT.Information = "Allows the map to set weather"
ENT.Category = "StormFox2"
ENT.Editable = false
ENT.Spawnable = false
ENT.AdminOnly = false
function ENT:Initialize()
end
function ENT:KeyValue( k, v )
if k == "weather_type" then
local n = string.lower(v)
n = n:sub(0, 1):upper() .. n:sub(2)
self.weather_type = n
elseif k == "weather_amount" then
self.weather_amount = math.Clamp(tonumber(v), 0, 1)
end
end
function ENT:GetWeather()
return self.weather_type or "Clear", self.weather_amount or 0.8
end
local delay = 0
function ENT:TriggerWeather()
if delay > CurTime() then return false end
local w, p = self:GetWeather()
StormFox2.Weather.Set(w, p)
delay = CurTime() + 1.5
return true
end
function ENT:AcceptInput( name, activator, caller, data )
if name == "SetWeather" then
self:TriggerWeather()
return true
elseif name == "SetTemperature" then
local num = tonumber(string.match(data or "0", "[-%d]+") or 0)
local t = string.match(data:lower(), "[fck]") or "c"
if t == 'k' then
num = StormFox2.Temperature.Convert("kelvin", "celsius")
elseif t == 'f' then
num = StormFox2.Temperature.Convert("fahrenheit", "celsius")
end
StormFox2.Temperature.Set(num, 2)
return true
elseif name == "EnableThunder" then
StormFox2.Thunder.SetEnabled(true)
return true
elseif name == "DisableThunder" then
StormFox2.Thunder.SetEnabled(false)
return true
elseif name == "ClearWeather" then
StormFox2.Weather.Set("Clear")
elseif name == "SetWind" then
StormFox2.Wind.SetForce( tonumber(data or "0") or 0, 2 )
elseif name == "SetWindYaw" then
local n = tonumber(data or "0") or 0
StormFox2.Wind.SetYaw( math.Clamp(n,0,360) )
elseif name == "ClearWeather" then
StormFox2.Weather.Set("Clear")
end
return false
end