Mine

whoiser {
  set %ppl $nick($chan,0)
  var %i = 1
  while (%i <= %ppl) {
    set %nick $address($nick($chan,%i),2)
    inc %i
    set %ppl2 $nick(#rspc,0)
    var %f = 1
    while (%f <= %ppl2) {
      set %nick2 $address($nick(#rspc,%f),2)
      if (%nick == %nick2) { echo $nick($chan,%i) is $nick(#rspc,%f) }
      inc %f
    }
    inc %i
  }
}