add support for all mega trees

Author: TheThanathor

gm4_towering_trees/beet.yaml

@@ -6,6 +6,7 @@ data_pack:
   load: .
 
 pipeline:
+  - gm4_towering_trees.generate
   - gm4.plugins.extend.module
   - gm4.plugins.include.lib_trees
 

gm4_towering_trees/data/gm4_towering_trees/function/generate_mega_tree.mcfunction

@@ -9,7 +9,7 @@ execute if entity @s[tag=gm4_dark_oak_tree_sapling] store success score $tree_pl
 
 # towering
 execute if entity @s[tag=gm4_oak_tree_sapling] run function gm4_towering_trees:generate_tree_type/oak/pick_variant
-execute if entity @s[tag=gm4_acacia_tree_sapling] run function gm4_towering_trees:generate_tree_type/oak/pick_variant
-execute if entity @s[tag=gm4_cherry_tree_sapling] run function gm4_towering_trees:generate_tree_type/oak/pick_variant
-execute if entity @s[tag=gm4_mangrove_tree_sapling] run function gm4_towering_trees:generate_tree_type/oak/pick_variant
-execute if entity @s[tag=gm4_birch_tree_sapling] run function gm4_towering_trees:generate_tree_type/oak/pick_variant
+execute if entity @s[tag=gm4_acacia_tree_sapling] run function gm4_towering_trees:generate_tree_type/acacia/pick_variant
+execute if entity @s[tag=gm4_cherry_tree_sapling] run function gm4_towering_trees:generate_tree_type/cherry/pick_variant
+execute if entity @s[tag=gm4_mangrove_tree_sapling] run function gm4_towering_trees:generate_tree_type/mangrove/pick_variant
+execute if entity @s[tag=gm4_birch_tree_sapling] run function gm4_towering_trees:generate_tree_type/birch/pick_variant

gm4_towering_trees/data/gm4_towering_trees/function/generate_tree_type/mangrove/extra.mcfunction

@@ -0,0 +1,3 @@
+
+fill ~ ~ ~ ~1 ~ ~1 air replace mangrove_propagule
+schedule function gm4_towering_trees:generate_tree_type/mangrove/roots/schedule 1t

gm4_towering_trees/data/gm4_towering_trees/function/generate_tree_type/mangrove/roots/loop.mcfunction

@@ -0,0 +1,26 @@
+
+# if block cannot be replaced with root or max length was reached return
+execute unless block ~ ~ ~ #gm4_towering_trees:mangrove_root_replaceable run return fail
+scoreboard players remove $max_length gm4_towering_trees_data 1
+execute unless score $max_length gm4_towering_trees_data matches 1.. run return fail
+
+# fill with (muddy) roots
+fill ~ ~ ~ ~ ~ ~ muddy_mangrove_roots replace mud
+execute unless block ~ ~ ~ muddy_mangrove_roots run setblock ~ ~ ~ mangrove_roots
+
+# random carpets
+execute if predicate {condition:"random_chance",chance:0.5} run fill ~ ~1 ~ ~ ~1 ~ moss_carpet replace #air
+
+# small chance to skew to ground from now on
+execute if predicate {condition:"random_chance",chance:0.02} run tag @s add gm4_towering_trees.mangrove_root_skewed
+
+# pick direction
+execute if predicate {condition:"random_chance",chance:0.8} positioned ~ ~-1 ~ run return run function gm4_towering_trees:generate_tree_type/mangrove/roots/loop
+execute if score $max_distance_from_tree gm4_towering_trees_data matches 0 run say max distance!
+execute if score $max_distance_from_tree gm4_towering_trees_data matches 0 positioned ~ ~-1 ~ run return run function gm4_towering_trees:generate_tree_type/mangrove/roots/loop
+
+scoreboard players set $max_skew_length gm4_towering_trees_data 5
+execute if entity @s[tag=gm4_towering_trees.mangrove_root_skewed] positioned ~ ~-1 ~ run function gm4_towering_trees:generate_tree_type/mangrove/roots/loop_to_ground
+
+scoreboard players remove $max_distance_from_tree gm4_towering_trees_data 1
+execute positioned ^ ^ ^1 run function gm4_towering_trees:generate_tree_type/mangrove/roots/loop

gm4_towering_trees/data/gm4_towering_trees/function/generate_tree_type/mangrove/roots/loop_to_ground.mcfunction

@@ -0,0 +1,12 @@
+
+# if block cannot be replaced with root return
+execute unless block ~ ~ ~ #gm4_towering_trees:mangrove_root_replaceable run return fail
+scoreboard players remove $max_skew_length gm4_towering_trees_data 1
+execute unless score $max_skew_length gm4_towering_trees_data matches 1.. run return fail
+
+# fill with (muddy) roots
+fill ~ ~ ~ ~ ~ ~ muddy_mangrove_roots replace mud
+execute unless block ~ ~ ~ muddy_mangrove_roots run setblock ~ ~ ~ glass
+
+# go down to ground
+execute positioned ~ ~-1 ~ run function gm4_towering_trees:generate_tree_type/mangrove/roots/loop_to_ground

gm4_towering_trees/data/gm4_towering_trees/function/generate_tree_type/mangrove/roots/schedule.mcfunction

@@ -0,0 +1,2 @@
+
+execute as @e[type=marker,tag=gm4_towering_trees.mangrove_root] at @s run function gm4_towering_trees:generate_tree_type/mangrove/roots/start

gm4_towering_trees/data/gm4_towering_trees/function/generate_tree_type/mangrove/roots/start.mcfunction

@@ -0,0 +1,5 @@
+
+scoreboard players set $max_distance_from_tree gm4_towering_trees_data 7
+scoreboard players set $max_length gm4_towering_trees_data 16
+function gm4_towering_trees:generate_tree_type/mangrove/roots/loop
+kill @s