melons

mods/crops/LICENSE

@@ -0,0 +1,17 @@
+
+Crops - a minetest mod that adds more farming crops
+
+See spdx.org/licenses to see what the License Identifiers used below mean.
+
+=~=~=~=~=~=~=~=~=~=~=~=~=~=~=~=~=~=~=~=~=~=~
+
+All source code (lua):
+	(C) Auke Kok <sofar@foo-projects.org>
+	LGPL-2.0+
+
+All textures, models, sounds:
+	(C) Auke Kok <sofar@foo-projects.org>
+	CC-BY-SA-3.0
+
+=~=~=~=~=~=~=~=~=~=~=~=~=~=~=~=~=~=~=~=~=~=~
+

mods/crops/README.md

@@ -0,0 +1,17 @@
+
+Crops - more farming crops mod for minetest
+
+Copyright (C) 2015 - Auke Kok <sofar@foo-projects.org>
+
+=~=~=~=~=~=~=~=~=~=~=~=~=~=~=~=~=~=~=~=~=~=~=~
+
+This minetest mod expands the basic set of farming-related
+crops that minetest_game offers. A list of crops/crafts is
+below.
+
+1. Melons
+
+Melon plants grow from melon seeds. Once a plant is mature (there
+are 5 stages) it will spawn a melon block adjacent to the plant.
+The melon block can be harvested by punching, and yields 3-5
+melon slices. The melon slice can be crafted to a melon seed.

mods/crops/depends.txt

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

mods/crops/init.lua

@@ -0,0 +1,15 @@
+
+--[[
+
+Copyright (C) 2015 - Auke Kok <sofar@foo-projects.org>
+
+"crops" is free software; you can redistribute it and/or modify
+it under the terms of the GNU Lesser General Public License as
+published by the Free Software Foundation; either version 2.1
+of the license, or (at your option) any later version.
+
+--]]
+
+dofile(minetest.get_modpath(minetest.get_current_modname()) .. "/melon.lua")
+
+minetest.log("action", "[crops] loaded.")

mods/crops/melon.lua

