Mine

lias /qkb { 
  if ($1 !ison $active) { echo -a $1 is not on $active } 
  elseif (*Q* iswmcs $gettok($chan($active).mode,1,32)) { 
    mode $active -Q 
    ban -k $active $1 2 $2- 
    mode $active +Q 
  } 
  else { echo -a Q is not currently on $active } 
}