alias -l banjirian {
hinc -u3m row [ $+ [ # ] ] $nick 1
hinc -u3m rep [ $+ [ # ] $+ [ $nick ] ] $hash($remove($strip($1-),$chr(160),$chr(32)),32) 1
if ($regex($1-,/[[:cntrl:]]/g) > 49) { $kick(CODES) }
if ($regex($1-,/[[:upper:]]/g) > 49) { $kick(CAPS) }
if ($regex($1-,/[[:digit:]]/g) > 49) { $kick(DIGIT) }
if ($regex($1-,/[ $chr(44) ]/g) > 49) { $kick(APHOSTROPHE) }
if ($regex($1-,/[[:punct:]]/g) > 49) { $kick(SYMBOL) }
if ($regex($1-,/[ $chr(160) ]/g) > 49) { $kick(BLANK) }
if ($regex($1-,/[[:alnum:]]/g) > 199) { $kick(LONGTEXT) }
if ($regex($1-,/[ $chr(174) ]/g) > 49) { $kick(ASCII) }
if ($pos($level($1-),adv,0) = 1) { $kick(ADVERTISE) }
if ($pos($level($1-),bad,0) = 1) { $kick(SWEAR) }
if ($hget(row [ $+ [ # ] ],$nick) = 5) { $kick(LINE) } 
if ($hget(rep [ $+ [ # ] $+ [ $nick ] ],$hash($remove($strip($1-),$chr(160),$chr(32)),32)) = 3) { $kick(REPEAT) }
}