may just be for me but it cuts the percent at the bottom in half
a few things you can do to shorten the code is

        var %target $1
        var %count 1
        var %total $nick($1, 0)

can be

var %target = $1,%count = 1,%total = $nick($1,0)

and maybe im just picky but you can reduce the amount of cpu used by not using { and } if they aren't necissary e.g.

    if ($left($nick($1, $2).pnick, 1) isin $(~&@%+)) {
        return $replace($left($nick($1, $2).pnick, 1), ~, 6, &, 5, @, 4, $(%), 3, +, 2)
    }

can be

    if ($left($nick($1, $2).pnick, 1) isin $(~&@%+)) return $replace($left($nick($1, $2).pnick, 1), ~, 6, &, 5, @, 4, $(%), 3, +, 2)

but nice snippet nonetheless