on ^*:NICK:{ 
  haltdef 
  var %x 1
  while $comchan($newnick,%x)  { 
    var %chan $v1,%Access = $left($remove($nick(%chan,$newnick).pnick,$newnick),1), $&
      %oldnick = $iif(%access,$+($chr(3),$nick(%chan,$newnick).color,$v1,$chr(3))) $+ $nick, $&
      %newnick = $iif(%Access,$+($chr(3),$nick(%chan,$newnick).color,$v1,$chr(3))) $+ $newnick
    echo %chan $timestamp %in $+ %oldnick has changed their nick to %newnick $+ %out 
    dec %x 
  }
}