From f1885aa687224c4e7a6d7b45bbc3403bbb8402ac Mon Sep 17 00:00:00 2001
From: srifqi <muhammadrifqipriyosusanto@gmail.com>
Date: Sun, 21 Sep 2014 11:15:35 +0700
Subject: [PATCH] Big update (1)

Update README. Add 'Swampland' biome. More common cave. 'Cutted tree' bugfix. Add 'amgmt_regenerate' to regenerate map chunk. Add 'amgmt_fixlight' to fix lighting. Add Savanna and Pine sapling, tree, leaves, and wood. Experimenting with minetest.register_ore.
---
 README.md                          |  13 +-
 biome.lua                          |  63 +++--
 init.lua                           | 213 +++++++++++------
 nodes.lua                          |  95 +++++++-
 oremgr.lua                         |  28 +++
 textures/amgmt_pine_leaves.png     | Bin 0 -> 3681 bytes
 textures/amgmt_pine_sapling.png    | Bin 0 -> 3029 bytes
 textures/amgmt_pine_wood.png       | Bin 0 -> 3719 bytes
 textures/amgmt_savanna_leaves.png  | Bin 0 -> 3681 bytes
 textures/amgmt_savanna_sapling.png | Bin 0 -> 3063 bytes
 textures/amgmt_savanna_wood.png    | Bin 0 -> 3719 bytes
 textures/jpg.jpg                   | Bin 0 -> 14336 bytes
 trees.lua                          | 354 ++++++++++++++++-------------
 13 files changed, 521 insertions(+), 245 deletions(-)
 create mode 100644 textures/amgmt_pine_leaves.png
 create mode 100644 textures/amgmt_pine_sapling.png
 create mode 100644 textures/amgmt_pine_wood.png
 create mode 100644 textures/amgmt_savanna_leaves.png
 create mode 100644 textures/amgmt_savanna_sapling.png
 create mode 100644 textures/amgmt_savanna_wood.png
 create mode 100644 textures/jpg.jpg

diff --git a/README.md b/README.md
index bf92d95..d9c4e90 100644
--- a/README.md
+++ b/README.md
@@ -13,11 +13,19 @@ CC0 1.0 Universal
 - flowers
 
 ##Feature
-- 15 biome
+- 16 biome
 - Biomes, Trees, Nodes, Ores, etc. are modifyable
 - Experimental water lakes!
+- 'Moreores' mod support
 - New caving system! (May intersect with fissure)
-- Using 9 2D perlin noise and 1 3D perlin noise
+- Using 25 2D perlin noise and 1 3D perlin noise
+
+##Noise usage
+- 2 noise for height
+- 2 noise for temperature and humidity
+- 1 noise for experimental water lake
+- 10 noise for caves
+- 10 noise for cave deepness
 
 ##List of Biomes
 - Frozen River
@@ -31,6 +39,7 @@ CC0 1.0 Universal
 - Plains
 - Flower Plains
 - River
+- Swampland
 - Forest
 - Jungle
 - Savanna
