mIRC Nick Color Change

alias nickcolor {
  if ($1 == help) { echo 3 * Usage: "/cline <channel> <op> <voice> <normal>" | return }
  var %cvqt = 1
  var %chan = #
  while (%cvqt <= $nick(%chan,0)) {
    if ($nick(%chan,%cvqt) isop %chan) { cline $iif($2,$2,4) %chan $nick(%chan,%cvqt) | inc %cvqt | continue }
    if ($nick(%chan,%cvqt) isvoice %chan) { cline $iif($3,$3,3) %chan $nick(%chan,%cvqt) | inc %cvqt | continue }
    cline $iif($4,$4,7) %chan $nick(%chan,%cvqt)
    inc %cvqt
  }
}
on *:JOIN:#:{ nickcolor # }
on *:OP:#:{ nickcolor # }
on *:DEOP:#:{ nickcolor # }
on *:VOICE:#:{ nickcolor # }
on *:DEVOICE:#:{ nickcolor # }