1.4

spears.lua

@@ -0,0 +1,123 @@
+function throwing_register_spear_standard (kind, desc, eq, toughness, craft)
+	minetest.register_tool("throwing:spear_" .. kind, {
+		description = desc .. " spear",
+		inventory_image = "throwing_spear_" .. kind .. ".png",
+		wield_scale= {x=2,y=1.5,z=1.5};
+		on_use = function(itemstack, user, pointed_thing)
+			if pointed_thing.type == "object" then
+				local damage = ((eq + 20)^1.2)/10
+				pointed_thing.ref:punch(user, 1.0, {
+					full_punch_interval=1.0,
+					damage_groups={fleshy=damage},
+				}, nil)
+				if not minetest.setting_getbool("creative_mode") then
+					itemstack:add_wear(65535/(toughness*100))
+				end
+			else
+				throwing_shoot_spear(itemstack, user)
+				if not minetest.setting_getbool("creative_mode") then
+					itemstack:take_item()
+				end
+			end
+			return itemstack
+		end,
+	})
+	
+	minetest.register_node("throwing:spear_" .. kind .. "_box", {
+		drawtype = "nodebox",
+		node_box = {
+			type = "fixed",
+			fixed = {
+				-- Shaft
+				{-60/16, -2/16, 2/16, 4, 1/16, -1/16},
+				--Spitze
+				{-4, -1/16, 1/16, -62/16, 0, 0},
+				{-62/16, -1.5/16, 1.5/16, -60/16, 0.5/16, -0.5/16},
+			}
+		},
+		tiles = {"throwing_spear_box.png"},
+		groups = {not_in_creative_inventory=1},
+	})
+	
+	local THROWING_SPEAR_ENTITY={
+		physical = false,
+		timer=0,
+		visual = "wielditem",
+		visual_size = {x=0.1, y=0.1},
+		textures = {"throwing:spear_" .. kind .. "_box"},
+		lastpos={},
+		collisionbox = {0,0,0,0,0,0},
+	}
+	
+	THROWING_SPEAR_ENTITY.on_step = function(self, dtime)
+		self.timer=self.timer+dtime
+		local pos = self.object:getpos()
+		local node = minetest.get_node(pos)
+	
+		if self.timer>0.2 then
+			local objs = minetest.get_objects_inside_radius({x=pos.x,y=pos.y,z=pos.z}, 2)
+			for k, obj in pairs(objs) do
+				if obj:get_luaentity() ~= nil then
+					if obj:get_luaentity().name ~= "throwing:spear_" .. kind .. "_entity" and obj:get_luaentity().name ~= "__builtin:item" then
+						local speed = vector.length(self.object:getvelocity())
+						local damage = ((speed + eq +5)^1.2)/10					
+						obj:punch(self.object, 1.0, {
+							full_punch_interval=1.0,
+							damage_groups={fleshy=damage},
+						}, nil)
+						self.object:remove()
+						if math.random() < toughness then
+							minetest.add_item(self.lastpos, 'throwing:spear_' .. kind)
+						else
+							minetest.add_item(self.lastpos, 'default:stick')
+						end
+					end
+				end
+			end
+		end
+	
+		if self.lastpos.x~=nil then
+			if node.name ~= "air" and not string.find(node.name, 'default:grass') and not string.find(node.name, 'default:junglegrass') and not string.find(node.name, 'flowers:') and not string.find(node.name, 'farming:') then
+				self.object:remove()
+				if math.random() < toughness then
+					minetest.add_item(self.lastpos, 'throwing:spear_' .. kind)
+				else
+					minetest.add_item(self.lastpos, 'default:stick')
+				end
+			end
+		end
+		self.lastpos={x=pos.x, y=pos.y, z=pos.z}
+	end
+	
+	minetest.register_entity("throwing:spear_" .. kind .. "_entity", THROWING_SPEAR_ENTITY)
+	
+	minetest.register_craft({
+		output = 'throwing:spear_' .. kind,
+		recipe = {
+			{'group:wood', 'group:wood', craft},
+		}
+	})
+	
+	minetest.register_craft({
+		output = 'throwing:spear_' .. kind,
+		recipe = {
+			{craft, 'group:wood', 'group:wood'},
+		}
+	})
+end
+
+if not DISABLE_STONE_SPEAR then
+	throwing_register_spear_standard ('stone', 'Stone', 0, 0.75, 'group:stone')
+end
+
+if not DISABLE_STEEL_SPEAR then
+	throwing_register_spear_standard ('steel', 'Steel', 5, 0.90, 'default:steel_ingot')
+end
+
+if not DISABLE_DIAMOND_SPEAR then
+	throwing_register_spear_standard ('diamond', 'Diamond', 10, 0.99, 'default:diamond')
+end
+
+if not DISABLE_OBSIDIAN_SPEAR then
+	throwing_register_spear_standard ('obsidian', 'Obsidian', 15, 0.80, 'default:obsidian')
+end