Mineclonia/mods/ENVIRONMENT/mcl_weather/snow.lua

mcl_weather.snow = {}

mcl_weather.snow.particles_count = 15
mcl_weather.snow.init_done = false

-- calculates coordinates and draw particles for snow weather 
mcl_weather.snow.add_snow_particles = function(player)
  mcl_weather.rain.last_rp_count = 0
  for i=mcl_weather.snow.particles_count, 1,-1 do
    local random_pos_x, random_pos_y, random_pos_z = mcl_weather.get_random_pos_by_player_look_dir(player)
    random_pos_y = math.random() + math.random(player:getpos().y - 1, player:getpos().y + 7)
    if minetest.get_node_light({x=random_pos_x, y=random_pos_y, z=random_pos_z}, 0.5) == 15 then
      mcl_weather.rain.last_rp_count = mcl_weather.rain.last_rp_count + 1
      minetest.add_particle({
        pos = {x=random_pos_x, y=random_pos_y, z=random_pos_z},
        velocity = {x = math.random(-1,-0.5), y = math.random(-2,-1), z = math.random(-1,-0.5)},
        acceleration = {x = math.random(-1,-0.5), y=-0.5, z = math.random(-1,-0.5)},
        expirationtime = 2.0,
        size = math.random(0.5, 2),
        collisiondetection = true,
        collision_removal = true,
        vertical = true,
        texture = mcl_weather.snow.get_texture(),
        playername = player:get_player_name()
      })
    end
  end
end

mcl_weather.snow.set_sky_box = function()
  mcl_weather.skycolor.add_layer(
    "weather-pack-snow-sky",
    {{r=0, g=0, b=0},
    {r=241, g=244, b=249},
    {r=0, g=0, b=0}}
  )
  mcl_weather.skycolor.active = true
end

mcl_weather.snow.clear = function() 
  mcl_weather.skycolor.remove_layer("weather-pack-snow-sky")
  mcl_weather.snow.init_done = false
end

-- Simple random texture getter
mcl_weather.snow.get_texture = function()
  local texture_name
  local random_number = math.random()
  if random_number > 0.5 then
    texture_name = "weather_pack_snow_snowflake1.png"
  else
    texture_name = "weather_pack_snow_snowflake2.png"
  end
  return texture_name;
end

local timer = 0
minetest.register_globalstep(function(dtime)
  if mcl_weather.state ~= "snow" then 
    return false
  end
  
  timer = timer + dtime;
  if timer >= 0.5 then
    timer = 0
  else
    return
  end

  if mcl_weather.snow.init_done == false then
    mcl_weather.snow.set_sky_box()
    mcl_weather.snow.init_done = true
  end

  for _, player in ipairs(minetest.get_connected_players()) do
    if (mcl_weather.is_underwater(player) or not mcl_util.has_weather(player:getpos())) then
      return false
    end
    mcl_weather.snow.add_snow_particles(player)
  end
end)

-- register snow weather
if mcl_weather.reg_weathers.snow == nil then
  mcl_weather.reg_weathers.snow = {
    clear = mcl_weather.snow.clear,
    light_factor = 0.6,
    -- 10min - 20min
    min_duration = 600,
    max_duration = 1200,
    transitions = {
      [65] = "none",
      [80] = "rain",
      [100] = "thunder",
    }
}
end