@@ -0,0 +1,202 @@
+
+--[[
+
+Copyright (C) 2015 - Auke Kok <sofar@foo-projects.org>
+
+"crops" is free software; you can redistribute it and/or modify
+it under the terms of the GNU Lesser General Public License as
+published by the Free Software Foundation; either version 2.1
+of the license, or (at your option) any later version.
+
+--]]
+
+local faces = {
+	[1] = { x = -1, z = 0, r = 3, o = 1 } ,
+	[2] = { x = 1, z = 0, r = 1, o = 3 } ,
+	[3] = { x = 0, z = -1, r = 2, o = 0 } ,
+	[4] = { x = 0, z = 1, r = 0, o = 2 }
+}
+
+minetest.register_node("crops:melon_seed", {
+	description = "melon seed",
+	inventory_image = "crops_melon_seed.png",
+	wield_image = "crops_melon_seed.png",
+	tiles = { "crops_melon_plant_1.png" },
+	drawtype = "plantlike",
+	sunlight_propagates = false,
+	use_texture_alpha = true,
+	walkable = false,
+	paramtype = "light",
+	groups = { snappy=3,flammable=3,flora=1,attached_node=1 },
+
+	on_place = function(itemstack, placer, pointed_thing)
+		local under = minetest.get_node(pointed_thing.under)
+		if minetest.get_item_group(under.name, "soil") <= 1 then
+			return
+		end
+		minetest.set_node(pointed_thing.above, {name="crops:melon_plant_1"})
+		if not minetest.setting_getbool("creative_mode") then
+			itemstack:take_item()
+		end
+		return itemstack
+	end
+})
+
+for stage = 1, 5 do
+minetest.register_node("crops:melon_plant_" .. stage , {
+	description = "melon plant",
+	tiles = { "crops_melon_plant_" .. stage .. ".png" },
+	drawtype = "plantlike",
+	sunlight_propagates = true,
+	use_texture_alpha = true,
+	walkable = false,
+	paramtype = "light",
+	groups = { snappy=3, flammable=3, flora=1, attached_node=1, not_in_creative_inventory=1 },
+	drop = "crops:melon_seed",
+	selection_box = {
+		type = "fixed",
+		fixed = {-0.5, -0.5, -0.5,  0.5, -0.5 + (((math.min(stage, 4)) + 1) / 5), 0.5}
+	}
+})
+end
+
+minetest.register_node("crops:melon_plant_5_attached", {
+	visual = "mesh",
+	mesh = "crops_plant_extra_face.obj",
+	description = "melon plant",
+	tiles = { "crops_melon_stem.png", "crops_melon_plant_4.png" },
+	drawtype = "mesh",
+	paramtype2 = "facedir",
+	sunlight_propagates = true,
+	use_texture_alpha = true,
+	walkable = false,
+	paramtype = "light",
+	groups = { snappy=3, flammable=3, flora=1, attached_node=1, not_in_creative_inventory=1 },
+	drop = "crops:melon_seed",
+})
+
+
+minetest.register_craftitem("crops:melon_slice", {
+	description = "Melon slice",
+	inventory_image = "crops_melon_slice.png",
+	on_use = minetest.item_eat(1)
+})
+
+minetest.register_craft({
+	type = "shapeless",
+	output = "crops:melon_seed",
+	recipe = { "crops:melon_slice" }
+})
+
+--
+-- the melon "block"
+--
+minetest.register_node("crops:melon", {
+	description = "Melon",
+	tiles = { "crops_melon_top.png", "crops_melon_bottom.png", "crops_melon.png", "crops_melon.png", "crops_melon.png", "crops_melon.png" },
+	sunlight_propagates = false,
+	use_texture_alpha = false,
+	walkable = true,
+	groups = { snappy=3, flammable=3, oddly_breakable_by_hand=2 },
+	drop = {max_items = 5, items = {
+		{ items = {'crops:melon_slice'}, rarity = 1 },
+		{ items = {'crops:melon_slice'}, rarity = 1 },
+		{ items = {'crops:melon_slice'}, rarity = 1 },
+		{ items = {'crops:melon_slice'}, rarity = 2 },
+		{ items = {'crops:melon_slice'}, rarity = 5 },
+	}},
+	sounds = default.node_sound_wood_defaults({
+		dig = { name = "default_dig_oddly_breakable_by_hand" },
+		dug = { name = "default_dig_choppy" }
+	}),
+	on_dig = function(pos, node, digger)
+		local code = minetest.node_dig(pos, node, digger)
+		for face = 1, 4 do
+			local s = { x = pos.x + faces[face].x, y = pos.y, z = pos.z + faces[face].z }
+			local n = minetest.get_node(s)
+			if n.name == "crops:melon_plant_5_attached" then
+				-- make sure it was actually attached to this stem
+				if n.param2 == faces[face].o then
+					minetest.set_node(s, { name = "crops:melon_plant_4" })
+					return code
+				end
+			end
+		end
+		return code
+	end
+})
+
+--
+-- grows a plant to mature size
+--
+minetest.register_abm({
+	nodenames = { "crops:melon_plant_1", "crops:melon_plant_2", "crops:melon_plant_3","crops:melon_plant_4" },
+	interval = 30,
+	chance = 10,
+	action = function(pos, node, active_object_count, active_object_count_wider)
+		if minetest.get_node_light(pos, nil) < 13 then
+			return
+		end
+		local n = string.gsub(node.name, "4", "5")
+		n = string.gsub(n, "3", "4")
+		n = string.gsub(n, "2", "3")
+		n = string.gsub(n, "1", "2")
+		minetest.set_node(pos, { name = n })
+	end
+})
+
+--
+-- grows a melon
+--
+minetest.register_abm({
+	nodenames = { "crops:melon_plant_5" },
+	interval = 30,
+	chance = 10,
+	action = function(pos, node, active_object_count, active_object_count_wider)
+		if minetest.get_node_light(pos, nil) < 13 then
+			return
+		end
+		for face = 1, 4 do
+			local t = { x = pos.x + faces[face].x, y = pos.y, z = pos.z + faces[face].z }
+			if minetest.get_node(t).name == "crops:melon" then
+				return
+			end
+		end
+		local r = math.random(1, 4)
+		local t = { x = pos.x + faces[r].x, y = pos.y, z = pos.z + faces[r].z }
+		local n = minetest.get_node(t)
+		if n.name == "ignore" then
+			return
+		end
+
+		if minetest.registered_nodes[minetest.get_node({ x = t.x, y = t.y - 1, z = t.z }).name].walkable == false then
+			return
+		end
+
+		if minetest.registered_nodes[n.name].drawtype == "plantlike" or
+		   minetest.registered_nodes[n.name].groups.flora == 1 or
+		   n.name == "air" then
+			minetest.set_node(t, {name = "crops:melon"})
+			minetest.set_node(pos, {name = "crops:melon_plant_5_attached", param2 = faces[r].r})
+		end
+	end
+})
+
+--
+-- return a melon to a normal one if there is no melon attached, so it can
+-- grow a new melon again
+--
+minetest.register_abm({
+	nodenames = { "crops:melon_plant_5_attached" },
+	interval = 30,
+	chance = 1,
+	action = function(pos, node, active_object_count, active_object_count_wider)
+		for face = 1, 4 do
+			local t = { x = pos.x + faces[face].x, y = pos.y, z = pos.z + faces[face].z }
+			if minetest.get_node(t).name == "crops:melon" then
+				return
+			end
+		end
+		minetest.set_node(pos, {name = "crops:melon_plant_4" })
+	end
+})

