on @*:TEXT:?op*:#:{
var %i = 1
while ($nick($chan,%i)) {
var %nick = $v1
;loopon2-
var %2 = $numtok($2-,32)
while ($gettok($2-,%2,32)) {
if ($address(%nick,5) iswm $v1) { var %op = %op %nick }
dec %2
}
inc %i
}
;now, op them.
var %x = 0, %l = $numtok(%op,32), %do
while (%x < %l) {
inc %x
var %do = $addtok(%do,$gettok(%op,%x,32),32)
if ($numtok(%do,32) == $modespl) { mode $chan $str(o,$numtok(%do,32)) %do | var %do = $null }
}
if (%do) { mode $chan $str(o,$numtok(%do,32)) %do }
}