oh yeah and Raid, feel free to use my example code in whatever way you see fit, I\'m too lazy to post it as my own snippet.

on :input:: {
if ($regex($1,^(\+|-)([a-zA-Z])$)) {
var %sign = $regml(1), %mode = $regml(2)
if (%mode isincs cImi) { mode $active $1 }
elseif (%mode isincs vhoaq) {
if (%sign == +) { cs $replacex(%mode,v,voice,h,halfop,o,op,a,protect,q,owner) $active $me }
else { mode $active $1 $me }
}
elseif (%mode isincs QpstACGMKNORSTVu) { mode $active $1 $me }
halt
}
}

quick replacement for the snippet, includes checking to make sure $1 is in the exact format of + or - followed by 1 singular letter...

I will get around to it, chronic laziness and all

Lots of new stuff for this version including several fixes

This version is surprisingly buggy I recommend upgrading from: http://infobloot.icenetwork.cu.uk