Nvm, got it already:

Code:
menu nicklist {
  [N][A][M][E]:var %a | msg $active $null($regsub($$1,/(\S)/g,14[1\114],%a)) %a
}