make player collision box MUCH closer to MC

This reverts commit ea41c82834.

mods/ENTITIES/mcl_mobs/spawning.lua

@@ -535,114 +535,114 @@ end
 
 --todo mob limiting
 --MAIN LOOP
+
 if mobs_spawn then
-    local timer = 0
-    minetest.register_globalstep(function(dtime)
-        timer = timer + dtime
-        if timer >= 8 then
-            timer = 0
-            for _,player in ipairs(minetest.get_connected_players()) do
-                for i = 1,math.random(3,8) do
+	local timer = 0
+	minetest.register_globalstep(function(dtime)
+		timer = timer + dtime
+		if timer >= 8 then
+			timer = 0
+			for _,player in pairs(minetest.get_connected_players()) do
+				for i = 1,math_random(3,8) do
+					repeat -- after this line each "break" means "continue"
+						local player_pos = player:get_pos()
 
-                    local player_pos = player:get_pos()
+						local _,dimension = mcl_worlds.y_to_layer(player_pos.y)
 
-                    local _,dimension = mcl_worlds.y_to_layer(player_pos.y)
-
-				    if dimension == "void" or dimension == "default" then
-                        goto continue -- ignore void and unloaded area
-				    end
+						if dimension == "void" or dimension == "default" then
+							break -- ignore void and unloaded area
+						end
 					
-                    local min,max = decypher_limits(player_pos.y)
+						local min,max = decypher_limits(player_pos.y)
 
-                    local goal_pos = position_calculation(player_pos)
+						local goal_pos = position_calculation(player_pos)
                     
-					local spawning_position_list = find_nodes_in_area_under_air(new_vector(goal_pos.x,min,goal_pos.z), vector.new(goal_pos.x,max,goal_pos.z), {"group:solid", "group:water", "group:lava"})
+						local spawning_position_list = find_nodes_in_area_under_air(new_vector(goal_pos.x,min,goal_pos.z), vector.new(goal_pos.x,max,goal_pos.z), {"group:solid", "group:water", "group:lava"})
 
-					--couldn't find node
-					if #spawning_position_list <= 0 then
-						goto continue
-					end
+						--couldn't find node
+						if #spawning_position_list <= 0 then
+							break
+						end
 
-					local spawning_position = spawning_position_list[math_random(1,#spawning_position_list)]
+						local spawning_position = spawning_position_list[math_random(1,#spawning_position_list)]
 
-					--Prevent strange behavior/too close to player
-					if not spawning_position or vector_distance(player_pos, spawning_position) < 15 then
-						goto continue
-					end
+						--Prevent strange behavior/too close to player
+						if not spawning_position or vector_distance(player_pos, spawning_position) < 15 then
+							break
+						end
 
-					local gotten_node = get_node(spawning_position).name
+						local gotten_node = get_node(spawning_position).name
 
-					if not gotten_node or gotten_node == "air" then --skip air nodes
-						goto continue
-					end
+						if not gotten_node or gotten_node == "air" then --skip air nodes
+							break
+						end
 
-                    local gotten_biome = minetest.get_biome_data(spawning_position)
+						local gotten_biome = minetest.get_biome_data(spawning_position)
 
-                    if not gotten_biome then
-                        goto continue --skip if in unloaded area
-                    end
+						if not gotten_biome then
+							break --skip if in unloaded area
+						end
 
-					gotten_biome = get_biome_name(gotten_biome.biome) --makes it easier to work with
+						gotten_biome = get_biome_name(gotten_biome.biome) --makes it easier to work with
 
-					--grab random mob
-					local mob_def = spawn_dictionary[math.random(1,#spawn_dictionary)]
+						--grab random mob
+						local mob_def = spawn_dictionary[math.random(1,#spawn_dictionary)]
 
-					if not mob_def then
-						goto continue --skip if something ridiculous happens (nil mob def)
-					end
+						if not mob_def then
+							break --skip if something ridiculous happens (nil mob def)
+						end
 
-					--skip if not correct dimension
-					if mob_def.dimension ~= dimension then
-						goto continue
-					end
+						--skip if not correct dimension
+						if mob_def.dimension ~= dimension then
+							break
+						end
 
-					--skip if not in correct biome
-					if not biome_check(mob_def.biomes, gotten_biome) then
-						goto continue
-					end
+						--skip if not in correct biome
+						if not biome_check(mob_def.biomes, gotten_biome) then
+							break
+						end
 
-					--add this so mobs don't spawn inside nodes
-					spawning_position.y = spawning_position.y + 1
+						--add this so mobs don't spawn inside nodes
+						spawning_position.y = spawning_position.y + 1
 
-					if spawning_position.y < mob_def.min_height or spawning_position.y > mob_def.max_height then
-						goto continue
-					end
+						if spawning_position.y < mob_def.min_height or spawning_position.y > mob_def.max_height then
+							break
+						end
 
-					--only need to poll for node light if everything else worked
-					local gotten_light = get_node_light(spawning_position)
+						--only need to poll for node light if everything else worked
+						local gotten_light = get_node_light(spawning_position)
 
-					--don't spawn if not in light limits
-					if gotten_light < mob_def.min_light or gotten_light > mob_def.max_light then
-						goto continue
-					end
+						--don't spawn if not in light limits
+						if gotten_light < mob_def.min_light or gotten_light > mob_def.max_light then
+							break
+						end
 
-					local is_water = get_item_group(gotten_node, "water") ~= 0
-					local is_lava  = get_item_group(gotten_node, "lava") ~= 0
+						local is_water = get_item_group(gotten_node, "water") ~= 0
+						local is_lava  = get_item_group(gotten_node, "lava") ~= 0
 
-					if mob_def.type_of_spawning == "ground" and is_water then
-						goto continue
-					end
+						if mob_def.type_of_spawning == "ground" and is_water then
+							break
+						end
 
-					if mob_def.type_of_spawning == "ground" and is_lava then
-						goto continue
-					end
+						if mob_def.type_of_spawning == "ground" and is_lava then
+							break
+						end
 
-					--finally do the heavy check (for now) of mobs in area
-					if count_mobs(spawning_position, mob_def.spawn_class) >= mob_def.aoc then
-						goto continue
-					end
+						--finally do the heavy check (for now) of mobs in area
+						if count_mobs(spawning_position, mob_def.spawn_class) >= mob_def.aoc then
+							break
+						end
 
-					--adjust the position for water and lava mobs
-					if mob_def.type_of_spawning == "water"  or mob_def.type_of_spawning == "lava" then
-						spawning_position.y = spawning_position.y - 1
-					end
+						--adjust the position for water and lava mobs
+						if mob_def.type_of_spawning == "water"  or mob_def.type_of_spawning == "lava" then
+							spawning_position.y = spawning_position.y - 1
+						end
 
-					--everything is correct, spawn mob
-					minetest.add_entity(spawning_position, mob_def.name)
-
-                    ::continue:: --this is a safety catch
-                end
-            end
-        end
-    end)
+						--everything is correct, spawn mob
+						minetest.add_entity(spawning_position, mob_def.name)
+					until true --this is a safety catch
+				end
+			end
+		end
+	end)
 end

mods/ENTITIES/mobs_mc/ender_dragon.lua

@@ -61,6 +61,22 @@ mobs:register_mob("mobs_mc:enderdragon", {
 	ignores_nametag = true,
 	do_custom = function(self)
 		mcl_bossbars.update_boss(self, "Ender Dragon", "light_purple")
+		for _, obj in ipairs(minetest.get_objects_inside_radius(self.object:get_pos(), 80)) do
+			local luaentity = obj:get_luaentity()
+			if luaentity and luaentity.name == "mcl_end:crystal" then
+				if luaentity.beam then
+					if luaentity.beam == self.beam then
+						break
+					end
+				else
+					if self.beam then
+						self.beam:remove()
+					end
+					minetest.add_entity(self.object:get_pos(), "mcl_end:crystal_beam"):get_luaentity():init(self.object, obj)
+					break
+				end
+			end
+		end
 		if self._portal_pos then
 			-- migrate old format
 			if type(self._portal_pos) == "string" then

mods/ENTITIES/mobs_mc/enderman.lua

@@ -346,29 +346,28 @@ mobs:register_mob("mobs_mc:enderman", {
 					--skip player if they have no data - log it
 					if not player_eye_height then
 						minetest.log("error", "Enderman at location: ".. dump(enderpos).." has indexed a null player!")
-						goto continue
-					end
+					else
 
-					--calculate very quickly the exact location the player is looking
-					--within the distance between the two "heads" (player and enderman)
-					local look_pos = vector.new(player_pos.x, player_pos.y + player_eye_height, player_pos.z)
-					local look_pos_base = look_pos
-					local ender_eye_pos = vector.new(enderpos.x, enderpos.y + 2.75, enderpos.z)
-					local eye_distance_from_player = vector.distance(ender_eye_pos, look_pos)
-					look_pos = vector.add(look_pos, vector.multiply(look_dir, eye_distance_from_player))
+						--calculate very quickly the exact location the player is looking
+						--within the distance between the two "heads" (player and enderman)
+						local look_pos = vector.new(player_pos.x, player_pos.y + player_eye_height, player_pos.z)
+						local look_pos_base = look_pos
+						local ender_eye_pos = vector.new(enderpos.x, enderpos.y + 2.75, enderpos.z)
+						local eye_distance_from_player = vector.distance(ender_eye_pos, look_pos)
+						look_pos = vector.add(look_pos, vector.multiply(look_dir, eye_distance_from_player))
 					
-					--if looking in general head position, turn hostile
-					if minetest.line_of_sight(ender_eye_pos, look_pos_base) and vector.distance(look_pos, ender_eye_pos) <= 0.4 then
-						self.provoked = "staring"
-						self.attack = minetest.get_player_by_name(obj:get_player_name())
-						break
-					else -- I'm not sure what this part does, but I don't want to break anything - jordan4ibanez
-						if self.provoked == "staring" then
-							self.provoked = "broke_contact"
-						end						
-					end
+						--if looking in general head position, turn hostile
+						if minetest.line_of_sight(ender_eye_pos, look_pos_base) and vector.distance(look_pos, ender_eye_pos) <= 0.4 then
+							self.provoked = "staring"
+							self.attack = minetest.get_player_by_name(obj:get_player_name())
+							break
+						else -- I'm not sure what this part does, but I don't want to break anything - jordan4ibanez
+							if self.provoked == "staring" then
+								self.provoked = "broke_contact"
+							end						
+						end
 
-					::continue:: -- this is a sweep over statement, this can be used to continue even when errors occurred
+					end
 				end
 			end
 		end

mods/HUD/mcl_bossbars/init.lua

@@ -36,12 +36,12 @@ end
 
 local last_id = 0
 
-function mcl_bossbars.add_bar(player, def)
+function mcl_bossbars.add_bar(player, def, dynamic, priority)
 	local name = player:get_player_name()
 	local bars = mcl_bossbars.bars[name]
-	local bar = {text = def.text}
+	local bar = {text = def.text, priority = priority or 0}
 	bar.color, bar.image = get_color_info(def.color, def.percentage)
-	if def.dynamic then
+	if dynamic then
 		for _, other in pairs(bars) do
 			if not other.id and other.color == bar.color and (other.original_text or other.text) == bar.text and other.image == bar.image then
 				if not other.count then
@@ -55,7 +55,7 @@ function mcl_bossbars.add_bar(player, def)
 		end
 	end
 	table.insert(bars, bar)
-	if not def.dynamic then
+	if not dynamic then
 		bar.raw_color = def.color
 		bar.id = last_id + 1
 		last_id = bar.id
@@ -69,10 +69,11 @@ function mcl_bossbars.remove_bar(id)
 	mcl_bossbars.static[id] = nil
 end
 
-function mcl_bossbars.update_bar(id, def)
+function mcl_bossbars.update_bar(id, def, priority)
 	local old = mcl_bossbars.static[id]
 	old.color = get_color_info(def.color or old.raw_color, def.percentage or old.percentage)
 	old.text = def.text or old.text
+	old.priority = priority or old.priority
 end
 
 function mcl_bossbars.update_boss(luaentity, name, color)
@@ -81,14 +82,15 @@ function mcl_bossbars.update_boss(luaentity, name, color)
 		text = luaentity.nametag,
 		percentage = math.floor(luaentity.health / luaentity.hp_max * 100),
 		color = color,
-		dynamic = true,
 	}
 	if not bardef.text or bardef.text == "" then
 		bardef.text = name
 	end
-	for _, obj in pairs(minetest.get_objects_inside_radius(object:get_pos(), 128)) do
-		if obj:is_player() then
-			mcl_bossbars.add_bar(obj, bardef)
+	local pos = object:get_pos()
+	for _, player in pairs(minetest.get_connected_players()) do
+		local d = vector.distance(pos, player:get_pos())
+		if d <= 80 then
+			mcl_bossbars.add_bar(player, bardef, true, d)
 		end
 	end
 end
@@ -115,6 +117,7 @@ minetest.register_globalstep(function()
 		local name = player:get_player_name()
 		local bars = mcl_bossbars.bars[name]
 		local huds = mcl_bossbars.huds[name]
+		table.sort(bars, function(a, b) return a.priority < b.priority end)
 		local huds_new = {}
 		local bars_new = {}
 		local i = 0

mods/ITEMS/mcl_end/end_crystal.lua

@@ -79,6 +79,54 @@ minetest.register_entity("mcl_end:crystal", {
 	_hittable_by_projectile = true
 })
 
+minetest.register_entity("mcl_end:crystal_beam", {
+	initial_properties = {
+		physical = false,
+		visual = "cube",
+		visual_size = {x = 1, y = 1, z = 1},
+		textures = {
+			"mcl_end_crystal_beam.png^[transformR90",
+			"mcl_end_crystal_beam.png^[transformR90",
+			"mcl_end_crystal_beam.png",
+			"mcl_end_crystal_beam.png",
+			"blank.png",
+			"blank.png",
+		},
+		static_save = false,
+	},
+	spin = 0,
+	init = function(self, dragon, crystal)
+		self.dragon, self.crystal = dragon, crystal
+		crystal:get_luaentity().beam = self.object
+		dragon:get_luaentity().beam = self.object
+	end,
+	on_deactivate = function(self)
+		if self.crystal and self.crystal:get_luaentity() then
+			self.crystal:get_luaentity().beam = nil
+		end
+		if self.dragon and self.dragon:get_luaentity() then
+			self.dragon:get_luaentity().beam = nil
+		end
+	end,
+	on_step = function(self, dtime)
+		if self.dragon and self.dragon:get_luaentity() and self.crystal and self.crystal:get_luaentity() then
+			self.spin = self.spin + dtime * math.pi * 2 / 4
+			local dragon_pos, crystal_pos = self.dragon:get_pos(), self.crystal:get_pos()
+
+			dragon_pos.y = dragon_pos.y + 4
+			crystal_pos.y = crystal_pos.y + 2
+
+			self.object:set_pos(vector.divide(vector.add(dragon_pos, crystal_pos), 2))
+			local rot = vector.dir_to_rotation(vector.direction(dragon_pos, crystal_pos))
+			rot.z = self.spin
+			self.object:set_rotation(rot)
+			self.object:set_properties({visual_size = {x = 0.5, y = 0.5, z = vector.distance(dragon_pos, crystal_pos)}})
+		else
+			self.object:remove()
+		end
+	end,
+})
+
 minetest.register_craftitem("mcl_end:crystal", {
 	inventory_image = "mcl_end_crystal_item.png",
 	description = S("End Crystal"),

mods/PLAYER/mcl_playerplus/init.lua

@@ -32,8 +32,8 @@ local player_collision = function(player)
 
 	for _,object in pairs(minetest.get_objects_inside_radius(pos, width)) do
 
-		if object:is_player()
-		or (object:get_luaentity()._cmi_is_mob == true and object ~= player) then
+		if object and (object:is_player()
+		or (object:get_luaentity()._cmi_is_mob == true and object ~= player)) then
 
 			local pos2 = object:get_pos()
 			local vec  = {x = pos.x - pos2.x, z = pos.z - pos2.z}
@@ -46,7 +46,7 @@ local player_collision = function(player)
 		end
 	end
 
-	return({x * 5,z * 5})
+	return({x,z})
 end
 
 -- converts yaw to degrees
@@ -119,6 +119,37 @@ end
 
 local pitch, name, node_stand, node_stand_below, node_head, node_feet, pos
 
+
+minetest.register_on_punchplayer(function(player, hitter, damage)
+	if hitter:is_player() then
+		if hitter:get_player_control().aux1 then
+			player:add_velocity(hitter:get_velocity())
+		end
+		if hitter:get_velocity().y < -6 then
+			player:set_hp(player:get_hp() - (damage * math.random(0.50 , 0.75)))
+			local pos = player:get_pos()
+			minetest.add_particlespawner({
+				amount = 15,
+				time = 0.1,
+				minpos = {x=pos.x-0.5, y=pos.y-0.5, z=pos.z-0.5},
+				maxpos = {x=pos.x+0.5, y=pos.y+0.5, z=pos.z+0.5},
+				minvel = {x=-0.1, y=-0.1, z=-0.1},
+				maxvel = {x=0.1, y=0.1, z=0.1},
+				minacc = {x=0, y=0, z=0},
+				maxacc = {x=0, y=0, z=0},
+				minexptime = 1,
+				maxexptime = 2,
+				minsize = 1.5,
+				maxsize = 1.5,
+				collisiondetection = false,
+				vertical = false,
+				texture = "mcl_particles_crit.png^[colorize:#bc7a57:127",
+			})
+		end
+	end
+end)
+
+
 minetest.register_globalstep(function(dtime)
 
 	time = time + dtime
@@ -179,26 +210,26 @@ minetest.register_globalstep(function(dtime)
 
 		if parent then
 			local parent_yaw = degrees(parent:get_yaw())
-			player:set_properties({collisionbox = {-0.35,0,-0.35,0.35,1.8,0.35}, eye_height = 1.5, nametag_color = { r = 225, b = 225, a = 225, g = 225 }})
+			player:set_properties({collisionbox = {-0.312,0,-0.312,0.312,1.8,0.312}, eye_height = 1.5, nametag_color = { r = 225, b = 225, a = 225, g = 225 }})
 			player:set_bone_position("Head", vector.new(0,6.3,0), vector.new(pitch, -limit_vel_yaw(yaw, parent_yaw) + parent_yaw, 0))
 			player:set_bone_position("Body_Control", vector.new(0,6.3,0), vector.new(0,0,0))
 		elseif controls.sneak then
 			-- controls head pitch when sneaking
 			player:set_bone_position("Head", vector.new(0,6.3,0), vector.new(pitch+36,0,0))
 			-- sets eye height, and nametag color accordingly
-			player:set_properties({collisionbox = {-0.35,0,-0.35,0.35,1.8,0.35}, eye_height = 1.35, nametag_color = { r = 225, b = 225, a = 0, g = 225 }})
+			player:set_properties({collisionbox = {-0.312,0,-0.312,0.312,1.8,0.312}, eye_height = 1.35, nametag_color = { r = 225, b = 225, a = 0, g = 225 }})
 			-- sneaking body conrols
 			player:set_bone_position("Body_Control", vector.new(0,6.3,0), vector.new(0,0,0))
 		elseif get_item_group(mcl_playerinfo[name].node_head, "water") ~= 0 and is_sprinting(name) == true then
 			-- set head pitch and yaw when swimming
 			player:set_bone_position("Head", vector.new(0,6.3,0), vector.new(pitch+90-degrees(dir_to_pitch(player_velocity)),player_vel_yaw - yaw,0))
 			-- sets eye height, and nametag color accordingly
-			player:set_properties({collisionbox = {-0.35,0,-0.35,0.35,0.8,0.35}, eye_height = 0.5, nametag_color = { r = 225, b = 225, a = 225, g = 225 }})
+			player:set_properties({collisionbox = {-0.312,0,-0.312,0.312,0.8,0.312}, eye_height = 0.5, nametag_color = { r = 225, b = 225, a = 225, g = 225 }})
 			-- control body bone when swimming
 			player:set_bone_position("Body_Control", vector.new(0,6.3,0), vector.new(degrees(dir_to_pitch(player_velocity)) - 90,-player_vel_yaw + yaw + 180,0))
 		else
 			-- sets eye height, and nametag color accordingly
-			player:set_properties({collisionbox = {-0.35,0,-0.35,0.35,1.8,0.35}, eye_height = 1.5, nametag_color = { r = 225, b = 225, a = 225, g = 225 }})
+			player:set_properties({collisionbox = {-0.312,0,-0.312,0.312,1.8,0.312}, eye_height = 1.5, nametag_color = { r = 225, b = 225, a = 225, g = 225 }})
 
 			player:set_bone_position("Head", vector.new(0,6.3,0), vector.new(pitch, player_vel_yaw - yaw, 0))
 			player:set_bone_position("Body_Control", vector.new(0,6.3,0), vector.new(0, -player_vel_yaw + yaw, 0))