Reeling Rods Module

gm4_reeling_rods/README.md

@@ -0,0 +1,13 @@
+# Reeling Rods<!--$headerTitle--><!--$pmc:delete-->
+
+Reel in more than just fish with these rods! Yoink the chest from the chest boat and more! <!--$pmc:headerSize-->
+
+### Features
+Fishing Rods can now yoink many more things!
+- Pull Paintings off walls
+- Reel in items from Item Frames
+- Snatch leashed mobs from leash knots
+- Try and fail to pull in an end crystal
+Adds a new enchantment for fishing rods to take your yoinking up a notch! With it you can
+- Separate chest boats and all minecart variants
+- Steal items from allays

gm4_reeling_rods/beet.yaml

@@ -0,0 +1,47 @@
+id: gm4_reeling_rods
+name: Reeling Rods
+version: 1.0.X
+
+data_pack:
+  load: .
+  overlays:
+    - formats:
+        min_inclusive: 61
+        max_inclusive: 61
+      directory: since_61
+    - formats:
+        min_inclusive: 57
+        max_inclusive: 61
+      directory: since_57
+    - formats:
+        min_inclusive: 48
+        max_inclusive: 48
+      directory: backport_48
+
+pipeline:
+  - generate_files
+  - gm4.plugins.extend.module
+
+meta:
+  gm4:
+    versioning:
+      schedule_loops: [tick]
+    website:
+      description: Reel in more than just fish with these rods! Yoink the chest from the chest boat and more!
+      recommended: 
+        - gm4_end_fishing
+        - gm4_live_catch
+      notes: []
+    #modrinth:
+      #project_id: 
+    #smithed:
+      #pack_id: 
+    #planetminecraft:
+      #uid: 
+    video: null
+    wiki: https://wiki.gm4.co/wiki/Reeling_Rods
+    credits:
+      Creator:
+        - runcows
+      #Icon Design:
+        #- runcows

gm4_reeling_rods/data/gm4_reeling_rods/enchantment/reeling.json

@@ -0,0 +1,22 @@
+{
+    "description":{
+        "text": "Reeling"
+    },
+    "supported_items": "minecraft:fishing_rod",
+    "primary_items": "minecraft:fishing_rod",
+    "weight": 3,
+    "max_level": 1,
+    "min_cost": {
+        "base": 5,
+        "per_level_above_first": 8
+    },
+    "max_cost": {
+        "base": 55,
+        "per_level_above_first": 8
+    },
+    "anvil_cost": 2,
+    "slots": [
+        "any"
+    ],
+    "effects": {}
+}

gm4_reeling_rods/data/gm4_reeling_rods/function/empty_container_entity.mcfunction

@@ -0,0 +1,36 @@
+# Loops through Items[] and creates an item entity for each item, setting a slightly random motion
+# @s = entity with an Items[] tag
+# at @s
+# run from separate
+
+# Assumptions
+    # storage gm4_reeling_rods:temp motion_vector is a Motion[] vector that reaches player
+    # in storage gm4_reeling_rods:temp entity_data is an Items[] array of item data objects
+
+# pull item data to be processed
+data modify storage gm4_reeling_rods:temp item_data.Item set from storage gm4_reeling_rods:temp entity_data.Items[0]
+
+# randomize motion slightly....
+    # this is the complicated bit
+execute store result score $motionX gm4_reeling_rods.math run data get storage gm4_reeling_rods:temp motion_vector[0] 100
+execute store result score $motionY gm4_reeling_rods.math run data get storage gm4_reeling_rods:temp motion_vector[1] 100
+execute store result score $motionZ gm4_reeling_rods.math run data get storage gm4_reeling_rods:temp motion_vector[2] 100
+execute store result score $randomX gm4_reeling_rods.math run random value -10..10
+execute store result score $randomY gm4_reeling_rods.math run random value 0..10
+execute store result score $randomZ gm4_reeling_rods.math run random value -10..10
+execute store result storage gm4_reeling_rods:temp item_data.Motion[0] double 0.006 run \
+    scoreboard players operation $motionX gm4_reeling_rods.math += $randomX gm4_reeling_rods.math
+execute store result storage gm4_reeling_rods:temp item_data.Motion[1] double 0.006 run \
+    scoreboard players operation $motionY gm4_reeling_rods.math += $randomY gm4_reeling_rods.math
+execute store result storage gm4_reeling_rods:temp item_data.Motion[2] double 0.006 run \
+    scoreboard players operation $motionZ gm4_reeling_rods.math += $randomZ gm4_reeling_rods.math
+# scale 0.01 for same magnitude as main item, currently 0.006 to be slower
+
+# summon item with data
+function gm4_reeling_rods:summon_item with storage gm4_reeling_rods:temp
+
+# remove processed item
+data remove storage gm4_reeling_rods:temp entity_data.Items[0]
+
+# run again if needed
+execute if data storage gm4_reeling_rods:temp entity_data.Items[] run function gm4_reeling_rods:empty_container_entity

