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
				local pos = vector.new(x,y+1,z)
				local lightlevel = minetest.get_node_light(pos, 0.5)
				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
				local pos = vector.new(x,y+1,z)
				local lightlevel = minetest.get_node_light(pos, 0.5)
				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)