herkes {
  var %a = $nick(#,0)
  while %a {
    if  !$istok(nick nick nick nick nick nick nick $me,$nick(#,%a),32) {
      %b = $addtok(%b,$nick(#,%a),32)
    }
    dec %a
  }
  say %b $1- | unset %b
}