Or a quick and dirty way if your only problem is words in front and quotes:

Code:
set %heraldplayer $replace($($+($,$calc($findtok($replace($1-,",),!player,1,32)+1)),2),",)