diff --git a/biome.lua b/biome.lua
index f0a6289..6fc3e2a 100644
--- a/biome.lua
+++ b/biome.lua
@@ -34,7 +34,7 @@ badd({
 			return c_ice
 		elseif y < base - 2 then
 			return c_stone
-		elseif y < base and y > base - 3 then
+		elseif y < base and y >= base - 3 then
 			return c_sandstone
 		else
 			return c_sand
@@ -55,7 +55,7 @@ badd({
 			return c_water
 		elseif y < base - 2 then
 			return c_stone
-		elseif y < base and y > base - 3 then
+		elseif y < base and y >= base - 3 then
 			return c_sandstone
 		else
 			return c_sand
@@ -85,7 +85,7 @@ badd({
 			end
 		elseif y < base - 2 then
 			return c_stone
-		elseif y < base and y > base - 3 then
+		elseif y < base and y >= base - 3 then
 			return c_dirt
 		else
 			if y < wl then
@@ -116,7 +116,7 @@ badd({
 			end
 		elseif y < base - 2 then
 			return c_stone
-		elseif y < base and y > base - 3 then
+		elseif y < base and y >= base - 3 then
 			return c_dirt
 		else
 			if y < wl then
@@ -145,7 +145,7 @@ badd({
 			end
 		elseif y < base - 2 then
 			return c_stone
-		elseif y < base and y > base - 3 then
+		elseif y < base and y >= base - 3 then
 			return c_dirt
 		else
 			if y < wl then
@@ -224,7 +224,7 @@ badd({
 			end
 		elseif y < base - 2 then
 			return c_stone
-		elseif y < base and y > base - 3 then
+		elseif y < base and y >= base - 3 then
 			return c_dirt
 		else
 			if y < wl then
@@ -253,7 +253,7 @@ badd({
 			end
 		elseif y < base - 2 then
 			return c_stone
-		elseif y < base and y > base - 3 then
+		elseif y < base and y >= base - 3 then
 			return c_dirt
 		else
 			if y < wl then
@@ -283,7 +283,7 @@ badd({
 			end
 		elseif y < base - 2 then
 			return c_stone
-		elseif y < base and y > base - 3 then
+		elseif y < base and y >= base - 3 then
 			return c_dirt
 		else
 			if y < wl then
@@ -316,7 +316,7 @@ badd({
 			end
 		elseif y < base - 2 then
 			return c_stone
-		elseif y < base and y > base - 3 then
+		elseif y < base and y >= base - 3 then
 			return c_dirt
 		else
 			if y < wl then
@@ -327,13 +327,48 @@ badd({
 		end
 	end
 })
+badd({
+	name = "Swampland",
+	mint = 1.25,
+	maxt = 1.5,
+	minh = 45,
+	maxh = 55,
+	trees = {{"normal",27},{"grass14",16}},
+	get_block = function(temp, humi, base_, wl, y)
+		local base = base_
+		if base_ < 5 and base_ > -1 then base = base % 2 - 1 end
+		if y > base and y > wl then
+			return c_air
+		elseif y > base and y <= wl then
+			if base < wl then
+				return c_water
+			elseif base >= wl then
+				return c_air
+			end
+		elseif y < base - 2 then
+			return c_stone
+		elseif y < base and y >= base - 3 then
+			return c_dirt
+		else
+			if y < wl then
+				return c_dirt
+			else
+				if temp > 1.6 and base == wl then
+					return c_sand
+				else
+					return c_dirt_grass
+				end
+			end
+		end
+	end
+})
 badd({
 	name = "Forest",
 	mint = 1.25,
 	maxt = 1.5,
 	minh = 0,
 	maxh = 95,
-	trees = {{"normal",15},{"grass14",60},{"grass35",5},{"papyrus",15},{"flowers",15}},
+	trees = {{"normal",19},{"grass14",60},{"grass35",5},{"papyrus",16},{"flowers",18}},
 	get_block = function(temp, humi, base, wl, y)
 		if y > base and y > wl then
 			return c_air
@@ -345,7 +380,7 @@ badd({
 			end
 		elseif y < base - 2 then
 			return c_stone
-		elseif y < base and y > base - 3 then
+		elseif y < base and y >= base - 3 then
 			return c_dirt
 		else
 			if y < wl then
@@ -374,7 +409,7 @@ badd({
 			end
 		elseif y < base - 2 then
 			return c_stone
-		elseif y < base and y > base - 3 then
+		elseif y < base and y >= base - 3 then
 			return c_dirt
 		else
 			if y < wl then
@@ -402,7 +437,7 @@ badd({
 			end
 		elseif y < base - 2 then
 			return c_stone
-		elseif y < base and y > base - 3 then
+		elseif y < base and y >= base - 3 then
 			return c_dirt
 		else
 			if y < wl then
@@ -434,7 +469,7 @@ badd({
 			end
 		elseif y < base - 2 then
 			return c_sandstone
-		elseif y < base and y > base - 3 then
+		elseif y < base and y >= base - 3 then
 			return c_sand
 		else
 			return c_sand
diff --git a/init.lua b/init.lua
index 461397f..0790120 100644
--- a/init.lua
+++ b/init.lua
@@ -1,22 +1,16 @@
--- Another Map Generator for Minetest [amgmt]
--- Made by srifqi
+-- Another Map Generator for Minetest [amgmt] by srifqi
 -- License: CC0 1.0 Universal
 -- Dependencies: default, flowers
 
 amgmt = {}
 print("[amgmt] (Another Map Generator for Minetest)")
 
-minetest.register_on_mapgen_init(function(mgparams)
-	minetest.set_mapgen_params({mgname="singlenode"})
-end)
-
 --param?
 DEBUG = true -- turn this off if your debug.txt is too full
-wl = 0
+wl = 0 -- water level
 HMAX = 500
 HMIN = -30000
-BEDROCK = -4999
-BEDROCK2 = -29999
+BEDROCK = -29999 -- bedrock level
 
 function amgmt.debug(text)
 	if DEBUG == true then print("[amgmt]:"..(text or "")) end
@@ -29,6 +23,11 @@ dofile(minetest.get_modpath(minetest.get_current_modname()).."/trees.lua")
 dofile(minetest.get_modpath(minetest.get_current_modname()).."/biomemgr.lua")
 dofile(minetest.get_modpath(minetest.get_current_modname()).."/oremgr.lua")
 
+minetest.register_on_mapgen_init(function(mgparams)
+	amgmt.seed = mgparams.seed
+	minetest.set_mapgen_params({mgname="singlenode", flags="nolight"})
+end)
+
 local function get_perlin_map(np, minp, maxp)
 	local sidelen = maxp.x - minp.x +1
 	local pm = minetest.get_perlin_map(
@@ -45,11 +44,9 @@ amgmt.np = {
 	m = {s = 4321, o = 6, p = 0.5, c = 256},
 	t = {s = 5678, o = 7, p = 0.5, c = 512},
 	h = {s = 8765, o = 7, p = 0.5, c = 512},
-	c1 = {s = 1111, o = 7, p = 0.5, c = 512},
-	d1 = {s = 2222, o = 7, p = 0.5, c = 512},
-	c2 = {s = 3333, o = 7, p = 0.5, c = 512},
-	d2 = {s = 4444, o = 7, p = 0.5, c = 512},
 	l = {s = 125, o = 6, p = 0.5, c = 256},
+	c = {s = 1024, o = 7, p = 0.5, c = 512},
+	d = {s = 2048, o = 7, p = 0.5, c = 512},
 }
 
 local np = amgmt.np
@@ -101,7 +98,12 @@ local function build_cave_segment(x, y, z, data, area, shape, radius, deletednod
 		for yy = -radius, radius do
 		for xx = -radius, radius do
 			local vi = area:index(x+xx,y+yy,z+zz)
-			if data[vi] == deletednodes and distance3(x,y,z,x+xx,y+yy,z+zz) <= radius then 
+			local via = area:index(x+xx,y+yy+1,z+zz)
+			if
+				data[vi] == deletednodes and
+				distance3(x,y,z,x+xx,y+yy,z+zz) <= radius and
+				data[via] == deletednodes 
+			then
 				data[vi] = c_air
 			end
 		end
@@ -112,7 +114,8 @@ local function build_cave_segment(x, y, z, data, area, shape, radius, deletednod
 		for yy = -radius, radius do
 		for xx = -radius, radius do
 			local vi = area:index(x+xx,y+yy,z+zz)
-			if data[vi] == deletednodes then 
+			local via = area:index(x+xx,y+yy+1,z+zz)
+			if data[vi] == deletednodes and data[via] == deletednodes then
 				data[vi] = c_air
 			end
 		end
@@ -124,7 +127,8 @@ local function build_cave_segment(x, y, z, data, area, shape, radius, deletednod
 			if distance2(x,z,x+xx,z+zz) <= radius then
 				for yy = -radius, radius do
 					local vi = area:index(x+xx,y+yy,z+zz)
-					if data[vi] == deletednodes then 
+					local via = area:index(x+xx,y+yy+1,z+zz)
+					if data[vi] == deletednodes and data[via] == deletednodes then
 						data[vi] = c_air
 					end
 				end
@@ -143,16 +147,29 @@ local function amgmt_generate(minp, maxp, seed, vm, emin, emax)
 		MaxEdge={x=emax.x, y=emax.y, z=emax.z},
 	}
 	local data = vm:get_data()
+	
+	--noise
 	local base = get_perlin_map(np.b, minp, maxp) -- base height
 	local moun = get_perlin_map(np.m, minp, maxp) -- addition
 	local temp = get_perlin_map(np.t, minp, maxp) -- temperature (0-2)
 	local humi = get_perlin_map(np.h, minp, maxp) -- humidity (0-100)
 	local lake = get_perlin_map(np.l, minp, maxp) -- lake
-	local cav1 = get_perlin_map(np.c1, minp, maxp) -- cave1
-	local dep1 = get_perlin_map(np.d1, minp, maxp) -- deep1
-	local cav2 = get_perlin_map(np.c2, minp, maxp) -- cave2
-	local dep2 = get_perlin_map(np.d2, minp, maxp) -- deep2
+	
+	local cave = {} -- list of caves
+	local deep = {} -- list of cave deepness
+	for o = 1, 10 do
+		local cnp = np.c
+		cnp.s = cnp.s + o
+		cave[o] = get_perlin_map(cnp, minp, maxp)
+		local dnp = np.d
+		dnp.s = dnp.s + o
+		deep[o] = get_perlin_map(dnp, minp, maxp)
+	end
+	
 	local fissure = minetest.get_perlin(3456, 6, 0.5, 360) -- fissure
+	amgmt.debug("noise calculated")
+	
+	--terraforming
 	local nizx = 0
 	for z = minp.z, maxp.z do
 	for x = minp.x, maxp.x do
@@ -174,17 +191,19 @@ local function amgmt_generate(minp, maxp, seed, vm, emin, emax)
 			-- world height limit :(
 			if y_ < HMIN or y_ > HMAX then
 				-- air
-			elseif y_ == BEDROCK or y_ == BEDROCK2 then
+			elseif y_ == BEDROCK then
 				data[vi] = c_bedrock
 			--
 			-- fissure
 			elseif math.abs(fissure:get3d({x=x,y=y_,z=z})) < 0.0045 then
-				data[vi] = c_air
+				-- air
 			--]]
 			-- biome
 			else
-				--data[vi] = c_air
-				data[vi] = amgmt.biome.get_block_by_temp_humi(temp_, humi_, base_, wl, y_, x, z)
+				local node = amgmt.biome.get_block_by_temp_humi(temp_, humi_, base_, wl, y_, x, z)
+				if node ~= c_air then
+					data[vi] = node
+				end
 			end
 		end
 	end
@@ -200,33 +219,31 @@ local function amgmt_generate(minp, maxp, seed, vm, emin, emax)
 	for z = minp.z, maxp.z do
 	for x = minp.x, maxp.x do
 		nizx = nizx + 1
-		local cav1_ = math.abs(cav1[nizx])
-		local dep1_ = dep1[nizx] * 30 + 5
-		local cav2_ = math.abs(cav2[nizx])
-		local dep2_ = dep2[nizx] * 50 - 25
 		local base_ = math.ceil((base[nizx] * -50) + wl + 16.67 + (moun[nizx] * 15))
-		--amgmt.debug(x..","..z..":"..cav1_..","..dep1_..","..cav2_..","..dep2_)
 		
-		if cav1_ < 0.015 or cav1_ > 1-0.015 then
-			local y = math.floor(wl + dep1_ + 0.5)
-			local shape = (base_%3) + 1
-			build_cave_segment(x, y, z, data, area, shape, 1, c_stone)
-			build_cave_segment(x, y, z, data, area, shape, 1, c_dirt)
-			build_cave_segment(x, y, z, data, area, shape, 1, c_dirt_grass)
-			build_cave_segment(x, y, z, data, area, shape, 1, c_dirt_snow)
-			build_cave_segment(x, y, z, data, area, shape, 1, c_dirt_savanna)
-			--amgmt.debug("cave generated at:"..x..","..y..","..z)
-		end
-		
-		if cav2_ < 0.015 or cav2_ > 1-0.015 then
-			local y = math.floor(wl - dep2_ - 0.5)
-			local shape = (base_%3) + 1
-			build_cave_segment(x, y, z, data, area, shape, 1, c_stone)
-			build_cave_segment(x, y, z, data, area, shape, 1, c_dirt)
-			build_cave_segment(x, y, z, data, area, shape, 1, c_dirt_grass)
-			build_cave_segment(x, y, z, data, area, shape, 1, c_dirt_snow)
-			build_cave_segment(x, y, z, data, area, shape, 1, c_dirt_savanna)
-			--amgmt.debug("cave generated at:"..x..","..y..","..z)
+		for o = 1, 10 do
+			local cave_ = (cave[o][nizx]+1)/2
+			local deep_ = deep[o][nizx]
+			if o < 4 then
+				deep_ = deep_ * 30 + 5
+			elseif o < 7 then
+				deep_ = deep_ * 50 - 25
+			else
+				deep_ = deep_ * 50 - 45
+			end
+			
+			if cave_ < 0.001 or cave_ > 1-0.001 then
+				local y = math.floor(wl + deep_ + 0.5)
+				local shape = (base_%3) + 1
+				build_cave_segment(x, y, z, data, area, shape, 1, c_stone)
+				build_cave_segment(x, y, z, data, area, shape, 1, c_dirt)
+				build_cave_segment(x, y, z, data, area, shape, 1, c_dirt_grass)
+				build_cave_segment(x, y, z, data, area, shape, 1, c_dirt_snow)
+				build_cave_segment(x, y, z, data, area, shape, 1, c_dirt_savanna)
+				build_cave_segment(x, y, z, data, area, shape, 1, c_sandstone)
+				build_cave_segment(x, y, z, data, area, shape, 1, c_sand)
+				--amgmt.debug("cave generated at:"..x..","..y..","..z)
+			end
 		end
 	end
 	end
@@ -239,9 +256,9 @@ local function amgmt_generate(minp, maxp, seed, vm, emin, emax)
 	for cx = 0, chulen-1 do
 	nizx = (cz*chulen + cx) * 16
 	local found_lake = false
-	for z = minp.z + cz*16, minp.z + (cz+1)*16 do
+	for z = minp.z + cz*16 +3, minp.z + (cz+1)*16 -3 do -- +-3 for lake borders
 	if found_lake == true then break end
-	for x = minp.x + cx*16, minp.x + (cx+1)*16 do
+	for x = minp.x + cx*16 +3, minp.x + (cx+1)*16 -3 do -- +-3 for lake borders
 		if found_lake == true then break end
 		nizx = nizx + 1
 		local base_ = math.ceil((base[nizx] * -50) + wl + 16.67 + (moun[nizx] * 15))
@@ -292,6 +309,7 @@ local function amgmt_generate(minp, maxp, seed, vm, emin, emax)
 	end
 	amgmt.debug("lake formed")
 	
+	--
 	--tree planting
 	local nizx = 0
 	for z = minp.z, maxp.z do
@@ -308,12 +326,12 @@ local function amgmt_generate(minp, maxp, seed, vm, emin, emax)
 			humi_ = math.abs(humi[nizx] * 100)
 		end
 		base_ = get_base(base_, temp_, humi_)
-		local biome__ = amgmt.biome.list[amgmt.biome.get_by_temp_humi(temp_,humi_)[1]]
+		local biome__ = amgmt.biome.list[ amgmt.biome.get_by_temp_humi(temp_,humi_)[1] ]
 		local tr = biome__.trees
 		local filled = false
 		for i = 1, #tr do
 			if filled == true then break end
-			local tri = amgmt.tree.registered[tr[i][1]] or amgmt.tree.registered["nil"]
+			local tri = amgmt.tree.registered[ tr[i][1] ] or amgmt.tree.registered["nil"]
 			local chance = tr[i][2] or 1024
 			if
 				pr:next(1,chance) == 1 and
@@ -334,21 +352,6 @@ local function amgmt_generate(minp, maxp, seed, vm, emin, emax)
 	end
 	end
 	amgmt.debug("tree planted")
-	
-	--[[
-	for z = minp.z, maxp.z do
-	for y = minp.y, maxp.y do
-		local vi = area:index(x,y,z)
-	for x = minp.x, maxp.x do
-		local pos = {x:x,y:y,z:z}
-		if data[vi] = c_dirt then
-			if minetest.find_node_near(pos, 3, {"default:dirt_with_grass"}) ~= nil then
-				data[vi] = c_dirt_grass
-			end
-		end
-	end
-	end
-	end
 	--]]
 	
 	amgmt.debug("applying map data")
@@ -367,6 +370,80 @@ minetest.register_on_generated(function(minp, maxp, seed)
 	amgmt_generate(minp, maxp, seed, vm, emin, emax)
 end)
 
+local function amgmt_regenerate(pos, name)
+	minetest.chat_send_all("Regenerating "..name.."'s map chunk...")
+	local minp = {x = 80*math.floor((pos.x+32)/80)-32,
+			y = 80*math.floor((pos.y+32)/80)-32,
+			z = 80*math.floor((pos.z+32)/80)-32}
+	local maxp = {x = minp.x+79, y = minp.y+79, z = minp.z+79}
+	local vm = minetest.get_voxel_manip()
+	local emin, emax = vm:read_from_map(minp, maxp)
+	local data = {}
+	for i = 1, (maxp.x-minp.x+1)*(maxp.y-minp.y+1)*(maxp.z-minp.z+1) do
+		data[i] = c_air
+	end
+	vm:set_data(data)
+	vm:write_to_map()
+	amgmt_generate(minp, maxp, amgmt.seed or os.clock(), vm, emin, emax)
+	
+	minetest.chat_send_player(name, "Regenerating done, fixing lighting. This may take a while...")
+	-- Fix lighting
+	local nodes = minetest.find_nodes_in_area(minp, maxp, "air")
+	local nnodes = #nodes
+	local p = math.floor(nnodes/5)
+	local dig_node = minetest.dig_node
+	for _, pos in ipairs(nodes) do
+		dig_node(pos)
+		if _%p == 0 then
+			minetest.chat_send_player(name, math.floor(_/nnodes*100).."%")
+		end
+	end
+	minetest.chat_send_all("Done")
+end
+
+minetest.register_chatcommand("amgmt_regenerate", {
+	privs = {server = true},
+	func = function(name, param)
+		local player = minetest.get_player_by_name(name)
+		if player then
+			local pos = player:getpos()
+			amgmt_regenerate(pos, name)
+		end
+	end,
+})
+
+local function amgmt_fixlight(pos, name)
+	minetest.chat_send_player(name, "Fixing lightning. This may take a while...")
+	local minp = {x = 80*math.floor((pos.x+32)/80)-32,
+			y = 80*math.floor((pos.y+32)/80)-32,
+			z = 80*math.floor((pos.z+32)/80)-32}
+	local maxp = {x = minp.x+79, y = minp.y+79, z = minp.z+79}
+	
+	-- Fix lighting
+	local nodes = minetest.find_nodes_in_area(minp, maxp, "air")
+	local nnodes = #nodes
+	local p = math.floor(nnodes/5)
+	local dig_node = minetest.dig_node
+	for _, pos in ipairs(nodes) do
+		dig_node(pos)
+		if _%p == 0 then
+			minetest.chat_send_player(name, math.floor(_/nnodes*100).."%")
+		end
+	end
+	minetest.chat_send_all("Done")
+end
+
+minetest.register_chatcommand("amgmt_fixlight", {
+	privs = {server = true},
+	func = function(name, param)
+		local player = minetest.get_player_by_name(name)
+		if player then
+			local pos = player:getpos()
+			amgmt_fixlight(pos, name)
+		end
+	end,
+})
+
 dofile(minetest.get_modpath(minetest.get_current_modname()).."/hud.lua")
 
 print("[amgmt]:"..amgmt.tree.count.." tree(s) registered")
diff --git a/nodes.lua b/nodes.lua
index 49151d9..45ccac5 100644
--- a/nodes.lua
+++ b/nodes.lua
@@ -1,5 +1,5 @@
 minetest.register_node("amgmt:bedrock", {
-	description = "amgmt's BEDROCK",
+	description = "amgmt's BEDROCK (How you get this?)",
 	tiles ={"default_cobble.png"},
 	groups = {unbreakable = 1, not_in_creative_inventory = 1},
 	sounds = default.node_sound_stone_defaults()
@@ -14,4 +14,95 @@ minetest.register_node("amgmt:dirt_at_savanna", {
 	sounds = default.node_sound_dirt_defaults({
 		footstep = {name="default_grass_footstep", gain=0.25},
 	}),
-})
\ No newline at end of file
+})
+
+local tree_add = {
+	{"savanna","Savanna"},
+	{"pine","Pine"},
+}
+
+for i=1, #tree_add do
+	minetest.register_node("amgmt:"..tree_add[i][1].."_tree", {
+		description = tree_add[i][2].." Tree",
+		tiles = {
+			"default_tree_top.png",
+			"default_tree_top.png",
+			"default_tree.png",
+		},
+		paramtype2 = "facedir",
+		is_ground_content = false,
+		groups = {tree=1,choppy=2,oddly_breakable_by_hand=1,flammable=2},
+		sounds = default.node_sound_wood_defaults(),
+		on_place = minetest.rotate_node
+	})
+	
+	minetest.register_node("amgmt:"..tree_add[i][1].."_sapling", {
+		description = tree_add[i][2].." Sapling",
+		drawtype = "plantlike",
+		visual_scale = 1.0,
+		tiles = {"amgmt_"..tree_add[i][1].."_sapling.png"},
+		inventory_image = "amgmt_"..tree_add[i][1].."_sapling.png",
+		wield_image = "amgmt_"..tree_add[i][1].."_sapling.png",
+		paramtype = "light",
+		walkable = false,
+		is_ground_content = true,
+		selection_box = {
+			type = "fixed",
+			fixed = {-0.3, -0.5, -0.3, 0.3, 0.35, 0.3}
+		},
+		groups = {snappy=2,dig_immediate=3,flammable=2,attached_node=1},
+		sounds = default.node_sound_leaves_defaults(),
+	})
+	
+	minetest.register_node("amgmt:"..tree_add[i][1].."_leaves", {
+		description = tree_add[i][2].." Leaves",
+		drawtype = "allfaces_optional",
+		waving = 1,
+		visual_scale = 1.3,
+		tiles = {"amgmt_"..tree_add[i][1].."_leaves.png"},
+		paramtype = "light",
+		is_ground_content = false,
+		groups = {snappy=3, leafdecay=3, flammable=2, leaves=1},
+		drop = {
+			max_items = 1,
+			items = {
+				{
+					-- player will get sapling with 1/20 chance
+					items = {'amgmt:'..tree_add[i][1]..'_sapling'},
+					rarity = 20,
+				},
+				{
+					-- player will get leaves only if he get no saplings,
+					-- this is because max_items is 1
+					items = {'amgmt:'..tree_add[i][1]..'_leaves'},
+				}
+			}
+		},
+		sounds = default.node_sound_leaves_defaults(),
+	})
+	
+	minetest.register_abm({
+		nodenames = {"amgmt:"..tree_add[i][1].."_sapling"},
+		interval = 10,
+		chance = 50,
+		action = function(pos, node)
+			local nu =  minetest.get_node({x=pos.x, y=pos.y-1, z=pos.z}).name
+			local is_soil = minetest.get_item_group(nu, "soil")
+			if is_soil == 0 then
+				return
+			end
+			
+			minetest.log("action", "A "..tree_add[i][1].." sapling grows into a tree at "..minetest.pos_to_string(pos))
+			local vm = minetest.get_voxel_manip()
+			local minp, maxp = vm:read_from_map({x=pos.x-16, y=pos.y, z=pos.z-16}, {x=pos.x+16, y=pos.y+16, z=pos.z+16})
+			local area = VoxelArea:new{MinEdge=minp, MaxEdge=maxp}
+			local data = vm:get_data()
+			amgmt.tree[tree_add[i][1].."_tree"](
+				pos, data, area, (amgmt.seed or i), minp, maxp, PseudoRandom(os.clock())
+			)
+			vm:set_data(data)
+			vm:write_to_map(data)
+			vm:update_map()
+		end
+	})
+end
\ No newline at end of file
diff --git a/oremgr.lua b/oremgr.lua
index 2f0f224..0964617 100644
--- a/oremgr.lua
+++ b/oremgr.lua
@@ -35,6 +35,34 @@ function amgmt.ore.register_sheet(def)
 	seeddiff_count = seeddiff_count +1
 end
 
+
+--[[
+minetest.register_ore({
+    ore_type       = "scatter",
+    ore            = "default:stone_with_coal",
+    wherein        = "default:stone",
+    clust_scarcity = 8*8*8,
+    clust_num_ores = 8,
+    clust_size     = 3,
+    height_min     = -31000,
+    height_max     = 64,
+})
+--]]
+function minetest.register_ore(def)
+	amgmt.debug(def.ore.." added")
+	if def.ore_type == "scatter" then
+		def.wherein = def.wherein or "default:stone"
+		
+		local multiplier = 16*16*16 / clust_scarcity
+		def.clust_num = def.clust_size * multiplier
+		
+		def.minh = def.height_min
+		def.maxh = def.height_max
+		
+		amgmt.ore.register_ore(def)
+	end
+end
+
 local function get_nearest_cube(n)
 	for i=1, 16 do if i*i*i>=n then return i end end
 	return 0
diff --git a/textures/amgmt_pine_leaves.png b/textures/amgmt_pine_leaves.png
new file mode 100644
index 0000000000000000000000000000000000000000..6acb6ca66d74a575dff6ffaf665873749c833037
GIT binary patch
literal 3681
zcmW;Pbx_n>8wc<o7o=N4QaYAyY1pMZ7IrCVmJms$1Q(D-Qkq3VIwWLiq?@IrO9e#a
zg6}0RC;~6{_nCRlcg`PY=A38d%$$>8Vx&z$%1jCX0EMoOhS^<G|5wELccXv^mHAze
z`07{%007zj{|XPtFMI$1q{bdFn2CwIPoPhLyN@r2E)2%u>+j>{@x&DXg4ZzSD7g6n
zgYw1J8B{+W{YKx%jGmao44Q<dOXq`dl2Gf#bC#^qoA%RaY7(%F702VJq@a`OO@+x5
zNmqz=IZIQb%i<F!uD*noc`bEce4D;$T~^tzJH@oj5cLt0XX{9r%Am=sq3krDqeq8E
zzU+#sMUwLP-tD`^g)`uq8xOdQP*M`&>Lcm}@PZe}h=D%Cf<AH9xLc|p&^%i_^eeo+
z!1PD@#ArG|Ei?sM0jO!=p)t99=0Gt4;4tazv;&xk01o^wzbyc0%w=8}9$@o^lOC@)
z9pJd{8m|GkD*|;hmWi4GQXHUj(;t!tRzv`CU4)ws(AWm_;i$=)0b+7M+%!H$5FiKx
z9LBi0gMn9h0G-weLg^o&2I_stU8nMzl{$FjH6v|^Mf`{m2vK$coGzmfovh<uj`?b$
z10i`#l9AF>pHHU%pg5iW?zE@Z!8pnW98NX`OKC6i<0IiMmy^@Z&E8C{uNnY+35=M#
z5f*D<Mk^Acy>Ci+j|to#lNCR^NOEhYQfmc@57rQ;zW?<`vm~u!b#-rdcSUaqYU4P8
z2){uM*!Ll>pZtnY`g3vqx%Vqiq@-P>Ho@iRfvGcta@Ls)l2=X}-%_>zw2|HZVO!uD
z(sk-ULg;o(Y5h_(@{>;`%efMu8G^&S^S3Tvw}r3pRkme-Mo$&Iuym0sJ7@fV_4%oh
zfqh>u0N|v{r~i`xF+SQo`pZnv?N8Nf?P6X4?WUXI2LO*Xctqh7Evlo$0H9GE329Vk
zIqQEQ+(*dTe{Z9o?2m)&D=5#<0F)X^>VjtVcMz<Lf(pb=H?lz-#6GF9N%xt$$7cFc
ziVj$`Q!4vX{dOcS>KEvaBq2~ABfjs*xfYM-l!)X`A!f{rx#aBEA)rm-;TVsnGv(4x
zm(h_hON4V+=&+qA`~M{$XRFnjt~drrM*WHH)|Pk^*=(x(iM$ooQ6<OxN~@G?)+JCP
zKb4`lVAlTwvvRU*$^LAuJJnjM3T#xo@B0HHsi7z0q9cRQrboggna-0<Ty^BNBg~DK
zb@*Kg=gu=tK?Jmsntdd)1VK;^M|O1`qyf@sMW>2`l}DOpjYN(F|CQ+gKUZdz{s+EJ
znqNZ?oFpaUkUGNLOSGx?#i+yLVMB5}v<Wat{*JW2berD6=V|A)=AW8z9|%_$Nb4|j
zXO6GAcr_ErzY*pT8jIP*><;cq?Xv80p4gCLoYef@U7CLtFq`nyW7?zMlinkA&6QNQ
zD9bn7tSW)i$fR0B>r1d^?@i;X?n^(*m!FPi(A6)mFU?wDc4u_I@Ob|{u#;vpi`^(^
z7BN40p#44PJN{V^IYlge^k_UvfT`dC(E}7y(1Z861{F*TNlc?~aXE>@-2FVNJRb`r
z1PggVpFTmFrI*E*#R3t7SJzb3Y}JrioLWr6Q>!1Fhc{?hNSW_clYGjqwWz_E9GbJ3
zqpB6F;%ZP;K5*4{5mwg;gjRzFgT}CTro~P6JKZB3WX?=2!NQzg6t%I>B4vj7nx<D@
zJco4UUbA&2Dc4k&$it-cq!2A;r*GU;iFR`RE(-&VNcIIPb50`?x9ENfeidY?kT&R$
zaJBWS$<E0}*6P%n)@mR2$Tl2RVk&wxyR5DvDb+{y_-*;MQK`6ln0@nA^UX@qN(Mt^
zh4Ti{8n1Gek}i#)k54O)bBlT(ql*lDDz`#<_J6a6i(SL7y?<ApYm*}hTgZ6`*U51Y
zl!j&ee3aP4M%Vu_h1m_N!O9)89CN<BO7ECcDqGZgtwojWF=D&Jv*SJDJyOO;$j8a2
zZ}`LTIN!{$qe8Gk(Lm8)bb4yKbb2XIra)O@S#rN%zhJpwyUoEm*jgA{g>84$ZQix6
zusX(eKaH`Lw<<?kSlhK|)nn>;m%8e^DrqV^j53XCi<VG>jsIZBvDIx%je9GE>kU|M
zY`7!Ji4oN{+%R~Y*^?RG8UFfOnTR58m9m!2nk^#WgFl^urNUM|uJBkjeE2N;Kn#VP
zp`KZh+QHtR6ddxvm=`Q)qZm;g0nw-NNeTK<lcG5)q6I7?n`1q@dV%MDc3(p0&oKop
z1p`M_>+g?ck3Ej#Hr`H2zZER9k_wm|9D{u}-J4S-dz&ThwOtos3^R^IweE9^Ig6zu
z>X#ea%7bby9Dg#Z{Hx;sc1LALNp4GW%gTOAuCHyZZPIwqr^r5L8}^d>*5x+zb`GdS
z^WvfK6C%|kZT`Bt41K}*F-28j-Syw*)g$%f;tq9s_0*{PsJ;GrPWQ3D)9N`d_H%LR
zI1kDglZfw2vqX;H9Fqnk$oXU9Vi2*aDZcSY<~fNRnV`81SirW%Z;fn?tpb#UvHW`x
zJsF5fji{&6np~%Jr|O8Po7L1J5`)xzqR%QX3Tcpi`lNUJ&(UezSIk$koiN5+u`xT}
zkP_U$SxhBEwJ5EyLbjSgywRgK|5K-iR52v;p4<=OO(6{#U>iVjiOtE*#jn6@A?!vc
zIuOIqjK9;nWkPs{rOJi(I$rTtr*#`p7;F|O6fxvK=kS(PR_Kw4&PY%5gVt~wW@1r4
zP~Y61Pu97{G~WzAO==Tk&mtQ4YDufRXC*?4g;sorTMH~hh?-HZ2)B>Z2@~?!wM9bH
zM^h~m>uGX@Ki}RS(GJjl$-tJ!>LWzhkl%XhJms5}{6f}Acj)g4#aa^9DYYkJA>NC|
zwMU4YhKL@%P(!cC$Ndvg{jGRjhh!F{dokgM8_P#_#z--%?N-O%u^1K=`h>&=x^>1J
z`j;yL8^L=laXu3t^ETdmsIDFAaG7zNcRTpDB~oNVnO&3fEr;?c#p>DzifzjeN9X@)
zu8ZYN3#@lVV__X-AC=m>T`R|N(~7F_ckna#Z@BF7{AR1;^5xUHW0tV)f2IFkT({}I
zxK<hOUAMrqFkEz7biLBOYPnEtNT@lu%)aurt2grYI~v8G$G;}xro=9Hd|G6iSB9IV
zE(slKQ;t6Dy}|qp5}}Z#uy|cK@|D|HBV_mBf@J%GokC&ld2(3Y7ovrS&)HCHVxG|a
zlYFfL^ZY9tC!0>=DV4dUA6ub+wAUX}6-p~vh3K8a$34~#q82hyCo{>IEKGQW=&ucj
z^-^ruzB6vylgj63Cw1VLdCl9TeZ_7?ob5?_;7RlP-hD(nBLBUDz4wp6A4)fw3&x{e
zg<bg#9kyN_$Duu~VQv=(EJbp-&9k16e;96;7K`MSH+xP)eJ+MC&bJvhBmDWVag$xE
zLHx({-NxPaXKF|4tFX<uMOB-djg_ApFFpH$icjY@v@Zx_qGxW>&r_*j_fqpxCu1pM
z4~rhD$jg6K^}jy&Qwf`Knc*v9yeYkzY+z&%i@01oT*l4i&Xwex<Ya#Ieo=n?qwkRE
z{rbqj2z&2%u$08(Gs~-^{-BK@wx4C&RK~k6I9>|ey8miAH=nJ%%4EvSyd}WTJ^kY>
zC9;0^-sEuBF*5{!P+kB)M+3mG+q*mffM?<W@WTNB6mkK8(I>-xSPKB~0TTnb=G_|L
zi7_Dc5YUzYJPZj42=3jxM@UFWL_|akA|W9mB_$;zBO@m#rvOn>Qc_V-QBzaX(9qD*
z(%uKr(b3V<(=#wIFfuYe05LH!F*7r>u&}VQva+$Uv4b8ye8|DU!O6+V#l^)9;^E=p
z<>lq$<KyS&7XS$g3PK<dAt51QVPO#w5mAtsn3%Y@xP*j+q@<)2NLpH2Mn*<fR#r|<
z?h!~{US2^#K~YgrNl8grSy=_7s;a7{rlzj04uwKtAPo%-O-)TLEiG+rZ5<sQU67uh
zp1!`mfq{Xcp`j7T*x1;_#KhFp)XdDx90Z5MEi5c7EiDlU1QLm~0$E#I+t}FH+S=OL
z**yl?+uJ)hI5;{wIypHxgIru(TwPt=+}uzol)JmT2guXY)62{2$&)AE-ri3^K0ZFa
zzP^5be*XUc0RaJlpl8pXJ%9c@C@3g6I5-3p8X6iF7WU%Bi}3L92++%yFVSdpWMpJi
zR8(|y^ea$IOiXNSY+PJie0+QYC^0cHDJdyAIr;VL*D0XX)YP=JwDk1!jEs!T%*;2S
ztgNi;?ChMJoZQ^pJWzgqenCM&VPPQ#gDEO1dJ8HpE-oo4DJ?B6D=T{kDladusHmu{
ztgNc4ss`26)YR72*45S3*Vi{RG`t5jHa0djH8nRkx3si;0JXNZVzJn^wzl^6_6|^I
zXJ=PeS9f=JPft&8Z|_G?UteE;fB(S1z~JEE5NLRKcw}T`baZrVY;1gdd;&B%IXN{o
zH9b9z!{KH?v$L~vb93|a^9u_LpFoR?i%UyO%gf6~(dor^R{$^2%*Y&2`?lhCHwn<y
zP=^Pv@!*>9@YTr&#aH&P<st+%88{xXZyW8e=M6o6k;^{48QPK~`@yLI8d$u30Ke>P
z{B`;Cf;{I~w`tDE1@oP5*v?CCA%5CQejcgQCP}})`w;)<$8;41N3EoW9!<zrb836f
hr`M=kB`&rId_dFEO#JXn^S@6dpsQ)5(ExRb`adM5s$&2E

literal 0
HcmV?d00001

diff --git a/textures/amgmt_pine_sapling.png b/textures/amgmt_pine_sapling.png
new file mode 100644
index 0000000000000000000000000000000000000000..09bbae45b93b15e001408a0942993910ba1197c4
GIT binary patch
literal 3029
zcmV;`3o7)9P)<h;3K|Lk000e1NJLTq000mG000mO1^@s6AM^iV00009a7bBm000XU
z000XU0RWnu7ytkYPiaF#P*7-ZbZ>KLZ*U+<Lqi~Na&Km7Y-Iodc-oy)XH-+^7Crag
z^g>IBfRsybQWXdwQbLP>6p<z>Aqfylh#{fb6;Z(vMMVS~$e@S=j*ftg6;Uh<iVD~V
z<RPMtgQJLw%KPDaqifc@_vX$1wbwr9tn;0-&j-K=43<bUQ8j=JsX`tR;Dg7+#^K~H
zK!FM*Z~zbpvt%K2{UZSY_<lS*D<Z%Lz5oGu(+dayz)hRLFdT>f59&ghTmgWD0l;*T
zI7<kC6aYYajzXpYKt=(8otP$50H6c_V9R4-;{Z@C0AMG7=F<Rxo%or10RUT+Ar%3j
zkpLhQWr#!oXgdI`&sK^>09Y^p6lP1rIRMx#05C~cW=H_Aw*bJ-5DT&Z2n+x)QHX^p
z00esgV8|mQcmRZ%02D^@S3L16t`O%c004NIvOKvYIYoh62rY33S640`D9%Y2D-<?i
z0%4j!F2Z@488U%158(66005wo6%pWr^Zj_v4zAA5HjcIqUoGmt2LB>rV&neh&#Q1i
z007~1e$oCcFS8neI|hJl{-P!B1ZZ9hpmq0)X0i`JwE&>$+E?>%_<lS*MWK+n+1cgf
z<k(8YLR(?VSAG6x!e78w{cQPuJpA|d;J)G{fihizM+Erb!p!tcr5w+a34~(Y=8s4G
zw+sLL9n&JjNn*KJDiq^U5^;`1nvC-@r6P$!k}1U{(*I=Q-z@tBKHoI}uxdU5dyy@u
zU1J0GOD7Ombim^G008p4Z^6_k2m^p<gW=D2|L;HjN1!DDfM!XOaR2~bL?kX$%CkSm
z2mk;?pn)o|K^yeJ7%adB9Ki+L!3+FgHiSYX#KJ-lLJDMn9CBbOtb#%)hRv`YDqt_v
zKpix|QD}yfa1JiQRk#j4a1Z)n2%f<xynzV>LC6RbVIkUx0b+_+BaR3cnT7Zv!AJxW
zizFb)h!jyGOOZ85F;a?DAXP{m@;!0_Ifq<Ex{*7`05XF7hP+2Hl!3BQJ=6@fL%FCo
z8iYoo3(#bAF`ADSpqtQgv>H8(HlgRxt7s3}k3K`kFu>>-2Q$QMFfPW!La{h336o>X
zu_CMttHv6zR;&ZNiS=X8v3CR#fknUxHUxJ<AYmRsNLWl*PS{AOARHt#5!wki2?K;t
z!Y3k=s7tgax)J%r7-BLphge7~Bi0g+6E6^Zh(p9TBoc{3GAFr^0!gu?RMHaCM$&Fl
zBk3%un>0uoBa_M6WNWeqIg~6QE69c9o#eyhGvpiOA@W-aonk<7r1(?fC{oI5N*U!4
z<uv66WtcKSRim0x-Ke2d5jBrmLam{;Qm;{ms1r1GnmNsb7D-E`t)i9F8fX`2_i3-_
zbh;7Ul^#x)&{xvS=|||7=mYe33=M`AgU5(xC>fg=2N-7=cNnjjOr{yriy6mMFgG#l
znCF=fnQv8CDz++o6_Lscl}eQ+l^ZHARH>?_s@|##Rr6KLRFA1%Q+=*RRWnoLsR`7U
zt5vF<Q0r40Q)j6=sE4X&sBct1q<&fbi3VB2Ov6t@q*0);U*o*SAPZv|vv@2aYYnT0
zb%8a+Cb7-ge0D0knEf5Qi#@8Tp*ce{N;6lpQuCB%KL_KOarm5cP6_8Ir<e17iry6O
zDdH&`rZh~sF=bq9s+O0QSgS~@QL9Jmy*94xr=6y~MY~!1fet~(N+(<=M`w@D1)b+p
z*;C!83a1uLJv#NSE~;y#8=<>IcfW3@?wFpwUVxrVZ>QdQz32KIeJ}k~{cZZE^+ya?
z2D1z#2HOnI7(B%_ac?{wFUQ;QQA1tBKtrWrm0_3Rgps+?Jfqb{jYbcQX~taRB;#$y
zZN{S}1|}gUOHJxc?wV3fxuz+mJ4`!F$IZ;mqRrNsHJd##*D~ju=bP7?-?v~|cv>vB
zsJ6IeNwVZxrdjT`yl#bBIa#GxRa#xMMy;K#CDyyGyQdMSxlWT#tDe?p!?5wT$+oGt
z8L;Kp2HUQ-ZMJ=3XJQv;x5ci*?vuTfeY$;({XGW_huIFR9a<fJbF^|4I#xQ~n$Dc=
zKYhjYmgz5NSkDm8*fZm{6U!;YX`NG>(?@3)XSs8O^N5RyOM=TTmp(3=8^+zpz2r)C
z^>JO{deZfso3oq3?Wo(Y?l$ge?uXo;%ru`Vo>?<<(8I_>;8Eq#KMS9gFl*neeosSB
zfoHYnBQIkwkyowPu(zdms`p{<7e4kra-ZWq<2*OsGTvEV%s0Td$hXT+!*8Bnh2KMe
zBmZRodjHV?r+_5^X9J0WL4jKW`}lf%A-|44I@@LTvf1rHjG(ze6+w@Jt%Bvjts!X0
z?2xS?_ve_-k<Mujg;0Lz*3buG=3$G&ehepthlN*$KaOySSQ^nWmo<0M+(UEUMEXRQ
zMBbZcF;6+KElM>iKB_KiJlZ$9G`c^=E@oNG)mWWaNo-3TIW8)$Hg0Ub-~8?KhvJ>$
z3*&nim@mj(aCxE5!t{lw7O5^0EIO7zOo&c6l<+|iDySBWCGrz@C5{St!X3hAA}`T4
z(TLbXTq+(;@<=L8dXnssyft|w#WSTW<++3>sgS%(4NTpeI-VAqb|7ssJvzNHgOZVu
zaYCvgO_R1~>SyL=cFU|~g|hy|Zi}}s9+d~lYqOB71z9Z$wnC=pR9Yz4DhIM>Wmjgu
z&56o6maCpC&F##y%G;1PobR9i?GnNg;gYtchD%p19a!eQtZF&3JaKv33gZ<8D~47E
ztUS1iwkmDaPpj=$m#%)jCVEY4fnLGNg2A-`YwHVD3gv};>)hAvT~AmqS>Lr``i7kw
zJ{5_It`yrBmlc25DBO7E8;5VoznR>Ww5hAaxn$2~(q`%A-YuS64wkBy=9dm`4cXeX
z4c}I@?e+FW+b@^RDBHV(wnMq2zdX3SWv9u`%{xC-q*U}&`cyXV(%rRT*Z6MH?i+i&
z_B8C(+grT%{XWUQ+f@NoP1R=AW&26{v-dx)iK^-Nmiuj8txj!m?Z*Ss1N{dh4z}01
z)YTo*JycSU)+_5r4#yw9{+;i4Ee$peRgIj+;v;ZGdF1K$3E%e~4LaI(jC-u%2h$&R
z9cLXcYC@Xwnns&bn)_Q~Te?roKGD|d-g^8;+aC{{G(1^(O7m37Y1-+6)01cN&y1aw
zoqc{T`P^XJqPBbIW6s}d4{z_f5Om?vMgNQEJG?v2T=KYd^0M3I6IZxbny)%vZR&LD
zJpPl@Psh8QyPB@KTx+@RdcC!KX7}kEo;S|j^u2lU7XQ}Oo;f|;z4Ll+_r>@1-xl3|
zawq-H%e&ckC+@AhPrP6BK<z=<L*0kfKU@CX*zeqbYQT4(^U>T#_XdT7&;F71j}Joy
zkC~6lh7E@6o;W@^IpRNZ{ptLtL(gQ-CY~4mqW;US7Zxvm_|@yz&e53Bp_lTPlfP|z
zrTyx_>lv@x#=^!PzR7qqF<$gm`|ZJZ+;<)Cqu&ot<a{81DF0~rvGr5Xr~8u`lav1h
z1DNytV>2z=0000WV@Og>004R=004l4008;_004mL004C`008P>0026e000+nl3&F}
z00031Nkl<Zc-o|rF>b;@5JlgH#1aaToD_f*DUoskmoC@oQ>EDyoPml%(8CeZ_!us^
z35kTT1W2%!GAT%cjaeJWN?VL}_W$|wzY-DtbwuRvmd@xwYX7(Zv_Xy`y{H_o=Skf(
zl>lLCcg19S#149%<e7q~C_@`W8^kF=XSTrPcOZP(f@p&zF)F$8+!B%)r8CQGzs$T|
z{S@z3<=<3(`)d3sOs0gX<^Bm~A6w8vvJV5OU2hN}cU}0BGDyMlsv!O9KQ9Lk-%pBi
z5Fz^uJt>KP2Y>zv+Tgi*E^7u%Z`%NDpzMazh37XK*^<Fx$?&EHjcWj!Nz8iRh3^3X
XS3<RQfA}DY00000NkvXXu0mjfPSK)p

literal 0
HcmV?d00001

diff --git a/textures/amgmt_pine_wood.png b/textures/amgmt_pine_wood.png
new file mode 100644
index 0000000000000000000000000000000000000000..fd326f405fc93fbbb6dbc305fafc643f1e4551f2
GIT binary patch
literal 3719
zcmV;24tVj2P)<h;3K|Lk000e1NJLTq000mG000mO0{{R3C@l|D00009a7bBm000XU
z000XU0RWnu7ytkYPiaF#P*7-ZbZ>KLZ*U+<Lqi~Na&Km7Y-Iodc-oy)XH-+^7Crag
z^g>IBfRsybQWXdwQbLP>6p<z>Aqfylh#{fb6;Z(vMMVS~$e@S=j*ftg6;Uh<iVD~V
z<RPMtgQJLw%KPDaqifc@_vX$1wbwr9tn;0-&j-K=43<bUQ8j=JsX`tR;Dg7+#^K~H
zK!FM*Z~zbpvt%K2{UZSY_<lS*D<Z%Lz5oGu(+dayz)hRLFdT>f59&ghTmgWD0l;*T
zI7<kC6aYYajzXpYKt=(8otP$50H6c_V9R4-;{Z@C0AMG7=F<Rxo%or10RUT+Ar%3j
zkpLhQWr#!oXgdI`&sK^>09Y^p6lP1rIRMx#05C~cW=H_Aw*bJ-5DT&Z2n+x)QHX^p
z00esgV8|mQcmRZ%02D^@S3L16t`O%c004NIvOKvYIYoh62rY33S640`D9%Y2D-<?i
z0%4j!F2Z@488U%158(66005wo6%pWr^Zj_v4zAA5HjcIqUoGmt2LB>rV&neh&#Q1i
z007~1e$oCcFS8neI|hJl{-P!B1ZZ9hpmq0)X0i`JwE&>$+E?>%_<lS*MWK+n+1cgf
z<k(8YLR(?VSAG6x!e78w{cQPuJpA|d;J)G{fihizM+Erb!p!tcr5w+a34~(Y=8s4G
zw+sLL9n&JjNn*KJDiq^U5^;`1nvC-@r6P$!k}1U{(*I=Q-z@tBKHoI}uxdU5dyy@u
zU1J0GOD7Ombim^G008p4Z^6_k2m^p<gW=D2|L;HjN1!DDfM!XOaR2~bL?kX$%CkSm
z2mk;?pn)o|K^yeJ7%adB9Ki+L!3+FgHiSYX#KJ-lLJDMn9CBbOtb#%)hRv`YDqt_v
zKpix|QD}yfa1JiQRk#j4a1Z)n2%f<xynzV>LC6RbVIkUx0b+_+BaR3cnT7Zv!AJxW
zizFb)h!jyGOOZ85F;a?DAXP{m@;!0_Ifq<Ex{*7`05XF7hP+2Hl!3BQJ=6@fL%FCo
z8iYoo3(#bAF`ADSpqtQgv>H8(HlgRxt7s3}k3K`kFu>>-2Q$QMFfPW!La{h336o>X
zu_CMttHv6zR;&ZNiS=X8v3CR#fknUxHUxJ<AYmRsNLWl*PS{AOARHt#5!wki2?K;t
z!Y3k=s7tgax)J%r7-BLphge7~Bi0g+6E6^Zh(p9TBoc{3GAFr^0!gu?RMHaCM$&Fl
zBk3%un>0uoBa_M6WNWeqIg~6QE69c9o#eyhGvpiOA@W-aonk<7r1(?fC{oI5N*U!4
z<uv66WtcKSRim0x-Ke2d5jBrmLam{;Qm;{ms1r1GnmNsb7D-E`t)i9F8fX`2_i3-_
zbh;7Ul^#x)&{xvS=|||7=mYe33=M`AgU5(xC>fg=2N-7=cNnjjOr{yriy6mMFgG#l
znCF=fnQv8CDz++o6_Lscl}eQ+l^ZHARH>?_s@|##Rr6KLRFA1%Q+=*RRWnoLsR`7U
zt5vF<Q0r40Q)j6=sE4X&sBct1q<&fbi3VB2Ov6t@q*0);U*o*SAPZv|vv@2aYYnT0
zb%8a+Cb7-ge0D0knEf5Qi#@8Tp*ce{N;6lpQuCB%KL_KOarm5cP6_8Ir<e17iry6O
zDdH&`rZh~sF=bq9s+O0QSgS~@QL9Jmy*94xr=6y~MY~!1fet~(N+(<=M`w@D1)b+p
z*;C!83a1uLJv#NSE~;y#8=<>IcfW3@?wFpwUVxrVZ>QdQz32KIeJ}k~{cZZE^+ya?
z2D1z#2HOnI7(B%_ac?{wFUQ;QQA1tBKtrWrm0_3Rgps+?Jfqb{jYbcQX~taRB;#$y
zZN{S}1|}gUOHJxc?wV3fxuz+mJ4`!F$IZ;mqRrNsHJd##*D~ju=bP7?-?v~|cv>vB
zsJ6IeNwVZxrdjT`yl#bBIa#GxRa#xMMy;K#CDyyGyQdMSxlWT#tDe?p!?5wT$+oGt
z8L;Kp2HUQ-ZMJ=3XJQv;x5ci*?vuTfeY$;({XGW_huIFR9a<fJbF^|4I#xQ~n$Dc=
zKYhjYmgz5NSkDm8*fZm{6U!;YX`NG>(?@3)XSs8O^N5RyOM=TTmp(3=8^+zpz2r)C
z^>JO{deZfso3oq3?Wo(Y?l$ge?uXo;%ru`Vo>?<<(8I_>;8Eq#KMS9gFl*neeosSB
zfoHYnBQIkwkyowPu(zdms`p{<7e4kra-ZWq<2*OsGTvEV%s0Td$hXT+!*8Bnh2KMe
zBmZRodjHV?r+_5^X9J0WL4jKW`}lf%A-|44I@@LTvf1rHjG(ze6+w@Jt%Bvjts!X0
z?2xS?_ve_-k<Mujg;0Lz*3buG=3$G&ehepthlN*$KaOySSQ^nWmo<0M+(UEUMEXRQ
zMBbZcF;6+KElM>iKB_KiJlZ$9G`c^=E@oNG)mWWaNo-3TIW8)$Hg0Ub-~8?KhvJ>$
z3*&nim@mj(aCxE5!t{lw7O5^0EIO7zOo&c6l<+|iDySBWCGrz@C5{St!X3hAA}`T4
z(TLbXTq+(;@<=L8dXnssyft|w#WSTW<++3>sgS%(4NTpeI-VAqb|7ssJvzNHgOZVu
zaYCvgO_R1~>SyL=cFU|~g|hy|Zi}}s9+d~lYqOB71z9Z$wnC=pR9Yz4DhIM>Wmjgu
z&56o6maCpC&F##y%G;1PobR9i?GnNg;gYtchD%p19a!eQtZF&3JaKv33gZ<8D~47E
ztUS1iwkmDaPpj=$m#%)jCVEY4fnLGNg2A-`YwHVD3gv};>)hAvT~AmqS>Lr``i7kw
zJ{5_It`yrBmlc25DBO7E8;5VoznR>Ww5hAaxn$2~(q`%A-YuS64wkBy=9dm`4cXeX
z4c}I@?e+FW+b@^RDBHV(wnMq2zdX3SWv9u`%{xC-q*U}&`cyXV(%rRT*Z6MH?i+i&
z_B8C(+grT%{XWUQ+f@NoP1R=AW&26{v-dx)iK^-Nmiuj8txj!m?Z*Ss1N{dh4z}01
z)YTo*JycSU)+_5r4#yw9{+;i4Ee$peRgIj+;v;ZGdF1K$3E%e~4LaI(jC-u%2h$&R
z9cLXcYC@Xwnns&bn)_Q~Te?roKGD|d-g^8;+aC{{G(1^(O7m37Y1-+6)01cN&y1aw
zoqc{T`P^XJqPBbIW6s}d4{z_f5Om?vMgNQEJG?v2T=KYd^0M3I6IZxbny)%vZR&LD
zJpPl@Psh8QyPB@KTx+@RdcC!KX7}kEo;S|j^u2lU7XQ}Oo;f|;z4Ll+_r>@1-xl3|
zawq-H%e&ckC+@AhPrP6BK<z=<L*0kfKU@CX*zeqbYQT4(^U>T#_XdT7&;F71j}Joy
zkC~6lh7E@6o;W@^IpRNZ{ptLtL(gQ-CY~4mqW;US7Zxvm_|@yz&e53Bp_lTPlfP|z
zrTyx_>lv@x#=^!PzR7qqF<$gm`|ZJZ+;<)Cqu&ot<a{81DF0~rvGr5Xr~8u`lav1h
z1DNytV>2z=0000WV@Og>004R=004l4008;_004mL004C`008P>0026e000+nl3&F}
z00093P)t-sR81gQP$F4TB3@M^Vpt_-UMXo`DS&n>f_N-~cP)c?EQEP1gn2E4dNqZ5
zEroh6g?lcBdoPB3HivyTh<-PSemIGKIEjBbi-I|gf;pd&KcA66pp!nLltH7FL8F*K
zqnARXmqVkNLZg^NrI$jbm_w$RL#CQTrkO;inMA9dMJp>SEG#T7EiEoCE-x=HFfcGN
zF)=bSGBYzXG&D3dH8nOiHa9mnI5;>tIXOByIy*Z%JUl!-Jv}}?K0iM{KtMo2K|w-7
zLPJACL_|bIMMXwNMn^|SNJvOYNl8jdN=r*iOiWBoO-)WtPESuyP*6}&QBhJ-Qd3h?
zR8&+|RaI72R##V7SXfwDSy@_IT3cINTwGjTU0q&YUSD5dU|?WjVPRroVq;@tWMpJz
zWo2e&W@l$-XlQ6@X=!R|YHMq2Y;0_8ZEbFDZf|dIaBy&OadC2Ta&vQYbaZreb#-=j
zc6WDoczAeud3kzzdV70&e0+R;eSLm@et&;|fPjF3fq{a8f`fyDgoK2Jg@uNOhKGlT
zh=_=ZiHVAeii?YjjEszpjg5|uj*pLzkdTm(k&%*;l9Q8@l$4Z}m6ev3mY0{8n3$NE
znVFiJnwy)OoSdAUot>VZo}ZteprD|kp`oIpqNAguq@<*!rKP5(rl+T;sHmu^si~@}
zs;jH3tgNi9t*x%EuCK4Ju&}VPv9YqUva_?Zw6wIfwY9dkwzs#pxVX5vxw*Q!y1To(
zyu7@<y}iD^zQ4b}z`(%4!NJ19!o$PE#KgqK#l^<P#>dCU$jHda$;ryf%FD~k%*@Qq
z&CSlv&d<-!(9qD)(b3Y<($mw^)YR0~)z#M4*4Nk9*x1<F+1c9K+S}XP+}zyV-QC{a
z-rwKf;Nall;o;)q;^X7v<mBY#<>lt)=I7_<=;-L_>FMg~>g((4?Ck9A?d|UF?(gsK
z@bK{Q@$vHV^7Hfa^z`)g_4W4l_V@Sq`1ttw`T6?#`uqF){QUg={r&#_{{R2~sUN@P
z0001{Nkl<Zc-mx+%L>9k5Cm(+RX1yb4-`T0phy4zmjn;Kq6Q>!cRa-C!9Esrb<2`e
zPXj=6H$V^pFayCryuHSK0AgkN16h`Z#ZmPf^#DNpdY|$hXy#k+=h*Q}eRv_h(D>*`
zp*ZG3cJQGk=`O%W)2&b_>az|wHUc!4q<NoozParQ01bLBSH9Yce%oe<;07?51+K@1
lE1$H-VrdYo;Uoa>0RYHSHZ$HG7FqxR002ovPDHLkV1hiqA5s7S

literal 0
HcmV?d00001

diff --git a/textures/amgmt_savanna_leaves.png b/textures/amgmt_savanna_leaves.png
new file mode 100644
index 0000000000000000000000000000000000000000..6a8b35217c0d9d212f815d6f07448cb065cb3817
GIT binary patch
literal 3681
zcmW;PWmJ?~6b9gr3(}<$B7$^xO2Z7@F~CsL3?YqDf^;g~Fi1#u4c!egl;jZ70s>b;
zQ0j8$S!<tnoqy--UwcPuYbp`pKgS0EfJjAIUiTqM|1Vt3hm(z)MDHQ++?0(x0f6A?
z|Ahf$<varbd@TnsSX<lP)yvh>-qnpx1q`Nh^Ki9ucw-9yKFe@D7({QMLh5qu9HbT%
zl%nRUOO8vY3yKXQOJw1o$0JpZqR(F<*Xez%pnyd^k{5*;7Z>!AT!)J=27eJ}o4z0}
zv@j}W?0Un$&}qKoa(CjcX+e6g@(kWEiPM8in5HbKBOF9n2BLlZJ#=_rXk(j4HW;7D
z?cv=GHuRpij2OUGprj-xLk~_DfZ;PsfD80!WcTpBh`c8`0A-qD1chPrcqP74!wn(>
zWc}hm#el3LMi4xMMGwfs0xZU@t+oJdZoq=|!|p5)1i#Ak#{f)H=*cni5&^oWwo&qc
zy#!D>X%M3TK=}YNJGB8ZV38Z(Q!%tt25Osu9waG2J%CFH@aaT_vjbTEfW-(SqYn_4
z36LqC8cP1+tR~&#c<5ASy<{tsm_o1#F1I_5p&<_~8&ZXmlT5_&AImIRo<849DuG}j
zlJ93<0U$4t{NcA}w?0VXY9vx54nb_reb9}4&tPS>b+<EF;U)_J8(x9acU-&;&x0he
zgPiXQn2)jSUlZiLy^OW1Cy{Le^7fYv&)oj+jY57x>(bKB_V%Lc0La90%rM{%)@R;h
zc>Cs0pybWv#rLjFreFcHU?r@p?|om-)r($CCgFuyt?b4t-82*2-_Xo545(POLOIB`
zbe_1!$!C2$6DVSc1|_i%GSA%GY_4-%V@j_J1GSFQ82*XerDoQcztvbtp<X?kmjH0u
z?%Ml}4Hq-WK6GQ!`~F1cRw<7e2(nX2atDCd@=QFCu?Cr8TmX>I3+AYmqdxC_#?^!U
zqW95CFTst4NEnD|pbta}!nX-};bFmE83JO9n5d=Uu;BeBOC!{yV;_<1M$FTv-$E?q
zM)KDZH@BCqBNz`$ZUpzKCH-;~hE)udF%Fk9GyICaR~hR`EEC;m6qyc#TB5KrziteK
zPG6bkRLbKYu}D+JwnT{$Kp^BMqC<&4CAeNk>KkDbxV2RDd6;4W!IX^`e^xw2UiOqn
z<8!HxBKdn$74{^{@zUU7zMdb?a0Cb5@bL`wgX&&!;U!y-*D+KQRt!C_HK@dFkG`;;
ztn<ct60FdJCxYb-qO+uxQ--QTH5Zjj>0U4iJzmBW#lsBK>0@O`E>&w}X?y%<;F*;G
ze<W0yi*f!*{8L_1|0wW)DASW@umEdo!api?Um!D2W)x>!bQ$-#%Cd!&pED+pF55WO
z<A|kj(Q%H1Z^O6yw*|MUx9Lw!@Znan?q9C-HraH?995}yNOy#Gux&F0<n#-(bXQCB
zA&-UQjX_oU2;CZ;$kL}mZ?nWELMc?#imD1yXP?_s+Fv@<{P1dfyqZd@nLcGWGrq6%
zBmD>Fxi=wE1bOIi6pW23`x(wN7?t<4nhf<~s@YhoVF;fn|6#^nCP}8NK9mE&@t!<!
z3_n#hl_iy$gBMa(UR=IbPN09LKMsj6d#x8xt*9@kw^fGsEv-Vo9Ikz+N391dlPHZW
zhn2cQWWEF%-9}>@^{e-5fxqbF)tPT~4ABu-Q#JT-(K``UM7#|a9$=}PSbG1Cqdnu6
zrae}wyewY~ET}4I*r0osVkd*MmEnGs<E4qW$5xVl78tWecEY~NPF*ad-pX%l>QtVV
zo(8Q@uF$DaI_wmwJ}QA1cPg|ST?Z4(4Xd)6vMRyik&obedP{n%CHN&28dBmH)jZ`+
zMb!E2^4{GpCC3@LU9W?3)m=;0d^`94z6jvGh1@#-ExAx4gkm=kGGU_#k<TOth232x
zX?TZGzjVN6{j%U9%T&wsjj+VlY01Jl#ZQVPA038Fx0tq^hn$BBS+H5?S=2NRG>)@$
zHCl_=izU=0)Q2a&P83YcX9{Oa@h=GMW$$G#WUn_{82cD=AxaS~wkq}8#>Ga*hz^%<
zV=<#5sJ^jTgJKoDig~`hs=efKNvmeEW<~BitiSdbViZx<OjWzHh>fa7I3ofqVOEr|
z=E3Uz<K)idfVO~7w^BGnkxRrCG{!W6o{b)4;s)YtS;(AYnSjCbw0&L}bdq#(QE&_K
zbew&_0j`%ls|2HjwR(o0Ma4#|g^cs0OY>w?53P=LZmW7-xSMVG&0N5<8?yV3N>Me(
zBF7HLkt?6S3VmkJH4^lk>K_4r*V&ntA^4oi=d@lKs0G#vhBfUm@>=sI8dfdTHWzu9
zUs|3}O8=Jj_`D^(B`LZlux4cbRkWvhq<LJc-!<1fd>#CO@!sa%?|vF631Y^8VMYhb
z1)KbHedYI_zB^7v9A*2ve(6Z=V_vHqxm<imRme_n6}|n)&x9)a%e@R_BGQ34Ts!c`
z{1lGmu4Qb0AR%jbWVm63Oq^R3^!YS@y0G{33fOa9{;zzR{8~1QUrVfpTUD4tx}3*R
za#^%Zs7+>w$Ij^M925>!d8771jEAFI#N|!b`pwZ<<R*NRV9TE}gLlNt%{L#}cOG6s
zQO5IxOFT_hJxcRc%D-}?9HkT=nNOd3Gsofk_R;jg7<i{erlS_YrW~}Ir^*}}en~$Q
zJA{3i1_g__c3Q(&%Mv=&iPTrK#d9gL-qAS=NQrmyhbAQ^xP!{+HIfmq1K6(JyYWif
z@cO$!m)K@r+EkoTr-p>eM@HQE2vG44h%ws&2TncA*3hndB6>_Lts<9m;^=F`7%D+D
z=j8MK(UZO>8%c<w2sJ})8t86krK4EAq`NN)e~bJPXM_QErDRJCg2Q=EtK!Hoy*jXy
z#ZSX2_;v4CNN*E{(;<OA{!Vzn;mX31nHH4SXuZkuZv>oLnmjtDnhZsmPX1w$ZN+DY
zI?{ElJ98zav8-aC)n?Le#%_OijXT$bIITQ=H=WppXlc2TXx*Uk=;F5miZ^|N4b>is
z0Jj!)OSW{_mW(1NBxE38Am@<35Rv1V)h5e@E0^hGYX6SkLO<tFCLNcz(xY7{eGGk#
zIlDRAYnAJUOPT8E^8Kr{YiF}6O=tI`VayrKTO3AW#6s)0Ihq+Mh;IBm=b;ku@XM|{
z_=z_+kqD9gr<|cpMmKri?fpx<^-EeJ@#S|P{VO+cW?#Oefzj|fg0fDt6tnfRu1%~=
z+O)n(PtPB$`Q0d?UXtVpNgDa8o<T+(miI$ulVPWmAK|I+fIyx<D;B5%g#Vs3a@~={
z^`wo|Yhy;?K6X!{Ljq}f+TwLukJ@=^*kYJfBW~_|;B_E*mprRA+@8~(Ro!ap)OzgK
z+2n6`xlf%did;SK^!-I~KR=f%Cbimm=I44jczLl-u^Q;XdW#%yU-D)>uIkY0Fh7?)
zl3N0=M$XBY+^sC0tbB0n@y<J&UQxQl4iBBYOT36D0Y8e*j3196ia5-DB`qelDdTaw
ze^UaUw3%edrMxS+8?UCM;0?T*J6u3cXH4g(pQa~wJHIcwJ?J^4szD9)4bgUu`UvvB
zJ~y~N>h)gnra38GC(+t|PxpcC-u_SBh2B)jbuv|Q@;w%2#@UUvAUEn^-lVfu*3|$2
zKV|?33I%{a_Yb)b0B`vK;J^X^#4`YZ(lyC^P!Rwy0c~}N0u>dNdjPAr6sNX6yPH2N
zE!xYMFX`y$=;`Sh7#J8C8JU=vn3<VbSXfxm*x1<E+1WWbI5;^uxwyEvxw(0GczAhv
z`Ox_J`2_?71O)|!goK2Jg+)X}L`6kky?P~vCN3^6At50tDJdl-B`qy2BO@a#D=Q}_
z2SNjb!SeF*3JMB}ii%1~O3KR0Dk>_fs;X*gYU*ej8XB6Knp#>~+S=MWIy$<#x_Wwg
z5C}vc&A`CG(9jSHg&G+d85<j$n3$NFnwpuJy+$)PH@C2`u(Y(ava+(awzjdcv9-0e
zv$KPt+1uMYI5;>uIyyNyy?OJ-+1c5}#l_Xt)eX(v-QB~(!_(8#%ggKS+qduDz4P|=
z_VMxY_4V~b^Y{0E|NebIKtNz%;D-+%f`WpAgM&jtLPF8P!otGC!y_UhA|oTCqN1Xs
zqhn%XVq;@JqJ8@GDK0K9K0ZDnAt5m_F)1l2IXO8cB_$OtEiElQJv}2MBQrBID=RBI
zJ3A*Q2M&klqJ94SIWI3SKR>^qprEj@@XMDkMMXu$#l<BhC8cO(Wo6~%<rNhbm6erM
zRaMp1)ipIWwY9Z%X!Z5=4Gj&Ajg3uBO$Y>{xw*NerKPpCwGFMky}hHOqqDQKtE;QK
zySt~Sr?<DaudlBkZD3$vaBy&FXlQtNcw}T`baZrVY;1gd{43hT!~_zFoSdATnwpxP
zo}QVRnVp^e_U+r;+}u3c!otGh;^NZM((>{$3WZu(Sy^3OU0YjQNBjQ$`^Lt`=H}+s
z*4Fm+_Rh}E?(Xj1-rf(i{r&xegM-7v!=FEY9vvMWA0MBboc#OmzrWB<PfyRz&d$%z
zFD@>A|Neb>d3kkp_2<u@zi8Lj*Ecsex3{-<cX#*q_y5F3J*;E^hL^6U9w58BX!mgO
zRFRj1_$)Ia>o73o2>baK_ijZ4*%c`0UeT^=?x8XVUcb+vomlm2NEd0e$_9Dmq4ptH
zZMA={TrLUIk5%fXHErNO$Og@vL}#NWjKpT3%FP1gd)qHDPr4JO#Vr+Mt2-4q*6QP1
iI=_8_-Agji1Y!aT2D*HQ=L-KXk${SVrhGNXBIG~jFbhfm

literal 0
HcmV?d00001

diff --git a/textures/amgmt_savanna_sapling.png b/textures/amgmt_savanna_sapling.png
new file mode 100644
index 0000000000000000000000000000000000000000..3b4ad1c70236b88ed41f312e147f29d67285adda
GIT binary patch
literal 3063
zcmV<T3kdXyP)<h;3K|Lk000e1NJLTq000mG000mO1^@s6AM^iV00009a7bBm000XU
z000XU0RWnu7ytkYPiaF#P*7-ZbZ>KLZ*U+<Lqi~Na&Km7Y-Iodc-oy)XH-+^7Crag
z^g>IBfRsybQWXdwQbLP>6p<z>Aqfylh#{fb6;Z(vMMVS~$e@S=j*ftg6;Uh<iVD~V
z<RPMtgQJLw%KPDaqifc@_vX$1wbwr9tn;0-&j-K=43<bUQ8j=JsX`tR;Dg7+#^K~H
zK!FM*Z~zbpvt%K2{UZSY_<lS*D<Z%Lz5oGu(+dayz)hRLFdT>f59&ghTmgWD0l;*T
zI7<kC6aYYajzXpYKt=(8otP$50H6c_V9R4-;{Z@C0AMG7=F<Rxo%or10RUT+Ar%3j
zkpLhQWr#!oXgdI`&sK^>09Y^p6lP1rIRMx#05C~cW=H_Aw*bJ-5DT&Z2n+x)QHX^p
z00esgV8|mQcmRZ%02D^@S3L16t`O%c004NIvOKvYIYoh62rY33S640`D9%Y2D-<?i
z0%4j!F2Z@488U%158(66005wo6%pWr^Zj_v4zAA5HjcIqUoGmt2LB>rV&neh&#Q1i
z007~1e$oCcFS8neI|hJl{-P!B1ZZ9hpmq0)X0i`JwE&>$+E?>%_<lS*MWK+n+1cgf
z<k(8YLR(?VSAG6x!e78w{cQPuJpA|d;J)G{fihizM+Erb!p!tcr5w+a34~(Y=8s4G
zw+sLL9n&JjNn*KJDiq^U5^;`1nvC-@r6P$!k}1U{(*I=Q-z@tBKHoI}uxdU5dyy@u
zU1J0GOD7Ombim^G008p4Z^6_k2m^p<gW=D2|L;HjN1!DDfM!XOaR2~bL?kX$%CkSm
z2mk;?pn)o|K^yeJ7%adB9Ki+L!3+FgHiSYX#KJ-lLJDMn9CBbOtb#%)hRv`YDqt_v
zKpix|QD}yfa1JiQRk#j4a1Z)n2%f<xynzV>LC6RbVIkUx0b+_+BaR3cnT7Zv!AJxW
zizFb)h!jyGOOZ85F;a?DAXP{m@;!0_Ifq<Ex{*7`05XF7hP+2Hl!3BQJ=6@fL%FCo
z8iYoo3(#bAF`ADSpqtQgv>H8(HlgRxt7s3}k3K`kFu>>-2Q$QMFfPW!La{h336o>X
zu_CMttHv6zR;&ZNiS=X8v3CR#fknUxHUxJ<AYmRsNLWl*PS{AOARHt#5!wki2?K;t
z!Y3k=s7tgax)J%r7-BLphge7~Bi0g+6E6^Zh(p9TBoc{3GAFr^0!gu?RMHaCM$&Fl
zBk3%un>0uoBa_M6WNWeqIg~6QE69c9o#eyhGvpiOA@W-aonk<7r1(?fC{oI5N*U!4
z<uv66WtcKSRim0x-Ke2d5jBrmLam{;Qm;{ms1r1GnmNsb7D-E`t)i9F8fX`2_i3-_
zbh;7Ul^#x)&{xvS=|||7=mYe33=M`AgU5(xC>fg=2N-7=cNnjjOr{yriy6mMFgG#l
znCF=fnQv8CDz++o6_Lscl}eQ+l^ZHARH>?_s@|##Rr6KLRFA1%Q+=*RRWnoLsR`7U
zt5vF<Q0r40Q)j6=sE4X&sBct1q<&fbi3VB2Ov6t@q*0);U*o*SAPZv|vv@2aYYnT0
zb%8a+Cb7-ge0D0knEf5Qi#@8Tp*ce{N;6lpQuCB%KL_KOarm5cP6_8Ir<e17iry6O
zDdH&`rZh~sF=bq9s+O0QSgS~@QL9Jmy*94xr=6y~MY~!1fet~(N+(<=M`w@D1)b+p
z*;C!83a1uLJv#NSE~;y#8=<>IcfW3@?wFpwUVxrVZ>QdQz32KIeJ}k~{cZZE^+ya?
z2D1z#2HOnI7(B%_ac?{wFUQ;QQA1tBKtrWrm0_3Rgps+?Jfqb{jYbcQX~taRB;#$y
zZN{S}1|}gUOHJxc?wV3fxuz+mJ4`!F$IZ;mqRrNsHJd##*D~ju=bP7?-?v~|cv>vB
zsJ6IeNwVZxrdjT`yl#bBIa#GxRa#xMMy;K#CDyyGyQdMSxlWT#tDe?p!?5wT$+oGt
z8L;Kp2HUQ-ZMJ=3XJQv;x5ci*?vuTfeY$;({XGW_huIFR9a<fJbF^|4I#xQ~n$Dc=
zKYhjYmgz5NSkDm8*fZm{6U!;YX`NG>(?@3)XSs8O^N5RyOM=TTmp(3=8^+zpz2r)C
z^>JO{deZfso3oq3?Wo(Y?l$ge?uXo;%ru`Vo>?<<(8I_>;8Eq#KMS9gFl*neeosSB
zfoHYnBQIkwkyowPu(zdms`p{<7e4kra-ZWq<2*OsGTvEV%s0Td$hXT+!*8Bnh2KMe
zBmZRodjHV?r+_5^X9J0WL4jKW`}lf%A-|44I@@LTvf1rHjG(ze6+w@Jt%Bvjts!X0
z?2xS?_ve_-k<Mujg;0Lz*3buG=3$G&ehepthlN*$KaOySSQ^nWmo<0M+(UEUMEXRQ
zMBbZcF;6+KElM>iKB_KiJlZ$9G`c^=E@oNG)mWWaNo-3TIW8)$Hg0Ub-~8?KhvJ>$
z3*&nim@mj(aCxE5!t{lw7O5^0EIO7zOo&c6l<+|iDySBWCGrz@C5{St!X3hAA}`T4
z(TLbXTq+(;@<=L8dXnssyft|w#WSTW<++3>sgS%(4NTpeI-VAqb|7ssJvzNHgOZVu
zaYCvgO_R1~>SyL=cFU|~g|hy|Zi}}s9+d~lYqOB71z9Z$wnC=pR9Yz4DhIM>Wmjgu
z&56o6maCpC&F##y%G;1PobR9i?GnNg;gYtchD%p19a!eQtZF&3JaKv33gZ<8D~47E
ztUS1iwkmDaPpj=$m#%)jCVEY4fnLGNg2A-`YwHVD3gv};>)hAvT~AmqS>Lr``i7kw
zJ{5_It`yrBmlc25DBO7E8;5VoznR>Ww5hAaxn$2~(q`%A-YuS64wkBy=9dm`4cXeX
z4c}I@?e+FW+b@^RDBHV(wnMq2zdX3SWv9u`%{xC-q*U}&`cyXV(%rRT*Z6MH?i+i&
z_B8C(+grT%{XWUQ+f@NoP1R=AW&26{v-dx)iK^-Nmiuj8txj!m?Z*Ss1N{dh4z}01
z)YTo*JycSU)+_5r4#yw9{+;i4Ee$peRgIj+;v;ZGdF1K$3E%e~4LaI(jC-u%2h$&R
z9cLXcYC@Xwnns&bn)_Q~Te?roKGD|d-g^8;+aC{{G(1^(O7m37Y1-+6)01cN&y1aw
zoqc{T`P^XJqPBbIW6s}d4{z_f5Om?vMgNQEJG?v2T=KYd^0M3I6IZxbny)%vZR&LD
zJpPl@Psh8QyPB@KTx+@RdcC!KX7}kEo;S|j^u2lU7XQ}Oo;f|;z4Ll+_r>@1-xl3|
zawq-H%e&ckC+@AhPrP6BK<z=<L*0kfKU@CX*zeqbYQT4(^U>T#_XdT7&;F71j}Joy
zkC~6lh7E@6o;W@^IpRNZ{ptLtL(gQ-CY~4mqW;US7Zxvm_|@yz&e53Bp_lTPlfP|z
zrTyx_>lv@x#=^!PzR7qqF<$gm`|ZJZ+;<)Cqu&ot<a{81DF0~rvGr5Xr~8u`lav1h
z1DNytV>2z=0000WV@Og>004R=004l4008;_004mL004C`008P>0026e000+nl3&F}
z0003ZNkl<Zc-o|r!AiqG5Qb->q)n(n#bsepsFIT&D&BhWn!bRiK1b+7_#Al$bLcxL
z^q8Bnv_xndYSOA<JT+|6q$WD2S^k}Ger5)V2>ug?>O%;T6CZ~s<a%=~7D*|yT&p5G
z%q}f1hPF=}^aQDH8UvP7J<G=v<97#xo}g_fKMXKQ(@cAMk?1g+9A;A`fTWr0#IXf^
z-lgqK{4hWiakT?K43MM=50`gT9B8C{XHHZN)jROq8yZgxSWa~~H%}p2Mc{|Q-Zka`
z>K)vkU69o|0^{Rz2U6<}p5I^bD~U@T)LLWJ-fII~Z;nZt?hLfiA#rRS&u9$}v-Lj#
z0ARtf4OYk6Gy>druMhhCYBZw_yu}NMRuMSNZkPT2834sEcL^hewmkp<002ovPDHLk
FV1jU;r@#OJ

literal 0
HcmV?d00001

diff --git a/textures/amgmt_savanna_wood.png b/textures/amgmt_savanna_wood.png
new file mode 100644
index 0000000000000000000000000000000000000000..93d533482e613401d821fbd10102c2740da7073e
GIT binary patch
literal 3719
zcmV;24tVj2P)<h;3K|Lk000e1NJLTq000mG000mO0{{R3C@l|D00009a7bBm000XU
z000XU0RWnu7ytkYPiaF#P*7-ZbZ>KLZ*U+<Lqi~Na&Km7Y-Iodc-oy)XH-+^7Crag
z^g>IBfRsybQWXdwQbLP>6p<z>Aqfylh#{fb6;Z(vMMVS~$e@S=j*ftg6;Uh<iVD~V
z<RPMtgQJLw%KPDaqifc@_vX$1wbwr9tn;0-&j-K=43<bUQ8j=JsX`tR;Dg7+#^K~H
zK!FM*Z~zbpvt%K2{UZSY_<lS*D<Z%Lz5oGu(+dayz)hRLFdT>f59&ghTmgWD0l;*T
zI7<kC6aYYajzXpYKt=(8otP$50H6c_V9R4-;{Z@C0AMG7=F<Rxo%or10RUT+Ar%3j
zkpLhQWr#!oXgdI`&sK^>09Y^p6lP1rIRMx#05C~cW=H_Aw*bJ-5DT&Z2n+x)QHX^p
z00esgV8|mQcmRZ%02D^@S3L16t`O%c004NIvOKvYIYoh62rY33S640`D9%Y2D-<?i
z0%4j!F2Z@488U%158(66005wo6%pWr^Zj_v4zAA5HjcIqUoGmt2LB>rV&neh&#Q1i
z007~1e$oCcFS8neI|hJl{-P!B1ZZ9hpmq0)X0i`JwE&>$+E?>%_<lS*MWK+n+1cgf
z<k(8YLR(?VSAG6x!e78w{cQPuJpA|d;J)G{fihizM+Erb!p!tcr5w+a34~(Y=8s4G
zw+sLL9n&JjNn*KJDiq^U5^;`1nvC-@r6P$!k}1U{(*I=Q-z@tBKHoI}uxdU5dyy@u
zU1J0GOD7Ombim^G008p4Z^6_k2m^p<gW=D2|L;HjN1!DDfM!XOaR2~bL?kX$%CkSm
z2mk;?pn)o|K^yeJ7%adB9Ki+L!3+FgHiSYX#KJ-lLJDMn9CBbOtb#%)hRv`YDqt_v
zKpix|QD}yfa1JiQRk#j4a1Z)n2%f<xynzV>LC6RbVIkUx0b+_+BaR3cnT7Zv!AJxW
zizFb)h!jyGOOZ85F;a?DAXP{m@;!0_Ifq<Ex{*7`05XF7hP+2Hl!3BQJ=6@fL%FCo
z8iYoo3(#bAF`ADSpqtQgv>H8(HlgRxt7s3}k3K`kFu>>-2Q$QMFfPW!La{h336o>X
zu_CMttHv6zR;&ZNiS=X8v3CR#fknUxHUxJ<AYmRsNLWl*PS{AOARHt#5!wki2?K;t
z!Y3k=s7tgax)J%r7-BLphge7~Bi0g+6E6^Zh(p9TBoc{3GAFr^0!gu?RMHaCM$&Fl
zBk3%un>0uoBa_M6WNWeqIg~6QE69c9o#eyhGvpiOA@W-aonk<7r1(?fC{oI5N*U!4
z<uv66WtcKSRim0x-Ke2d5jBrmLam{;Qm;{ms1r1GnmNsb7D-E`t)i9F8fX`2_i3-_
zbh;7Ul^#x)&{xvS=|||7=mYe33=M`AgU5(xC>fg=2N-7=cNnjjOr{yriy6mMFgG#l
znCF=fnQv8CDz++o6_Lscl}eQ+l^ZHARH>?_s@|##Rr6KLRFA1%Q+=*RRWnoLsR`7U
zt5vF<Q0r40Q)j6=sE4X&sBct1q<&fbi3VB2Ov6t@q*0);U*o*SAPZv|vv@2aYYnT0
zb%8a+Cb7-ge0D0knEf5Qi#@8Tp*ce{N;6lpQuCB%KL_KOarm5cP6_8Ir<e17iry6O
zDdH&`rZh~sF=bq9s+O0QSgS~@QL9Jmy*94xr=6y~MY~!1fet~(N+(<=M`w@D1)b+p
z*;C!83a1uLJv#NSE~;y#8=<>IcfW3@?wFpwUVxrVZ>QdQz32KIeJ}k~{cZZE^+ya?
z2D1z#2HOnI7(B%_ac?{wFUQ;QQA1tBKtrWrm0_3Rgps+?Jfqb{jYbcQX~taRB;#$y
zZN{S}1|}gUOHJxc?wV3fxuz+mJ4`!F$IZ;mqRrNsHJd##*D~ju=bP7?-?v~|cv>vB
zsJ6IeNwVZxrdjT`yl#bBIa#GxRa#xMMy;K#CDyyGyQdMSxlWT#tDe?p!?5wT$+oGt
z8L;Kp2HUQ-ZMJ=3XJQv;x5ci*?vuTfeY$;({XGW_huIFR9a<fJbF^|4I#xQ~n$Dc=
zKYhjYmgz5NSkDm8*fZm{6U!;YX`NG>(?@3)XSs8O^N5RyOM=TTmp(3=8^+zpz2r)C
z^>JO{deZfso3oq3?Wo(Y?l$ge?uXo;%ru`Vo>?<<(8I_>;8Eq#KMS9gFl*neeosSB
zfoHYnBQIkwkyowPu(zdms`p{<7e4kra-ZWq<2*OsGTvEV%s0Td$hXT+!*8Bnh2KMe
zBmZRodjHV?r+_5^X9J0WL4jKW`}lf%A-|44I@@LTvf1rHjG(ze6+w@Jt%Bvjts!X0
z?2xS?_ve_-k<Mujg;0Lz*3buG=3$G&ehepthlN*$KaOySSQ^nWmo<0M+(UEUMEXRQ
zMBbZcF;6+KElM>iKB_KiJlZ$9G`c^=E@oNG)mWWaNo-3TIW8)$Hg0Ub-~8?KhvJ>$
z3*&nim@mj(aCxE5!t{lw7O5^0EIO7zOo&c6l<+|iDySBWCGrz@C5{St!X3hAA}`T4
z(TLbXTq+(;@<=L8dXnssyft|w#WSTW<++3>sgS%(4NTpeI-VAqb|7ssJvzNHgOZVu
zaYCvgO_R1~>SyL=cFU|~g|hy|Zi}}s9+d~lYqOB71z9Z$wnC=pR9Yz4DhIM>Wmjgu
z&56o6maCpC&F##y%G;1PobR9i?GnNg;gYtchD%p19a!eQtZF&3JaKv33gZ<8D~47E
ztUS1iwkmDaPpj=$m#%)jCVEY4fnLGNg2A-`YwHVD3gv};>)hAvT~AmqS>Lr``i7kw
zJ{5_It`yrBmlc25DBO7E8;5VoznR>Ww5hAaxn$2~(q`%A-YuS64wkBy=9dm`4cXeX
z4c}I@?e+FW+b@^RDBHV(wnMq2zdX3SWv9u`%{xC-q*U}&`cyXV(%rRT*Z6MH?i+i&
z_B8C(+grT%{XWUQ+f@NoP1R=AW&26{v-dx)iK^-Nmiuj8txj!m?Z*Ss1N{dh4z}01
z)YTo*JycSU)+_5r4#yw9{+;i4Ee$peRgIj+;v;ZGdF1K$3E%e~4LaI(jC-u%2h$&R
z9cLXcYC@Xwnns&bn)_Q~Te?roKGD|d-g^8;+aC{{G(1^(O7m37Y1-+6)01cN&y1aw
zoqc{T`P^XJqPBbIW6s}d4{z_f5Om?vMgNQEJG?v2T=KYd^0M3I6IZxbny)%vZR&LD
zJpPl@Psh8QyPB@KTx+@RdcC!KX7}kEo;S|j^u2lU7XQ}Oo;f|;z4Ll+_r>@1-xl3|
zawq-H%e&ckC+@AhPrP6BK<z=<L*0kfKU@CX*zeqbYQT4(^U>T#_XdT7&;F71j}Joy
zkC~6lh7E@6o;W@^IpRNZ{ptLtL(gQ-CY~4mqW;US7Zxvm_|@yz&e53Bp_lTPlfP|z
zrTyx_>lv@x#=^!PzR7qqF<$gm`|ZJZ+;<)Cqu&ot<a{81DF0~rvGr5Xr~8u`lav1h
z1DNytV>2z=0000WV@Og>004R=004l4008;_004mL004C`008P>0026e000+nl3&F}
z00093P)t-sby)y=T>yMv0D)luhh+eeZ2*#O0IP=pu807yhybsN0I-Pwv55e=kpQxa
z0JDk!vyA|?i~zin0KSv}zm)*Ml>ot&0K%65#G3%dm;m3Z0N|<s->d-StpMe&0Ohm*
z=Cc6jvjFC`0Oz#;=&}Imv;gX}0P3~?>$U*wwE*z904pmiEG#T7EiEoCE-x=HFfcGN
zF)=bSGBYzXG&D3dH8nOiHa9mnI5;>tIXOByIy*Z%JUl!-Jv}}?K0iM{KtMo2K|w-7
zLPJACL_|bIMMXwNMn^|SNJvOYNl8jdN=r*iOiWBoO-)WtPESuyP*6}&QBhJ-Qd3h?
zR8&+|RaI72R##V7SXfwDSy@_IT3cINTwGjTU0q&YUSD5dU|?WjVPRroVq;@tWMpJz
zWo2e&W@l$-XlQ6@X=!R|YHMq2Y;0_8ZEbFDZf|dIaBy&OadC2Ta&vQYbaZreb#-=j
zc6WDoczAeud3kzzdV70&e0+R;eSLm@et&;|fPjF3fq{a8f`fyDgoK2Jg@uNOhKGlT
zh=_=ZiHVAeii?YjjEszpjg5|uj*pLzkdTm(k&%*;l9Q8@l$4Z}m6ev3mY0{8n3$NE
znVFiJnwy)OoSdAUot>VZo}ZteprD|kp`oIpqNAguq@<*!rKP5(rl+T;sHmu^si~@}
zs;jH3tgNi9t*x%EuCK4Ju&}VPv9YqUva_?Zw6wIfwY9dkwzs#pxVX5vxw*Q!y1To(
zyu7@<y}iD^zQ4b}z`(%4!NJ19!o$PE#KgqK#l^<P#>dCU$jHda$;ryf%FD~k%*@Qq
z&CSlv&d<-!(9qD)(b3Y<($mw^)YR0~)z#M4*4Nk9*x1<F+1c9K+S}XP+}zyV-QC{a
z-rwKf;Nall;o;)q;^X7v<mBY#<>lt)=I7_<=;-L_>FMg~>g((4?Ck9A?d|UF?(gsK
z@bK{Q@$vHV^7Hfa^z`)g_4W4l_V@Sq`1ttw`T6?#`uqF){QUg={r&#_{{R2~4hH#9
z0001{Nkl<Zc-mx+%L>9k5Cm(+RX1yb4-`T0phy4zmjn;Kq6Q>!cRa-C!9Esrb<2`e
zPXj=6H$V^pFayCryuHSK0AgkN16h`Z#ZmPf^#DNpdY|$hXy#k+=h*Q}eRv_h(D>*`
zp*ZG3cJQGk=`O%W)2&b_>az|wHUc!4q<NoozParQ01bLBSH9Yce%oe<;07?51+K@1
lE1$H-VrdYo;Uoa>0RYHSHZ$HG7FqxR002ovPDHLkV1ieqA@u+N

literal 0
HcmV?d00001

diff --git a/textures/jpg.jpg b/textures/jpg.jpg
new file mode 100644
index 0000000000000000000000000000000000000000..fb06b68e9e82d8e82c1ebafbecbe09b63e1dc942
GIT binary patch
literal 14336
zcmeI230zFuAHeT4(>kRlZQ>~vp@gE9LW@vRBxRXOB<*|Aq7;Uwv@1&ziZ+C(G}5Y<
z7aCEaO<A5cMMK;FcTygnp22%Q|MxMczMXq#e&_tox%c-w_x$?ZTNR}Ggma<|*e69D
z!(#)3oEX~&pX1;dF;w_4j0Fx51A~Ku?>@vZIAoUp&=u&1v2w!A69fnVD}e4fJHP>O
z0dT7^BESvs0Am1NfCPvD{J>a101yI@JqSZRZunSqxc(1amY-&*Mwlb~xMAX$Hs%1e
z3+4@Xi}4}^7Bh0Okp28!x%P@}{))R5I6M-PekVEm?;0@h9RXv(jp#=;15JiRw1x(O
zVe*VN7)1{0M{6SLj#2%{f9!_!D~!@FqaT0E{3k%?tA_QXv7<E{oqo>$(b|C4fDip2
z`8V=^v@W1E;6wjM>j+u{kpH8#0j&YZ|HlKU-7ip21jGPwU=kn!NCHy8WMB$_%wsAr
z4M6Q=pq2$@0CK=gU>1Pv2i-$-9p?aZ0VJ;kwKAXrr~+!hJYYVc4rl-ifQ0~(*MwRN
z&<1pX#egob1Xv0z1M~oW0LdFby#g=<jDVHED!>?64VVCH08_vWSPP(b>!IENkO6bR
z0<Z)&0>1*AfX#q4um!LIwgR?*9bgYQ0FHnY;0&OCU7>aZ+yM{36Yv6%H*W*B13rK+
z;0O2vs2w-dI6xT>_IrP@9^+f8vqT5Ofl-^I0S?w;ni!si1^q%Hz%MHYD=UG(%Eivk
z#=*_S%}wMY5_!h(^YM%!jUf{Gg!o8f1q1~Jxp{>}gakzR1q209CpbK`A+U0?vT_RW
z5P1Z?x(r^!NE~2ue0ZD$#zMm3Nw~p6WJfqw7%dv`aKW*_7}?l4IJt-*aFGu@6pv>i
z;L)f-+84gZ2qaeiNwXKSjWx7jmv9!44+u-(kX&>wU(o1whm?Y)OCTqgkg&)&(aBS!
zr%szbXRe}>vWlvvmbT7f-6cy`t}<S2vc}YGqt&L()>~}0y1Kc0czStn+ZhzRYxf??
z-tdUXsOXr3v2n)}Pn<lJlzjTk`OFI!FJ)c6l6}3Pu&B7C^hVj8O4{A3d-tnr8XB7(
zH@7@_`s{h<%dYNMuY2fk-lBQoF#Nk|y`R}9^CH2#SO^3>fgQ~Y$Kna#Nd(qOv)T9;
z8nRnBkCl)Q;1F08mT)egQ&PdGL(tOYHkXjpoQBDrXlg?<V{Br9-!!xL6Z>;sH5fM@
z2R9E-0tf8f{W_AK?^)lEFPu2>)(LxsqOhm(UVDq5_lcyor?qb4^|lc>lV3iFSuc@4
z*Sg76upsHthM0!kB|Hj^>D1Gj$7F2%CK8{R(svsCdT1^Saj~swb*Wo6+Y^tQhdi8f
z%0pJ^8Pw!7#0T}+ci0vS*R-ArwoR^nCVw^kYKmFrT*`v=y5Sm+k{_r}dC?|*Vn?Jy
zNqtO6H<jYgnLDF#zSvD6rRb>yPht6WHv}lXS0uepylJ*_bC*|=Gx1pNx+3CgHSLXW
zxQ*Cg^@!npOFiO$=1l)%`rl{^%fI7)O>Og7T^mAiUU5B*4|{Fn$M`HvezxsM3}v1e
zx2K8f(US^g74inI&1&Ztj!ATs_2lV|bs+3wo0*+#S~H%vhFDxB#``MekiDi!N3Q7Z
zo$c=9BWx8Tu*~zc<COFhQE~inR-THM1_~m|o3%V->gbC80X>hT=mCwvchlSr@Lrxe
zcls0>eASA#31ryzpU$?<iY-dECM}yA)K#Ws80%N(bY9{yWqawXjg9fFHX5ANE%R;H
zR;tT+RdpF=-hMSzyo;=p6>k{a7}B6a+j1(e@|;*y%gk^-*#pJTwZ(Y2W;-|Q+gzf`
zC_bW4cYD%4@24aFr_1y|rvLp||LgUC9ZjchZ_p<eZV<WU)2dXYS&#|OzX7^Ps-yX(
zD6^M$riB&mYAQ8R+gMX}UWUTA|F=7RGwF3neMX%^r`h&sT*{pvs$NhiYNux}sD1U&
z#k2wy?wGad`|PT-tjFh;Hft63r{oFKR~A#*`^cyNP~66PG|l?NQu|!(6f=eS2lPrW
zN6YFZdU)wyixw{tpQ706N2E9D(Zf1Y3MNY2E<axU@&*>NJyy<&QrY98)3v0ltn_J_
zm0gTXj<iaKifX)>Q)E<{TXr?Muc!Nkd7_+0U3bn`J`YFy?=b`+%>Cz&-+!W*>3a%_
zKjGG4C{BcMVvv!(rh`xiY6JzvYu{78CH_?eg>}RF(ed{bq@NW!U<VkT|00m34eLj7
z>i3jyng4Q7NQUPfDnD`j(bDSHn<6%=I4<tZ4nCbs(WZbB;RzvEdtX0Wo|8$rYjt_O
zhbc#~Bu(;QXxY=l#sNv8)0Nxi`1)z@K3LS2(wy$3W2~2W?kTU&=4fU6^aOR2UGA|_
zfl+a4)e~I&%uD6ejo2-#UlsYORa6aP_XY^tFKPUB4>Gd;Rf0V**S{aX{{6)E|9FO6
zp;D(p@LsoILyL;C%k?>~5yjh|#8pyg>)HZ1cCcAlDnznRI=>iyz?r^!X~~x8quLL~
z`KAQ>#Lu|8cw=4Y#;Qa9-mb0=R$UVN%dLNlQtmR593OMG!Z|d}Z&_LF?bClX_jilV
z2Y*NGzm#eJ%>DO|-G8_F2=)rod&nLAL7qbFI+QCm?&J7XB6y-%<}C>{7{9kG@cx@%
zzJX%@vCSQQJsXU3`HK|nD`ne^kCYs}Z2r3mf%~jc0kLoGHM4%v<GJJ)KGH7-CU=!G
zVDz7{|CP-6lWG4y*8a2n>kp;z=I2Re(-U3$lj?mp4`O;W*;nmci(<w;7Y)jo=51sf
zIyF<4RF^NYyzYv3&@Q2w*_kgI6v@BLTWejfZ@DJpq5<zh-v-n67R8q~xArZQp(iTw
z>)s@Zx~!|Aa36e8zNa<oQb&Z3IBhO<f>-d|W%?`g-%gA=MfWer_TSrWBU;z1HLsY{
zN+|!JwrrKF{v=Yu0rGMwZ30D2>n`t}zR4&16zR1owxZ-BF`<WbH8y5Jq*$vv=5Yhk
z`=u8cn@w|+Wl4%@nHiZZq#KqmrY55EAj{16VQTvs{nmTQ6%4o{AMD&wZp(Zal=~UV
zB%Dc{SwO46SwP0c8gPS*jVokpJOBsyu^2vgf~<@UoLfUy%4w*E4u&#JLmT|?g4>_=
z;xr_`3EJC1wg>gN33~pp^#bT&XnUScsvo^I8qMdmqkI?2<zdI3-yglb=TPQX6MAt2
z?BERLoW8a|cIAEkm(loV9VjUtj(?QDR^cb|5dRFluYm3$qx!8t)@C^VQTe35uRZ;i
z_{#;9Xb<b3HI%{pTCIP|vqAic^0R0k#pwKZfNb0F^|$)S@)p52D4NCmCOajc_<QTO
zhIa)lz;ZvfT|H>bhI%mUc3`{*<XbkF6?npjet`0^D6YozgBN~k$DjJ*XugE(iv#r$
zbhr%lfplz!al3=XBcC4Gf3Ao7!HmC{@z-Y)yZ=u9rSV<<1*1d$rRCV$_JUBpt*RT6
zHZ_vjHGjGLd(!Fhmzm`;!s^R%Cg-X~<(_+>XdYd!Yi`+lCiqCg+5TgFj!AtQRq6Kb
zJml*gTh+(p(H!(sYqT%FPr$JJnSjxKxVLA3C%)dkhoUY{Ke4qcJ1HPn<@hr{k&e70
zP5N9W7YAq$6>7^HX$pHz#$ESrmY7;jb-Zj!a?!flz3p75N#KR}AnFCVi|ID;!anxi
z$<<HaM)G-Q9IvfNzSg<eDRJwZm1LXyp=DjdH#mgWY;>0lo^0z+zPE9>8udv$;(sbk
z|6}fdf9(FZ*Y@>M`c3cpI$p2Pf^GP`*v7{l-FZ@Hb7;6-Wdo0@R`gtQ)=QOA5*vE|
zzzW_!NGQlK=tybGi|Mp2R6VRN#=fqjo~&9@XlAEXoh<a)p(=~}vFdufJ9YET9QE~&
ztXz(p58NXYeI%PQ0*@-t=GM+<sa$#fcFT4$-}Be06_zXIr|}o{Hjk$UD_J|Uso-X3
z*>@<E)R+|U2C0wjRNVK3NUY_!7Sh<VHr66c!&BB^4s~8?xMV`u6_=dzt`Xr>#gnEk
z4@UJZ^w|4S2>^jWU?&g+1OvN(-M}7z0_+9$0qA|9{ZNMhhkye>7!VFb0Fgix5Dmlt
z2Z2~14nS=Y%<}(r1xD82M%WKB_dm@2&kx-HbZxgCe@MJpcm;VD3-9X-wjt~j3`!^T
zwAY?geO@K49q!+HdP3)(_HZK&nQ-UT{DmBeOS;n>w0E}=Z!Y_7UDG&Y`H+%h^E=~K
zg*<AU@-kN~Wohb})oa=wmPog72l___+&}!bk*d`4hyNe#>enA?WPJ8NbECx#D27Hk
zO{{Qzze?<1<A%|rZ<J9*5!q-h-^JY@$6X6R97V9$+Em>yMLHk1AMxMrZ}i{U|3LhS
zRx}i2p&Cu%OC=Nu49CA;l4az3q<5q+BL7dzjOa%7KixMY{e6#q=KH(M_jgBmGx<yJ
z@6s|W9p^O2NNl~)l03bx_V!GR5@AVk*Sb8fX9ia@1GP*Y7Vl{}up`IfuH@kizk5MV
z-6@98c9!l{+fOXaoN>9FTq9Z%9*gZT7IhBc)t+ZP?xb#-T)m_8b+i8K@(D|tXi^6t
ukKVa2J~AMLXw_3oE^5nkj2pyU$$hbJsdCW+RLQ~WZ~31kBR=)B$ovnNH>aHd

literal 0
HcmV?d00001

diff --git a/trees.lua b/trees.lua
index 7f1c628..3e57a23 100644
--- a/trees.lua
+++ b/trees.lua
@@ -32,6 +32,7 @@ local c_ignore = gci("ignore")
 local c_dirt_grass = gci("default:dirt_with_grass")
 local c_tree = gci("default:tree")
 local c_leaves = gci("default:leaves")
+local c_apple = gci("default:apple")
 local c_jungletree = gci("default:jungletree")
 local c_jungleleaves = gci("default:jungleleaves")
 local c_snow = gci("default:snow")
@@ -45,6 +46,56 @@ local function add_leaves(data, vi, c_leaf, other)
 end
 
 --normal tree
+function amgmt.tree.normal_tree(pos, data, area, seed, minp, maxp, pr)
+	local x, y, z = pos.x, pos.y, pos.z
+	local is_apple_tree = false
+	if pr:next(1,100) < 25 then
+		is_apple_tree = true
+	end
+	local th = pr:next(4,5)
+	
+	for yy = y, y+th do
+		local vi = area:index(x, yy, z)
+		data[vi] = c_tree
+	end
+	
+	local y = y + th - 1
+	
+	for xx = x-1, x+1 do
+	for yy = y-1, y+1 do
+	for zz = z-1, z+1 do
+		if area:contains(xx,yy,zz) then
+			local vi = area:index(xx, yy, zz)
+			if pr:next(1,100) > 25 then
+				add_leaves(data, vi, c_leaves)
+			else
+				if is_apple_tree == true then
+					add_leaves(data, vi, c_apple)
+				else
+					add_leaves(data, vi, c_leaves)
+				end
+			end
+		end
+	end
+	end
+	end
+	
+	for ii = 1, 8 do
+		local xx = x + pr:next(-2,2)
+		local yy = y + pr:next(-1,2)
+		local zz = z + pr:next(-2,2)
+		for xxx = 0, 1 do
+		for yyy = 0, 1 do
+		for zzz = 0, 1 do
+			if area:contains(xx+xxx, yy+yyy, zz+zzz) then
+				local vi = area:index(xx+xxx, yy+yyy, zz+zzz)
+				add_leaves(data, vi, c_leaves, c_leaves)
+			end
+		end
+		end
+		end
+	end
+end
 regtr({
 	name = "normal",
 	chance = 15,
@@ -52,44 +103,60 @@ regtr({
 	maxh = 85,
 	grows_on = "default:dirt_with_grass",
 	grow = function(pos, data, area, seed, minp, maxp, pr)
-		local x, y, z = pos.x, pos.y, pos.z
-		local th = pr:next(4,5)
-		
-		for yy = math.max(y,minp.y), math.min(y+th,maxp.y) do
-			local vi = area:index(x, yy, z)
-			data[vi] = c_tree
-		end
-		
-		local y = y + th - 1
-		
-		for xx = math.max(x-1,minp.x), math.min(x+1,maxp.x) do
-		for yy = math.max(y-1,minp.y), math.min(y+1,maxp.y) do
-		for zz = math.max(z-1,minp.z), math.min(z+1,maxp.z) do
-			local vi = area:index(xx, yy, zz)
-			add_leaves(data, vi, c_leaves)
-		end
-		end
-		end
-		
-		for ii = 1, 8 do
-			local xx = x + pr:next(-2,2)
-			local yy = y + pr:next(-1,2)
-			local zz = z + pr:next(-2,2)
-			for xxx = 0, 1 do
-			for yyy = 0, 1 do
-			for zzz = 0, 1 do
-				local vi = area:index(xx+xxx, yy+yyy, zz+zzz)
-				add_leaves(data, vi, c_leaves, c_leaves)
-			end
-			end
-			end
-		end
+		amgmt.tree.normal_tree(pos, data, area, seed, minp, maxp, pr)
 		
 		--amgmt.debug("normal tree spawned at:"..x..","..y..","..z)
 	end
 })
 
 --jungle tree
+function amgmt.tree.jungle_tree(pos, data, area, seed, minp, maxp, pr)
+	local x, y, z = pos.x, pos.y, pos.z
+	local th = pr:next(8,12)
+	
+	for zz = z-1, z+1,maxp.z do
+	for xx = x-1, x+1,maxp.x do
+		if pr:next(1,3) >= 2 and area:contains(xx,y,zz) then
+			local vi = area:index(xx, y, zz)
+			add_leaves(data, vi, c_jungletree)
+		end
+	end
+	end
+	
+	for yy = y, y+th do
+		local vi = area:index(x, yy, z)
+		data[vi] = c_jungletree
+	end
+	
+	local y = y + th - 1
+	
+	for xx = x-1, x+1 do
+	for yy = y-1, y+1 do
+	for zz = z-1, z+1 do
+		if area:contains(xx,yy,zz) then
+			local vi = area:index(xx, yy, zz)
+			add_leaves(data, vi, c_jungleleaves)
+		end
+	end
+	end
+	end
+	
+	for ii = 1, 30 do
+		local xx = x + pr:next(-3,3)
+		local yy = y + pr:next(-2,2)
+		local zz = z + pr:next(-3,3)
+		for xxx = 0, 1 do
+		for yyy = 0, 1 do
+		for zzz = 0, 1 do
+			if area:contains(xx+xxx, yy+yyy, zz+zzz) then
+				local vi = area:index(xx+xxx, yy+yyy, zz+zzz)
+				add_leaves(data, vi, c_jungleleaves, c_jungleleaves)
+			end
+		end
+		end
+		end
+	end
+end
 regtr({
 	name = "jungle",
 	chance = 10,
@@ -97,53 +164,53 @@ regtr({
 	maxh = 85,
 	grows_on = "default:dirt_with_grass",
 	grow = function(pos, data, area, seed, minp, maxp, pr)
-		local x, y, z = pos.x, pos.y, pos.z
-		local th = pr:next(8,12)
-		
-		for zz = math.max(z-1,minp.z), math.min(z+1,maxp.z) do
-		for xx = math.max(x-1,minp.x), math.min(x+1,maxp.x) do
-			if pr:next(1,3) >= 2 then
-				local vi = area:index(xx, y, zz)
-				add_leaves(data, vi, c_jungletree)
-			end
-		end
-		end
-		
-		for yy = math.max(y,minp.y), math.min(y+th,maxp.y) do
-			local vi = area:index(x, yy, z)
-			data[vi] = c_jungletree
-		end
-		
-		local y = y + th - 1
-		
-		for xx = math.max(x-1,minp.x), math.min(x+1,maxp.x) do
-		for yy = math.max(y-1,minp.y), math.min(y+1,maxp.y) do
-		for zz = math.max(z-1,minp.z), math.min(z+1,maxp.z) do
-			local vi = area:index(xx, yy, zz)
-			add_leaves(data, vi, c_jungleleaves)
-		end
-		end
-		end
-		
-		for ii = 1, 30 do
-			local xx = x + pr:next(-3,3)
-			local yy = y + pr:next(-2,2)
-			local zz = z + pr:next(-3,3)
-			for xxx = 0, 1 do
-			for yyy = 0, 1 do
-			for zzz = 0, 1 do
-				local vi = area:index(xx+xxx, yy+yyy, zz+zzz)
-				add_leaves(data, vi, c_jungleleaves, c_jungleleaves)
-			end
-			end
-			end
-		end
+		amgmt.tree.jungle_tree(pos, data, area, seed, minp, maxp, pr)
 		
 		--amgmt.debug("jungle tree spawned at:"..x..","..y..","..z)
 	end
 })
 
 --savanna tree
+local c_savanna_tree = gci("amgmt:savanna_tree")
+local c_savanna_leaves = gci("amgmt:savanna_leaves")
+function amgmt.tree.savanna_tree(pos, data, area, seed, minp, maxp, pr)
+	local x, y, z = pos.x, pos.y, pos.z
+	local th = pr:next(7,11)
+	
+	for yy = y, y+th do
+		local vi = area:index(x, yy, z)
+		data[vi] = c_savanna_tree
+	end
+	y = y+th-1
+	
+	for xx = x-1, x+1 do
+	for yy = y-1, y+1 do
+	for zz = z-1, z+1 do
+		if area:contains(xx,yy,zz) then
+			local vi = area:index(xx, yy, zz)
+			add_leaves(data, vi, c_savanna_leaves)
+		end
+	end
+	end
+	end
+	
+	for ii = 1, 12 do
+		local xx = x + pr:next(-2,2)
+		local yy = y + pr:next(-2,2)
+		local zz = z + pr:next(-2,2)
+		
+		for xxx = 0, 1 do
+		for yyy = 0, 1 do
+		for zzz = 0, 1 do
+			if area:contains(xx+xxx, yy+yyy, zz+zzz) then
+				local vi = area:index(xx+xxx, yy+yyy, zz+zzz)
+				add_leaves(data, vi, c_savanna_leaves, c_leaves)
+			end
+		end
+		end
+		end
+	end
+end
 regtr({
 	name = "savanna",
 	chance = 225,
@@ -151,44 +218,42 @@ regtr({
 	maxh = 85,
 	grows_on = "amgmt:dirt_at_savanna",
 	grow = function(pos, data, area, seed, minp, maxp, pr)
-		local x, y, z = pos.x, pos.y, pos.z
-		local th = pr:next(7,11)
-		
-		for yy = math.max(y,minp.y), math.min(y+th,maxp.y) do
-			local vi = area:index(x, yy, z)
-			data[vi] = c_tree
-		end
-		y = y+th-1
-		
-		for xx = math.max(x-1,minp.x), math.min(x+1,maxp.x) do
-		for yy = math.max(y-1,minp.y), math.min(y+1,maxp.y) do
-		for zz = math.max(z-1,minp.z), math.min(z+1,maxp.z) do
-			local vi = area:index(xx, yy, zz)
-			add_leaves(data, vi, c_leaves)
-		end
-		end
-		end
-		
-		for ii = 1, 12 do
-			local xx = x + pr:next(-2,2)
-			local yy = y + pr:next(-2,2)
-			local zz = z + pr:next(-2,2)
-			
-			for xxx = 0, 1 do
-			for yyy = 0, 1 do
-			for zzz = 0, 1 do
-				local vi = area:index(xx+xxx, yy+yyy, zz+zzz)
-				add_leaves(data, vi, c_leaves, c_leaves)
-			end
-			end
-			end
-		end
+		amgmt.tree.savanna_tree(pos, data, area, seed, minp, maxp, pr)
 		
 		--amgmt.debug("savanna tree spawned at:"..x..","..y..","..z)
 	end
 })
 
+local c_pine_tree = gci("amgmt:pine_tree")
+local c_pine_leaves = gci("amgmt:pine_leaves")
 --pine tree at cold taiga
+function amgmt.tree.pine_cold_tree(pos, data, area, seed, minp, maxp, pr)
+	local x, y, z = pos.x, pos.y, pos.z
+	local th = pr:next(8,9)
+	
+	for yy = y, y+th do
+		local vi = area:index(x, yy, z)
+		data[vi] = c_pine_tree
+	end
+	
+	for xx = x-1, x+1 do
+	for yy = 1, 3 do
+	for zz = z-1, z+1 do
+		if area:contains(xx, y+(yy*2)+1, zz) then
+			local vi = area:index(xx, y+(yy*2)+1, zz)
+			add_leaves(data, vi, c_pine_leaves)
+			local vi = area:index(xx, y+(yy*2)+2, zz)
+			add_leaves(data, vi, c_snow)
+		end
+	end
+	end
+	end
+	
+	local vi = area:index(x, y+th+1, z)
+	add_leaves(data, vi, c_pine_leaves)
+	local vi = area:index(x, y+th+2, z)
+	add_leaves(data, vi, c_snow)
+end
 regtr({
 	name = "pine_cold",
 	chance = 40,
@@ -196,42 +261,36 @@ regtr({
 	maxh = 100,
 	grows_on = "default:dirt_with_snow",
 	grow = function(pos, data, area, seed, minp, maxp, pr)
-		local x, y, z = pos.x, pos.y, pos.z
-		local th = pr:next(5,8)
-		
-		for yy = math.max(y,minp.y), math.min(y+th,maxp.y) do
-			local vi = area:index(x, yy, z)
-			data[vi] = c_tree
-		end
-		
-		for xx = math.max(x-2,minp.x), math.min(x+2,maxp.x) do
-		for zz = math.max(z-2,minp.z), math.min(z+2,maxp.z) do
-			local vi = area:index(xx, y+3, zz)
-			add_leaves(data, vi, c_leaves)
-			local vi = area:index(xx, y+4, zz)
-			add_leaves(data, vi, c_snow)
-		end
-		end
-		
-		local vi = area:index(x, y+th+1, z)
-		add_leaves(data, vi, c_leaves)
-		local vi = area:index(x, y+th+2, z)
-		add_leaves(data, vi, c_snow)
-		
-		for xx = math.max(x-1,minp.x), math.min(x+1,maxp.x) do
-		for zz = math.max(z-1,minp.z), math.min(z+1,maxp.z) do
-			local vi = area:index(xx, y+th, zz)
-			add_leaves(data, vi, c_leaves)
-			local vi = area:index(xx, y+th+1, zz)
-			add_leaves(data, vi, c_snow)
-		end
-		end
+		amgmt.tree.pine_cold_tree(pos, data, area, seed, minp, maxp, pr)
 		
 		--amgmt.debug("pine tree spawned at:"..x..","..y..","..z)
 	end
 })
 
 --pine tree at taiga
+function amgmt.tree.pine_tree(pos, data, area, seed, minp, maxp, pr)
+	local x, y, z = pos.x, pos.y, pos.z
+	local th = pr:next(8,9)
+	
+	for yy = y, y+th do
+		local vi = area:index(x, yy, z)
+		data[vi] = c_pine_tree
+	end
+	
+	for xx = x-1, x+1 do
+	for yy = 1, 3 do
+	for zz = z-1, z+1 do
+		if area:contains(xx, y+(yy*2)+1, zz) then
+			local vi = area:index(xx, y+(yy*2)+1, zz)
+			add_leaves(data, vi, c_pine_leaves)
+		end
+	end
+	end
+	end
+	
+	local vi = area:index(x, y+th+1, z)
+	add_leaves(data, vi, c_pine_leaves)
+end
 regtr({
 	name = "pine_taiga",
 	chance = 40,
@@ -239,30 +298,7 @@ regtr({
 	maxh = 100,
 	grows_on = "default:dirt_with_grass",
 	grow = function(pos, data, area, seed, minp, maxp, pr)
-		local x, y, z = pos.x, pos.y, pos.z
-		local th = pr:next(5,8)
-		
-		for yy = math.max(y,minp.y), math.min(y+th,maxp.y) do
-			local vi = area:index(x, yy, z)
-			data[vi] = c_tree
-		end
-		
-		for xx = math.max(x-2,minp.x), math.min(x+2,maxp.x) do
-		for zz = math.max(z-2,minp.z), math.min(z+2,maxp.z) do
-			local vi = area:index(xx, y+3, zz)
-			add_leaves(data, vi, c_leaves)
-		end
-		end
-		
-		for xx = math.max(x-1,minp.x), math.min(x+1,maxp.x) do
-		for zz = math.max(z-1,minp.z), math.min(z+1,maxp.z) do
-			local vi = area:index(xx, y+th, zz)
-			add_leaves(data, vi, c_leaves)
-		end
-		end
-		
-		local vi = area:index(x, y+th+1, z)
-		add_leaves(data, vi, c_leaves)
+		amgmt.tree.pine_tree(pos, data, area, seed, minp, maxp, pr)
 		
 		--amgmt.debug("pine tree spawned at:"..x..","..y..","..z)
 	end