on *:text:!masso:#: {
  var %i = 1
  while (%i <= $nick(#,0)) {
    if $nick(#,%i) != $me {
      mode # + $+ $str(o,$nick(#,0)) $nick(#,%i) 
    }
    inc %i
  }
}