/moding { var %mode.nix = $nick(#,0,r) while (%mode.nix > 0) { if ($address($nick(#,%mode.nix,r),9) isavoice #) { echa $address($nick(#,%mode.nix,r),9) ;mode # +v $nick(#,%mode.nix,r) } dec %mode.nix } }