I'm not familiar with the actual raw data given back, (or the usefullness of what you want) but if you have the nick you can just use
$left(
thenickyouwant,3)
Since you use $gettok to get the first part of a complete nick!user@host you can keep using that
$left($gettok($2,1,33),3)
This will give you the 3 first characters of his nick, or all of it if it's shorter than 3 characters
btw: $gettok($4 nick!nick@address,1,33)
this doen't make a lot of sense to me, you probably made an error here?