+local all_nodes = {}
+local do_effects = false
+local snow = false
+local rain = false
+local weather_update_timer = 0
+local id_table = {}
+
+local spawn_snow = function(player)
+ local pos = player:get_pos()
+ local radius = 10
+ local particle_table = {}
+
+ local area = vector.new(10,10,10)
+
+ local min = vector.subtract(pos, area)
+ local max = vector.add(pos, area)
+
+
+ local area_index = minetest.find_nodes_in_area_under_air(min, max, all_nodes)
+
+ local spawn_table = {}
+ --find the highest y value
+ for _,index in pairs(area_index) do
+ if not spawn_table[index.x] then spawn_table[index.x] = {} end
+ if not spawn_table[index.x][index.z] then
+ spawn_table[index.x][index.z] = index.y
+ elseif spawn_table[index.x][index.z] < index.y then
+ spawn_table[index.x][index.z] = index.y
+ end
+ end
+
+ for x,x_index in pairs(spawn_table) do
+ for z,y in pairs(x_index) do
+ if minetest.get_node_or_nil(vector.new(x,y+1,z)) ~= nil then
+ --print("got to this spointa")
+ local pos = vector.new(x,y+1,z)
+ local lightlevel = 14
+ --local lightlevel = minetest.get_node_light(pos, 0.5)
+ --print("but not here")
+ if lightlevel >= 14 then
+ minetest.add_particlespawner({
+ amount = 1,
+ time = 0.5,
+ minpos = vector.new(x-0.5,y,z-0.5),
+ maxpos = vector.new(x+0.5,y+20,z+0.5),
+ minvel = {x=-0.2, y=-0.2, z=-0.2},
+ maxvel = {x=0.2, y=-0.5, z=0.2},
+ minacc = {x=0, y=0, z=0},
+ maxacc = {x=0, y=0, z=0},
+ minexptime = 1,
+ maxexptime = 1,
+ minsize = 1,
+ maxsize = 1,
+ collisiondetection = true,
+ collision_removal = true,
+ object_collision = false,
+ texture = "snowflake_"..math.random(1,2)..".png",
+ playername = player:get_name(),
+ })
+ end
+ end
+ end
+ end
+end
+
+local spawn_rain = function(player)
+ local pos = player:get_pos()
+ local radius = 10
+ local particle_table = {}
+
+ local area = vector.new(10,10,10)
+
+ local min = vector.subtract(pos, area)
+ local max = vector.add(pos, area)
+
+
+ local area_index = minetest.find_nodes_in_area_under_air(min, max, all_nodes)
+
+ local spawn_table = {}
+ --find the highest y value
+ for _,index in pairs(area_index) do
+ if not spawn_table[index.x] then spawn_table[index.x] = {} end
+ if not spawn_table[index.x][index.z] then
+ spawn_table[index.x][index.z] = index.y
+ elseif spawn_table[index.x][index.z] < index.y then
+ spawn_table[index.x][index.z] = index.y
+ end
+ end
+
+ for x,x_index in pairs(spawn_table) do
+ for z,y in pairs(x_index) do
+ if minetest.get_node_or_nil(vector.new(x,y+1,z)) ~= nil then
+ --print("got to this spointa")
+ local pos = vector.new(x,y+1,z)
+ local lightlevel = 14
+ --local lightlevel = minetest.get_node_light(pos, 0.5)
+ --print("but not here")
+ if lightlevel >= 14 then
+ minetest.add_particlespawner({
+ amount = 1,
+ time = 0.5,
+ minpos = vector.new(x-0.5,y,z-0.5),
+ maxpos = vector.new(x+0.5,y+20,z+0.5),
+ minvel = {x=0, y=-9.81, z=0},
+ maxvel = {x=0, y=-9.81, z=0},
+ minacc = {x=0, y=0, z=0},
+ maxacc = {x=0, y=0, z=0},
+ minexptime = 1,
+ maxexptime = 2,
+ minsize = 1,
+ maxsize = 1,
+ collisiondetection = true,
+ collision_removal = true,
+ object_collision = false,
+ vertical = true,
+ texture = "raindrop.png",
+ playername = player:get_name(),
+ })
+ end
+ end
+ end
+ end
+end
+
+minetest.register_globalstep(function(dtime)
+ if do_effects then
+ if snow or rain then
+ weather_update_timer = weather_update_timer + dtime
+ if weather_update_timer >= 0.5 then
+ weather_update_timer = 0
+ local player = minetest.localplayer
+ if snow == true then
+ spawn_snow(minetest.localplayer)
+ elseif rain == true then
+ spawn_rain(minetest.localplayer)
+ end
+ end
+ end
+ end
+end)
+
+
+
+minetest.register_on_modchannel_message(function(channel_name, sender, message)
+ if channel_name == "weather_nodes" then
+ all_nodes = minetest.deserialize(message)
+ do_effects = true
+ end
+ if channel_name == "weather_type" then
+ if message == "1" then
+ rain = false
+ snow = true
+ elseif message == "2" then
+ rain = true
+ snow = false
+ else
+ rain = false
+ snow = false
+ end
+ end
+end)