gm4_reeling_rods/data/gm4_reeling_rods/function/fished/chest_boat/action.mcfunction

@@ -0,0 +1,15 @@
+# Action for reeled chest_boat
+# @s = chest_boat type
+# at @s
+# with {boat_type}
+# run from fished/select_type
+
+data modify storage gm4_reeling_rods:temp entity_data set from entity @s
+data modify storage gm4_reeling_rods:temp item_data.Item set value {id:"minecraft:chest",count:1}
+execute positioned ~ ~0.75 ~ run function gm4_reeling_rods:separate
+data remove storage gm4_reeling_rods:temp entity_data.UUID
+data remove storage gm4_reeling_rods:temp entity_data.Passengers
+$data modify storage gm4_reeling_rods:temp entity_type set value "$(boat_type)"
+function gm4_reeling_rods:summon_entity with storage gm4_reeling_rods:temp
+execute on passengers run function gm4_reeling_rods:fished/chest_boat/passenger_transfer
+tp @s ~ -1000 ~

gm4_reeling_rods/data/gm4_reeling_rods/function/fished/chest_boat/passenger_transfer.mcfunction

@@ -0,0 +1,7 @@
+# transfer old passenger to new boat
+# @s = passengers of chest boat type
+# at old chest boat type
+# run from fished/chest_boat/action
+
+ride @s dismount
+ride @s mount @e[type=#gm4:boats,distance=..0.00001,limit=1]

gm4_reeling_rods/data/gm4_reeling_rods/function/fished/donkey.mcfunction

@@ -0,0 +1,12 @@
+# Action for reeled donkey
+# @s = donkey
+# at @s
+# run from fished/selec_type
+
+data modify storage gm4_reeling_rods:temp entity_data set from entity @s
+data modify storage gm4_reeling_rods:temp item_data set value {}
+data modify storage gm4_reeling_rods:temp item_data.Item set from entity @s SaddleItem
+execute if data entity @s {ChestedHorse:1b} run data modify storage gm4_reeling_rods:temp item_data.Item set value {id:"minecraft:chest",count:1}
+execute positioned ~ ~0.7 ~ run function gm4_reeling_rods:separate
+execute if data entity @s {ChestedHorse:1b} run return run data modify entity @s ChestedHorse set value 0b
+item replace entity @s horse.saddle with minecraft:air

gm4_reeling_rods/data/gm4_reeling_rods/function/fished/horse.mcfunction

@@ -0,0 +1,11 @@
+# Action for reeled horse
+# @s = horse
+# at @s
+# run from fished/select_type
+
+data modify storage gm4_reeling_rods:temp item_data set value {}
+data modify storage gm4_reeling_rods:temp item_data.Item set from entity @s SaddleItem
+execute store result score $armored gm4_reeling_rods.math if data entity @s body_armor_item run data modify storage gm4_reeling_rods:temp item_data.Item set from entity @s body_armor_item
+execute positioned ~ ~0.8 ~ run function gm4_reeling_rods:separate
+execute if data storage gm4_reeling_rods:temp {item_data:{Item:{id:"minecraft:saddle"}}} run item replace entity @s horse.saddle with minecraft:air
+execute if score $armored gm4_reeling_rods.math matches 1 run item replace entity @s armor.body with minecraft:air

gm4_reeling_rods/data/gm4_reeling_rods/function/fished/item_frame.mcfunction

@@ -0,0 +1,11 @@
+# Action for reeled item frame or glow item frame
+# @s = item frame or glow item frame
+# at @s
+# with {type}
+# run from fished/select_type
+
+$data modify storage gm4_reeling_rods:temp item_data.Item set value {id:"$(type)",count:1}
+data modify storage gm4_reeling_rods:temp item_data.Item set from entity @s Item
+execute align xz positioned ~0.5 ~ ~0.5 run function gm4_reeling_rods:separate
+execute unless data entity @s Item run return run kill @s
+data remove entity @s Item

gm4_reeling_rods/data/gm4_reeling_rods/function/fished/leash_knot/action.mcfunction

@@ -0,0 +1,14 @@
+# Action for reeled leash knot
+# @s = leash knot
+# at @s
+# run from fished/select_type
+
+tag @s add gm4_reeling_rods.leash_knot
+
+# distance=..10 is leash distance UNTIL 1.21.6
+execute as @e[type=#gm4_reeling_rods:leashable,distance=..10] \
+    if function gm4_reeling_rods:fished/leash_knot/leaded_by_knot \
+    run function gm4_reeling_rods:fished/leash_knot/change_leader
+
+
+kill @s

gm4_reeling_rods/data/gm4_reeling_rods/function/fished/leash_knot/change_leader.mcfunction

@@ -0,0 +1,7 @@
+# Changes a leashed entities leader from a leash knot to a tagged player
+# @s = entity leaded to leash knot
+# at leash knot
+# run from fished/leash_knot/action
+
+data remove entity @s leash
+data modify entity @s leash.UUID set from entity @e[type=player,tag=gm4_reeling_rods.player,distance=..45,limit=1] UUID

gm4_reeling_rods/data/gm4_reeling_rods/function/fished/leash_knot/leaded_by_knot.mcfunction

@@ -0,0 +1,6 @@
+# Checks if an entity is leashed by the knot in question
+# @s = a leashable entity
+# at owner
+# run from fished/leash_knot/action
+
+return run execute on leasher if entity @s[tag=gm4_reeling_rods.leash_knot]

gm4_reeling_rods/data/gm4_reeling_rods/function/fished/llama.mcfunction

@@ -0,0 +1,12 @@
+# Action for reeled llama or trader llama
+# @s = llama or trader llama
+# at @s
+# run from fished/select_type
+
+data modify storage gm4_reeling_rods:temp entity_data set from entity @s
+data modify storage gm4_reeling_rods:temp item_data set value {}
+data modify storage gm4_reeling_rods:temp item_data.Item set from entity @s body_armor_item
+execute if data entity @s {ChestedHorse:1b} run data modify storage gm4_reeling_rods:temp item_data.Item set value {id:"minecraft:chest",count:1}
+execute positioned ~ ~1 ~ run function gm4_reeling_rods:separate
+execute if data entity @s {ChestedHorse:1b} run return run data modify entity @s ChestedHorse set value 0b
+item replace entity @s armor.body with minecraft:air

gm4_reeling_rods/data/gm4_reeling_rods/function/fished/minecart/action.mcfunction

@@ -0,0 +1,15 @@
+# Action for reeled *_minecart
+# @s = *_minecart
+# at @s
+# with {block}
+# run from fished/select_type
+
+data modify storage gm4_reeling_rods:temp entity_data set from entity @s
+$data modify storage gm4_reeling_rods:temp item_data.Item set value {id:"$(block)",count:1}
+function gm4_reeling_rods:separate
+data remove storage gm4_reeling_rods:temp entity_data.UUID
+data remove storage gm4_reeling_rods:temp entity_data.Passengers
+data modify storage gm4_reeling_rods:temp entity_type set value "minecraft:minecart"
+function gm4_reeling_rods:summon_entity with storage gm4_reeling_rods:temp
+execute on passengers run function gm4_reeling_rods:fished/minecart/passenger_transfer
+tp @s ~ -1000 ~

gm4_reeling_rods/data/gm4_reeling_rods/function/fished/minecart/passenger_transfer.mcfunction

@@ -0,0 +1,7 @@
+# transfer old passenger to new minecart
+# @s = passengers of *_minecart
+# at old *_minecart
+# run from fished/minecart/action
+
+ride @s dismount
+ride @s mount @e[type=minecraft:minecart,distance=..0.00001,limit=1]

gm4_reeling_rods/data/gm4_reeling_rods/function/fished/mule.mcfunction

@@ -0,0 +1,12 @@
+# Action for reeled mule
+# @s = mule
+# at @s
+# run from fished/select_type
+
+data modify storage gm4_reeling_rods:temp entity_data set from entity @s
+data modify storage gm4_reeling_rods:temp item_data set value {}
+data modify storage gm4_reeling_rods:temp item_data.Item set from entity @s SaddleItem
+execute if data entity @s {ChestedHorse:1b} run data modify storage gm4_reeling_rods:temp item_data.Item set value {id:"minecraft:chest",count:1}
+execute positioned ~ ~0.8 ~ run function gm4_reeling_rods:separate
+execute if data entity @s {ChestedHorse:1b} run return run data modify entity @s ChestedHorse set value 0b
+item replace entity @s horse.saddle with minecraft:air

gm4_reeling_rods/data/gm4_reeling_rods/function/fished/painting.mcfunction

@@ -0,0 +1,8 @@
+# Action for reeled painting
+# @s = painting
+# at @s
+# run from fished/select_type
+
+data modify storage gm4_reeling_rods:temp item_data.Item set value {id:"minecraft:painting",count:1}
+execute align xz positioned ~0.5 ~ ~0.5 run function gm4_reeling_rods:separate
+kill @s

gm4_reeling_rods/data/gm4_reeling_rods/function/fished/pig.mcfunction

@@ -0,0 +1,11 @@
+# Action for reeled pig
+# @s = pig
+# at @s
+# run from fished/select_type
+
+# fail if no saddle
+execute unless data entity @s {Saddle:1b} run return fail
+
+data modify entity @s Saddle set value 0b
+data modify storage gm4_reeling_rods:temp item_data.Item set value {id:"minecraft:saddle",count:1}
+execute positioned ~ ~0.5 ~ run function gm4_reeling_rods:separate

gm4_reeling_rods/data/gm4_reeling_rods/function/fished/snow_golem.mcfunction

@@ -0,0 +1,11 @@
+# Action for reeled snow_golem
+# @s = snow_golem
+# at @s
+# run from fished/select_type
+
+# fail if no Pumpkin
+execute unless data entity @s {Pumpkin:1b} run return fail
+
+data modify entity @s Pumpkin set value 0b
+data modify storage gm4_reeling_rods:temp item_data.Item set value {id:"minecraft:carved_pumpkin",count:1}
+execute positioned ~ ~1.2 ~ run function gm4_reeling_rods:separate

gm4_reeling_rods/data/gm4_reeling_rods/function/fished/stealable/order/equipment_1.mcfunction

@@ -0,0 +1,19 @@
+# Checks slots to steal
+# @s = #gm4_reeling_rods:steal_equipment
+# at @s
+# run from fished/stealable/steal_equipment
+
+# 1
+execute if items entity @s weapon.mainhand * run return run function gm4_reeling_rods:fished/stealable/steal_slot/mainhand
+# 3
+execute if items entity @s armor.head * run return run function gm4_reeling_rods:fished/stealable/steal_slot/head
+# 5
+execute if items entity @s armor.legs * run return run function gm4_reeling_rods:fished/stealable/steal_slot/legs
+# 2
+execute if items entity @s weapon.offhand * run return run function gm4_reeling_rods:fished/stealable/steal_slot/offhand
+# 4
+execute if items entity @s armor.chest * run return run function gm4_reeling_rods:fished/stealable/steal_slot/chest
+# 6
+execute if items entity @s armor.feet * run return run function gm4_reeling_rods:fished/stealable/steal_slot/feet
+
+return fail

gm4_reeling_rods/data/gm4_reeling_rods/function/fished/stealable/order/equipment_2.mcfunction

@@ -0,0 +1,19 @@
+# Checks slots to steal
+# @s = #gm4_reeling_rods:steal_equipment
+# at @s
+# run from fished/stealable/steal_equipment
+
+# 2
+execute if items entity @s weapon.offhand * run return run function gm4_reeling_rods:fished/stealable/steal_slot/offhand
+# 4
+execute if items entity @s armor.chest * run return run function gm4_reeling_rods:fished/stealable/steal_slot/chest
+# 6
+execute if items entity @s armor.feet * run return run function gm4_reeling_rods:fished/stealable/steal_slot/feet
+# 1
+execute if items entity @s weapon.mainhand * run return run function gm4_reeling_rods:fished/stealable/steal_slot/mainhand
+# 3
+execute if items entity @s armor.head * run return run function gm4_reeling_rods:fished/stealable/steal_slot/head
+# 5
+execute if items entity @s armor.legs * run return run function gm4_reeling_rods:fished/stealable/steal_slot/legs
+
+return fail

gm4_reeling_rods/data/gm4_reeling_rods/function/fished/stealable/order/equipment_3.mcfunction

@@ -0,0 +1,19 @@
+# Checks slots to steal
+# @s = #gm4_reeling_rods:steal_equipment
+# at @s
+# run from fished/stealable/steal_equipment
+
+# 3
+execute if items entity @s armor.head * run return run function gm4_reeling_rods:fished/stealable/steal_slot/head
+# 5
+execute if items entity @s armor.legs * run return run function gm4_reeling_rods:fished/stealable/steal_slot/legs
+# 2
+execute if items entity @s weapon.offhand * run return run function gm4_reeling_rods:fished/stealable/steal_slot/offhand
+# 4
+execute if items entity @s armor.chest * run return run function gm4_reeling_rods:fished/stealable/steal_slot/chest
+# 6
+execute if items entity @s armor.feet * run return run function gm4_reeling_rods:fished/stealable/steal_slot/feet
+# 1
+execute if items entity @s weapon.mainhand * run return run function gm4_reeling_rods:fished/stealable/steal_slot/mainhand
+
+return fail

gm4_reeling_rods/data/gm4_reeling_rods/function/fished/stealable/order/equipment_4.mcfunction

@@ -0,0 +1,19 @@
+# Checks slots to steal
+# @s = #gm4_reeling_rods:steal_equipment
+# at @s
+# run from fished/stealable/steal_equipment
+
+# 4
+execute if items entity @s armor.chest * run return run function gm4_reeling_rods:fished/stealable/steal_slot/chest
+# 6
+execute if items entity @s armor.feet * run return run function gm4_reeling_rods:fished/stealable/steal_slot/feet
+# 1
+execute if items entity @s weapon.mainhand * run return run function gm4_reeling_rods:fished/stealable/steal_slot/mainhand
+# 3
+execute if items entity @s armor.head * run return run function gm4_reeling_rods:fished/stealable/steal_slot/head
+# 5
+execute if items entity @s armor.legs * run return run function gm4_reeling_rods:fished/stealable/steal_slot/legs
+# 2
+execute if items entity @s weapon.offhand * run return run function gm4_reeling_rods:fished/stealable/steal_slot/offhand
+
+return fail

gm4_reeling_rods/data/gm4_reeling_rods/function/fished/stealable/order/equipment_5.mcfunction

@@ -0,0 +1,19 @@
+# Checks slots to steal
+# @s = #gm4_reeling_rods:steal_equipment
+# at @s
+# run from fished/stealable/steal_equipment
+
+# 5
+execute if items entity @s armor.legs * run return run function gm4_reeling_rods:fished/stealable/steal_slot/legs
+# 2
+execute if items entity @s weapon.offhand * run return run function gm4_reeling_rods:fished/stealable/steal_slot/offhand
+# 4
+execute if items entity @s armor.chest * run return run function gm4_reeling_rods:fished/stealable/steal_slot/chest
+# 6
+execute if items entity @s armor.feet * run return run function gm4_reeling_rods:fished/stealable/steal_slot/feet
+# 1
+execute if items entity @s weapon.mainhand * run return run function gm4_reeling_rods:fished/stealable/steal_slot/mainhand
+# 3
+execute if items entity @s armor.head * run return run function gm4_reeling_rods:fished/stealable/steal_slot/head
+
+return fail