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