stats_command:
    type: command
    name: stats
    description: Does something
    usage: /stats <&lt>arg<&gt>
    permission: dscript.mycmd
    script:
    - choose <context.args.get[1].if_null[null]>:
        - case pocket:
            - narrate "You have <player.proc[proc_player_stats.subscripts.POCKET]>$ in your pocket"
        - case debt:
            - narrate "You're <player.proc[proc_player_stats.subscripts.DEBT]>$ in debt"
        - case money:
            - narrate "You have <player.proc[proc_player_stats.subscripts.MONEY]>$ to spend"

proc_player_stats:
    type: procedure
    definitions: player
    script:
    - determine true
    subscripts:
        MONEY:
        - inject proc_player_stats.subscripts.account_pocket
        - inject proc_player_stats.subscripts.account_debt
        - determine <[pocket].sub[<[debt]>]>
        DEBT:
        - inject proc_player_stats.subscripts.account_debt
        - determine <[debt]>
        POCKET:
        - inject proc_player_stats.subscripts.account_pocket
        - determine <[pocket]>
        account_pocket:
        - define pocket 15
        account_debt:
        - define debt 5