Organize mods into modpacks for better overview

mods/ITEMS/mcl_throwing/throwable.lua

@@ -0,0 +1,185 @@
+-- 
+-- Snowballs and other throwable items
+--
+
+local GRAVITY = tonumber(minetest.setting_get("movement_gravity"))
+
+local entity_mapping = {
+	["mcl_throwing:snowball"] = "mcl_throwing:snowball_entity",
+	["mcl_throwing:egg"] = "mcl_throwing:egg_entity",
+	["mcl_throwing:ender_pearl"] = "mcl_throwing:ender_pearl_entity",
+}
+
+local velocities = {
+	["mcl_throwing:snowball_entity"] = 22,
+	["mcl_throwing:egg_entity"] = 22,
+	["mcl_throwing:ender_pearl_entity"] = 22,
+}
+
+mcl_throwing.throw = function(throw_item, pos, dir, velocity)
+	if velocity == nil then
+		velocity = velocities[entity_name]
+	end
+	if velocity == nil then
+		velocity = 22
+	end
+
+	local itemstring = ItemStack(throw_item):get_name()
+	local obj = minetest.add_entity(pos, entity_mapping[itemstring])
+	obj:setvelocity({x=dir.x*velocity, y=dir.y*velocity, z=dir.z*velocity})
+	obj:setacceleration({x=dir.x*-3, y=-GRAVITY, z=dir.z*-3})
+	return obj
+end
+
+-- Throw item
+local throw_function = function(entity_name, velocity)
+	local func = function(item, player, pointed_thing)
+		local playerpos = player:getpos()
+		local dir = player:get_look_dir()
+		local obj = mcl_throwing.throw(item, {x=playerpos.x, y=playerpos.y+1.5, z=playerpos.z}, dir, velocity)
+		obj:get_luaentity()._thrower = player:get_player_name()
+		if not minetest.setting_getbool("creative_mode") then
+			item:take_item()
+		end
+		return item
+	end
+	return func
+end
+
+-- Staticdata handling because objects may want to be reloaded
+local get_staticdata = function(self)
+	local data = {
+		_lastpos = self._lastpos,
+		_thrower = self._thrower,
+	}
+	return minetest.serialize(data)
+end
+
+local on_activate = function(self, staticdata, dtime_s)
+	local data = minetest.deserialize(staticdata)
+	if data then
+		self._lastpos = data._lastpos
+		self._thrower = data._thrower
+	end
+end
+
+-- The snowball entity
+local snowball_ENTITY={
+	physical = false,
+	timer=0,
+	textures = {"mcl_throwing_snowball.png"},
+	visual_size = {x=0.5, y=0.5},
+	collisionbox = {0,0,0,0,0,0},
+
+	get_staticdata = get_staticdata,
+	on_activate = on_activate,
+
+	_lastpos={},
+}
+local egg_ENTITY={
+	physical = false,
+	timer=0,
+	textures = {"mcl_throwing_egg.png"},
+	visual_size = {x=0.45, y=0.45},
+	collisionbox = {0,0,0,0,0,0},
+
+	get_staticdata = get_staticdata,
+	on_activate = on_activate,
+
+	_lastpos={},
+}
+-- Ender pearl entity
+local pearl_ENTITY={
+	physical = false,
+	timer=0,
+	textures = {"mcl_throwing_ender_pearl.png"},
+	visual_size = {x=0.9, y=0.9},
+	collisionbox = {0,0,0,0,0,0},
+
+	get_staticdata = get_staticdata,
+	on_activate = on_activate,
+
+	_lastpos={},
+	_thrower = nil,		-- Player ObjectRef of the player who threw the ender pearl
+}
+
+-- Snowball and egg entity on_step()--> called when snowball is moving.
+local on_step = function(self, dtime)
+	self.timer=self.timer+dtime
+	local pos = self.object:getpos()
+	local node = minetest.get_node(pos)
+	local def = minetest.registered_nodes[node.name]
+
+	-- Destroy when hitting a solid node
+	if self._lastpos.x~=nil then
+		if (def and def.walkable) or not def then
+			self.object:remove()
+			return
+		end
+	end
+	self._lastpos={x=pos.x, y=pos.y, z=pos.z} -- Set _lastpos-->Node will be added at last pos outside the node
+end
+
+-- Movement function of ender pearl
+local pearl_on_step = function(self, dtime)
+	self.timer=self.timer+dtime
+	local pos = self.object:getpos()
+	local node = minetest.get_node(pos)
+	local def = minetest.registered_nodes[node.name]
+
+	-- Destroy when hitting a solid node
+	if self._lastpos.x~=nil then
+		if (def and def.walkable) or not def then
+			local player = minetest.get_player_by_name(self._thrower)
+			if player then
+				-- Teleport and hurt player
+				player:setpos(pos)
+				player:set_hp(player:get_hp() - 5)
+			end
+			self.object:remove()
+			return
+		end
+	end
+	self._lastpos={x=pos.x, y=pos.y, z=pos.z} -- Set lastpos-->Node will be added at last pos outside the node
+end
+
+snowball_ENTITY.on_step = on_step
+egg_ENTITY.on_step = on_step
+pearl_ENTITY.on_step = pearl_on_step
+
+minetest.register_entity("mcl_throwing:snowball_entity", snowball_ENTITY)
+minetest.register_entity("mcl_throwing:egg_entity", egg_ENTITY)
+minetest.register_entity("mcl_throwing:ender_pearl_entity", pearl_ENTITY)
+
+-- Snowball
+minetest.register_craftitem("mcl_throwing:snowball", {
+	description = "Snowball",
+	inventory_image = "mcl_throwing_snowball.png",
+	stack_max = 16,
+	on_use = throw_function("mcl_throwing:snowball_entity"),
+	on_construct = function(pos)
+	pos.y = pos.y - 1
+		if minetest.get_node(pos).name == "default:dirt_with_grass" then
+			minetest.set_node(pos, {name="default:dirt_with_snow"})
+		end
+	end,
+})
+
+-- Egg
+minetest.register_craftitem("mcl_throwing:egg", {
+	description = "Egg",
+	inventory_image = "mcl_throwing_egg.png",
+	stack_max = 16,
+	on_use = throw_function("mcl_throwing:egg_entity"),
+	groups = { craftitem = 1 },
+})
+
+-- Ender Pearl
+minetest.register_craftitem("mcl_throwing:ender_pearl", {
+	description = "Ender Pearl",
+	wield_image = "mcl_throwing_ender_pearl.png",
+	inventory_image = "mcl_throwing_ender_pearl.png",
+	stack_max = 16,
+	on_use = throw_function("mcl_throwing:ender_pearl_entity"),
+})
+