SpecialFishingRod:
    type: item
    material: i@fishing_rod
    display name: <&e>Fisherman's Fishing Rod
    lore:
    - The Fisherman was able
    - to catch rare fishes only
    - with this rod. Something
    - must be special about it.
    enchantments:
    - lure:3
    - unbreaking:3
    mechanisms:
        flags: HIDE_ALL

SpecialFishingRodLoot:
    type: procedure
    debug: true
    script:
    - define roll <util.random.int[1].to[1000]>
    - if <[roll]> >= 1 && <[roll]> < 900:
        - define quality Rare1
    - else:
        - if <[roll]> >= 900 && <[roll]> < 995:
        - define quality Rare2
        - else:
            - if <[roll]> >= 995:
            - define quality Rare3

        - if <[quality]> == Rare1:
            - random:
                - determine ShipTicket

            - else:
                - if <[quality]> == Rare2:
                    - random:
                        - determine RareFish1
                        - determine RareFish2
                        - determine RareFish3
                        - determine RareFish4

            - else:
                - if <[quality]> == Rare3:
                    - random:
                        - determine SuperRFish

RareCatch:
    type: world
    debug: true
    events:
        on player fishes:
            - if <proc[SpecialFishingRodLoot].context[<item[SpecialFishingRod]>]>:
                - inject locally <player.item_in_hand.script.name[SpecialFishingRodLoot]
                - stop