function parse4(balance: text) :: text:
    if last 3 characters of {_balance} are "000":
        set {_last} to ""
        return "%{_last}%"
        stop
    else if last 2 characters of {_balance} are "00":
        return ".%first character of {_balance}%"
        stop
    else if last character of {_balance} is "0":
        return ".%first 2 characters of {_balance}%"
        stop
    else if last character of {_balance} is not "0":
        return ".%{_balance}%"
        stop

function NumbersToWords(num: string, p: player) :: text:
    length of {_num} <= 6:
        return "%{balanceplayer1::%{_p}%}%"

    else if length of {_num} = 7:
        set {_num_} to parse4("%subtext of {_num} from 2 and 4%")
        return "%first 1 characters of {_num}%%{_num_}%M"


    else if length of {_num} = 8:
        set {_num_} to parse4("%subtext of {_num} from 3 and 5%")
        return "%first 2 characters of {_num}%%{_num_}%M"

    else if length of {_num} = 9:
        set {_num_} to parse4("%subtext of {_num} from 4 and 6%")
        return "%first 3 characters of {_num}%%{_num_}%M"

    else if length of {_num} = 10:
        set {_num_} to parse4("%subtext of {_num} from 5 and 7%")
        return "%first 1 characters of {_num}%%{_num_}%B"

    else if length of {_num} = 11:
        set {_num_} to parse4("%subtext of {_num} from 6 and 8%")
        return "%first 2 characters of {_num}%%{_num_}%B"

    else if length of {_num} = 12:
        set {_num_} to parse4("%subtext of {_num} from 7 and 9%")
        return "%first 3 characters of {_num}%%{_num_}%B"

    else if length of {_num} = 13:
        set {_num_} to parse4("%subtext of {_num} from 8 and 10%")
        return "%first 1 characters of {_num}%%{_num_}%T"

    else if length of {_num} = 14:
        set {_num_} to parse4("%subtext of {_num} from 9 and 11%")
        return "%first 2 characters of {_num}%%{_num_}%T"

    else if length of {_num} = 15:
        set {_num_} to parse4("%subtext of {_num} from 10 and 12%")
        return "%first 3 characters of {_num}%%{_num_}%T"

    else if length of {_num} = 16:
        set {_num_} to parse4("%subtext of {_num} from 11 and 13%")
        return "%first 1 characters of {_num}%%{_num_}%Q"






function deleteBoard(p: player):
    delete stylish scoreboard "T-%{_p}%"
on join:
    player is online
    deleteBoard(player)
    loop 999999999 times:
        player is offline:
            stop
        if stylish scoreboard "T-%player%" does not exist:
            create new stylish scoreboard named "T-%player%"
            loop 15 times:
                create a new id based score "%player%Slot%loop-value-2%" with text "§%loop-number-2%" slot loop-value-2 for stylish scoreboard "T-%player%"
        if player's world is "KitPvP":
            set title of stylish scoreboard "T-%player%" to "&f&l&nLoL&b&l&nMC"
            set the text of id "%player%Slot15" to "&a&b&a"
            set the text of id "%player%Slot14" to "&a&b&a"
            set the text of id "%player%Slot13" to "&a&b&a"
            set the text of id "%player%Slot12" to "&a&lBank Account"
            set the text of id "%player%Slot11" to "&a&l> &f$%{money::%player%}%"
            set the text of id "%player%Slot10" to "&r&a"
            set the text of id "%player%Slot9" to "&c&lPlayer Stats"
            if "%{kills::%uuid of player%}/{deaths::%uuid of player%}%" is "Infinity":
                set the text of id "%player%Slot8" to "&c&l> &cKDR &f%{kills::%uuid of player%}% / %{deaths::%uuid of player%}% / %{kills::%uuid of player%}%"
            else:
                set the text of id "%player%Slot8" to "&c&l> &cKDR &f%{kills::%uuid of player%}% / %{deaths::%uuid of player%}% / %{kills::%uuid of player%}/{deaths::%uuid of player%}%"
            set the text of id "%player%Slot7" to "&c&l> &cMultiplier &f%{boosterm::%player%} + {ksbooster::%player%} + {rankbooster::%uuid of player%}%x &7(/mp)"
            set the text of id "%player%Slot6" to "&b&c&b"
            set the text of id "%player%Slot5" to "&e&lVote Party"
            set the text of id "%player%Slot4" to "&e&l> &f 0 / 10"
            set the text of id "%player%Slot3" to "&b&d&a"
            set the text of id "%player%Slot2" to "&b&d&a"
            set the text of id "%player%Slot1" to "&b&d&a"
            set stylish scoreboard of player to "T-%player%"
            delete {_title}
        wait 10 ticks