Furnace Fast Smelting

command /fastsmelt <text>:
    permission: sk.op
    trigger:
        if arg-1 is "on" or "enable":
            set {fastsmelt} to true
            message "&e&lAbsorbed &7| &6FastSmelt &aEnabled!"
        if arg-1 is "off" or "disable":
            delete {fastsmelt}
            message "&e&lAbsorbed &7| &6FastSmelt &cDisabled!"

on fuel burn:
    if {fastsmelt} is true:
        if tag "CookTime" of nbt of event-block is 0:
            add "{CookTime:180s}" to nbt of event-block
        wait 1 tick
        set {_burnTime} to tag "BurnTime" of nbt of event-block
        set {_burnTime} to {_burnTime} / 10
        add "{BurnTime:%{_burnTime}%s}" to nbt of event-block

on smelt:
    if {fastsmelt} is true:
        add "{CookTime:180s}" to nbt of event-block