Alpha1

defaults.lua

@@ -0,0 +1,4 @@
+DISABLE_STONE_SPEAR = false
+DISABLE_STEEL_SPEAR = false
+DISABLE_DIAMOND_SPEAR = false
+DISABLE_OBSIDIAN_SPEAR = false

depends.txt

@@ -0,0 +1 @@
+default

functions.lua

@@ -0,0 +1,14 @@
+
+
+function spears_shot (itemstack, player)
+	local spear = itemstack:get_name() .. '_entity'
+	local playerpos = player:getpos()
+	local obj = minetest.add_entity({x=playerpos.x,y=playerpos.y+1.5,z=playerpos.z}, spear)
+	local dir = player:get_look_dir()
+	obj:setvelocity({x=dir.x*14, y=dir.y*14, z=dir.z*14})
+	obj:setacceleration({x=-dir.x*.5, y=-9.8, z=-dir.z*.5})
+	obj:setyaw(player:get_look_yaw()+math.pi)
+	minetest.sound_play("spears_sound", {pos=playerpos})
+	obj:get_luaentity().wear = itemstack:get_wear()
+	return true
+end

init.lua

@@ -0,0 +1,17 @@
+dofile(minetest.get_modpath("spears").."/defaults.lua")
+
+local input = io.open(minetest.get_modpath("spears").."/spears.conf", "r")
+if input then
+	dofile(minetest.get_modpath("spears").."/spears.conf")
+	input:close()
+	input = nil
+end
+
+dofile(minetest.get_modpath("spears").."/functions.lua")
+
+dofile(minetest.get_modpath("spears").."/tools.lua")
+
+
+if minetest.setting_get("log_mods") then
+	minetest.log("action", "spears loaded")
+end

tools.lua

@@ -0,0 +1,124 @@
+function spears_register_spear(kind, desc, eq, toughness, craft)
+
+	minetest.register_tool("spears:spear_" .. kind, {
+		description = desc .. " spear",
+		inventory_image = "spears_spear_" .. kind .. ".png",
+		wield_scale= {x=2,y=1,z=1},
+		on_drop = function(itemstack, user, pointed_thing)
+			spears_shot(itemstack, user)
+			if not minetest.setting_getbool("creative_mode") then
+				itemstack:take_item()
+			end
+			return itemstack
+		end,
+		on_place = function(itemstack, user, pointed_thing)
+			minetest.add_item(pointed_thing.above, itemstack)
+			if not minetest.setting_getbool("creative_mode") then
+				itemstack:take_item()
+			end
+			return itemstack
+		end,
+		tool_capabilities = {
+			full_punch_interval = 1.5,
+			max_drop_level=1,
+			groupcaps={
+				cracky = {times={[3]=2}, uses=toughness, maxlevel=1},
+			},
+			damage_groups = {fleshy=eq},
+		}
+	})
+	
+	--minetest.register_node("spears: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 = {"spears_spear_box.png"},
+		--groups = {not_in_creative_inventory=1},
+	--})
+	
+	local SPEAR_ENTITY={
+		physical = false,
+		timer=0,
+		visual = "wielditem",
+		visual_size = {x=0.15, y=0.1},
+		textures = {"spears:spear_" .. kind},
+		lastpos={},
+		collisionbox = {0,0,0,0,0,0},
+	}
+	
+	SPEAR_ENTITY.on_step = function(self, dtime)
+		self.timer=self.timer+dtime
+		local pos = self.object:getpos()
+		local node = minetest.get_node(pos)
+		if not self.wear then
+			self.object:remove()
+			return
+		end
+		
+		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 ~= "spears:spear_" .. kind .. "_entity" and obj:get_luaentity().name ~= "__builtin:item" then
+						local speed = vector.length(self.object:getvelocity())
+						local damage = ((speed + eq)^1.2)/3
+						obj:punch(self.object, 1.0, {
+							full_punch_interval=1.0,
+							damage_groups={fleshy=damage},
+						}, nil)
+						self.object:remove()
+						minetest.add_item(self.lastpos, {name='spears:spear_' .. kind, count=1, wear=self.wear+65535/toughness, metadata=""})
+					end
+				end
+			end
+		end
+	
+		if self.lastpos.x~=nil then
+			if node.name ~= "air" and not (string.find(node.name, 'grass') and not string.find(node.name, 'dirt')) and not string.find(node.name, 'flowers:') and not string.find(node.name, 'farming:') then
+				self.object:remove()
+				minetest.add_item(self.lastpos, {name='spears:spear_' .. kind, count=1, wear=self.wear+65535/toughness, metadata=""})
+			end
+		end
+		self.lastpos={x=pos.x, y=pos.y, z=pos.z}
+	end
+	
+	minetest.register_entity("spears:spear_" .. kind .. "_entity", SPEAR_ENTITY)
+	
+	minetest.register_craft({
+		output = 'spears:spear_' .. kind .. ' 4',
+		recipe = {
+			{'group:wood', 'group:wood', craft},
+		}
+	})
+	
+	minetest.register_craft({
+		output = 'spears:spear_' .. kind .. ' 4',
+		recipe = {
+			{craft, 'group:wood', 'group:wood'},
+		}
+	})
+end
+
+if not DISABLE_STONE_SPEAR then
+	spears_register_spear('stone', 'Stone', 4, 20, 'group:stone')
+end
+
+if not DISABLE_STEEL_SPEAR then
+	spears_register_spear('steel', 'Steel', 6, 30, 'default:steel_ingot')
+end
+
+if not DISABLE_OBSIDIAN_SPEAR then
+	spears_register_spear('obsidian', 'Obsidian', 8, 30, 'default:obsidian')
+end
+
+if not DISABLE_DIAMOND_SPEAR then
+	spears_register_spear('diamond', 'Diamond', 8, 40, 'default:diamond')
+end