alias renk {
  var %i = 1,%is = $($+(%,renke.,$1),2)
  while $nick($1,%i) {
    cline %is $1 $nick($1,%i)
    inc %is
    if (%is == 16) { %is = 0 }
    inc %i
  }
  inc $($+(%,renke.,$1),1)
  if ($($+(%,renke.,$1),2) == 16) { set $($+(%,renke.,$1),1) 0 }
}