I wrote this script for myself, but I thought others might like the concept, and I'm looking for ways to improve.

To activate, say someone's nick.

The second editbox will come up with a list of options. they are as follows:

you simply type the letter(s) of the option and hit enter.

• toggles
  [list]
• o: (de)op a user based on their current status
• h: (de)halfop a user based on their current status
• v: (de)voice a user based on their current status
  [*]other
• k: kick the user (will unset +Q if set) optional: reason allowed (k reason here)
• kb: kick and ban the user (will unset +Q if set) optional: reason allowed (kb reason here)
• s: say the users name (same as if the script didn't exist and you typed their name)
• c: cancel (do nothing)
  [*]misc text: if the text you enter does not match a command, it will message the channel with : [entered text]
  [/list]
  I hope someone gets some use out of this :)

on line three, %btype is the mask type of the ban for the "kb" command. type /help $mask for more info.

on *:INPUT:#: {
  if (%pick) {
var %btype = 4
    haltdef
    if ($regex($1,/^([ohv])$/)) mode $chan $iif($nick($chan,%pick,$regml(1)),-,+) $+ $regml(1) %pick
    elseif ($1 == kb) { mode $chan +b $+ $iif(Q isincs $gettok($chan($chan).mode,1,32),-Q) $address(%pick,%btype) | kick $chan %pick $iif($2,$2-,no reason given) }
    elseif ($1 == k) { if (Q isincs $gettok($chan($chan).mode,1,32)) { mode $chan -Q } | kick $chan %pick $iif($2,$2-,no reason given) }
    elseif ($1 == s) { msg $chan %pick }
    elseif ($1 == c) { goto end }
    else { msg $chan %pick $+ : $1- }
    :end
    .timerpeb off
    editbox -q0 $chan
    unset %pick
    return
  }
  elseif ($1 ison $chan) && (!$2) {
    haltdef
    set %pick $1
    editbox -q1v $chan 
    editbox -o $chan $1 $+ : v h o k kb s c
    return
  }
}