Stuff

menu nicklist { 
  - 
  Control-All 
  .Ignore: domodes +i 
  .Unignore: domodes -i 
  .Op: domodes +o 
  .Deop: domodes -o 
  .Voice: domodes +v 
  .Devoice: domodes -v 
  .Kick: domodes k 
  .Kick (why): domodes kw 
  .Ban: domodes b 
  .Ban, Kick: domodes bk 
  .Ban, Kick (why): domodes bkw 
} 

alias domodes { 
  if ($me !isop $active) return 
  var %csnicks,%snicks = $replace($snicks,$chr(44),$chr(32)) 
  if ($1 isin +o-o+v-v) { 
    while (%snicks) { 
      %csnicks = $gettok(%snicks,1-6,32) 
      %snicks = $gettok(%snicks,7-,32) 
      mode $chan $left($1,1) $+ $str($right($1,1),$numtok(%csnicks,32)) %csnicks 
    }  
  } 
  elseif (?i iswm $1) { 
    while (%snicks) { 
      ignore $iif($left($1,1) == $chr(43),$null,-r) $gettok(%snicks,1,32) 1 
      %snicks = $deltok(%snicks,1,32) 
    } 
  } 
  else { 
    if (w isin $1) { var %k.reason = $$?="Reason:" | if (!%k.reason) return } 
    else var %k.reason = Bye. 
    while (%snicks) { 
      if (b isin $1) ban $gettok(%snicks,1,32) 2 
      if (k isin $1) kick $chan $gettok(%snicks,1,32) %k.reason 
      %snicks = $deltok(%snicks,1,32) 
    } 
  } 
}