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