mods/crops/models/crops_plant_extra_face.obj

@@ -0,0 +1,49 @@
+# Blender v2.60 (sub 0) OBJ File: 'p1.blend'
+# www.blender.org
+mtllib crops_plant_extra_face.mtl
+o Mesh_Stem_Stem
+v -0.000000 0.500000 0.500000
+v 0.000000 -0.500000 0.500000
+v 0.000000 -0.500000 -0.500000
+v -0.000000 0.500000 -0.500000
+vt 0.000000 0.000000
+vt 1.000000 0.000000
+vt 1.000000 1.000000
+vt 0.000000 1.000000
+vn 1.000000 0.000000 -0.000000
+g Mesh_Stem_Stem_Material.002
+usemtl Material.002
+s off
+f 1/1/1 2/2/1 3/3/1 4/4/1
+o Mesh_Plant_Plant
+v 0.359670 -0.500000 0.347329
+v 0.359670 0.500000 0.347329
+v -0.359670 0.500000 -0.347329
+v -0.359670 -0.500000 -0.347329
+v -0.347329 -0.500000 0.359670
+v -0.347329 0.500000 0.359670
+v 0.347329 0.500000 -0.359670
+v 0.347329 -0.500000 -0.359670
+v 0.359670 -0.500000 0.347329
+v -0.359670 -0.500000 -0.347329
+v -0.359670 0.500000 -0.347329
+v 0.359670 0.500000 0.347329
+v -0.347329 -0.500000 0.359670
+v 0.347329 -0.500000 -0.359670
+v 0.347329 0.500000 -0.359670
+v -0.347329 0.500000 0.359670
+vt 1.000000 0.000000
+vt 1.000000 1.000000
+vt 0.000000 1.000000
+vt 0.000000 0.000000
+vn -0.694658 0.000000 0.719340
+vn -0.719340 -0.000000 -0.694658
+vn 0.694658 -0.000000 -0.719340
+vn 0.719340 0.000000 0.694658
+g Mesh_Plant_Plant_Material.001
+usemtl Material.001
+s off
+f 5/5/2 6/6/2 7/7/2 8/8/2
+f 9/5/3 10/6/3 11/7/3 12/8/3
+f 13/5/4 14/8/4 15/7/4 16/6/4
+f 17/5/5 18/8/5 19/7/5 20/6/5

mods/default/nodes.lua

@@ -748,10 +748,18 @@ minetest.register_node("default:cactus", {
 	groups = {snappy=1,choppy=3,flammable=2},
 	sounds = default.node_sound_wood_defaults(),
 	on_place = minetest.rotate_node,
+	damage_per_second = 1,
 
 	after_dig_node = function(pos, node, metadata, digger)
 		default.dig_up(pos, node, digger)
 	end,
+	on_punch = function(pos, node, puncher)
+		if not puncher then return end
+
+		if puncher:get_wielded_item():get_name() == "" then 
+			minetest.sound_play("player_damage", {pos = pos, gain = 0.3, max_hear_distance = 10}) 
+		end
+	end,
 })
 
 minetest.register_node("default:papyrus", {

mods/hud/hunger.lua

@@ -360,6 +360,10 @@ if minetest.get_modpath("ferns") ~= nil then
 	overwrite("ferns:horsetail_01", 1)
 end
 
+if minetest.get_modpath("crops") ~= nil then
+	overwrite("crops:melon_slice", 2)
+end
+
 -- player-action based hunger changes
 function hud.handle_node_actions(pos, oldnode, player, ext)
 	if not player or not player:is_player() then