alias blah { var %i = $chan(0) while (%i > 0) { if ($me isop $chan(%i)) { mode $chan(%i) $1- } dec %i } }