From 3a617bcb6e0ac17828facfa7723c22cef916d0c8 Mon Sep 17 00:00:00 2001
From: PilzAdam <pilzadam@minetest.net>
Date: Tue, 19 Mar 2013 00:32:21 +0100
Subject: [PATCH] Add papyrus and cactus growing

---
 mods/default/init.lua | 55 +++++++++++++++++++++++++++++++++++++++++++
 1 file changed, 55 insertions(+)

diff --git a/mods/default/init.lua b/mods/default/init.lua
index c29a6c0..a0b1e79 100644
--- a/mods/default/init.lua
+++ b/mods/default/init.lua
@@ -2043,4 +2043,59 @@ minetest.register_abm({
 	end,
 })
 
+--
+-- Papyrus and cactus growing
+--
+
+minetest.register_abm({
+	nodenames = {"default:cactus"},
+	neighbors = {"group:sand"},
+	interval = 50,
+	chance = 20,
+	action = function(pos, node)
+		pos.y = pos.y-1
+		local name = minetest.env:get_node(pos).name
+		if minetest.get_item_group(name, "sand") ~= 0 then
+			pos.y = pos.y+1
+			local height = 0
+			while minetest.env:get_node(pos).name == "default:cactus" and height < 4 do
+				height = height+1
+				pos.y = pos.y+1
+			end
+			if height < 4 then
+				if minetest.env:get_node(pos).name == "air" then
+					minetest.env:set_node(pos, {name="default:cactus"})
+				end
+			end
+		end
+	end,
+})
+
+minetest.register_abm({
+	nodenames = {"default:papyrus"},
+	neighbors = {"default:dirt", "default:dirt_with_grass"},
+	interval = 50,
+	chance = 20,
+	action = function(pos, node)
+		pos.y = pos.y-1
+		local name = minetest.env:get_node(pos).name
+		if name == "default:dirt" or name == "default:dirt_with_grass" then
+			if minetest.env:find_node_near(pos, 3, {"group:water"}) == nil then
+				return
+			end
+			pos.y = pos.y+1
+			local height = 0
+			while minetest.env:get_node(pos).name == "default:papyrus" and height < 4 do
+				height = height+1
+				pos.y = pos.y+1
+			end
+			if height < 4 then
+				if minetest.env:get_node(pos).name == "air" then
+					minetest.env:set_node(pos, {name="default:papyrus"})
+				end
+			end
+		end
+	end,
+})
+
 -- END