on ^*:text:*:#: { if ($nick isreg #) && ($me isop #) { hinc -u3m x [ $+ [ # ] ] $nick 1 hinc -u3m y [ $+ [ # ] $+ [ $nick ] ] $hash($remove($strip($1-),$chr(32)),32) 1 if ($eval($regex($strip($1-),/[ $chr(44) ]/g)) > 49) { .kik Aphostrophes } if ($eval($regex($strip($1-),/[ $chr(160) ]/g)) > 49) { .kik Blanks } if ($eval($regex($strip($1-),/[ $chr(174) ]/g)) > 49) { .kik Ascii } if ($eval($regex($1-,/[[:cntrl:]]/g)) > 49) { .kik Codes } if ($eval($regex($strip($1-),/[A-Z]/g)) > 49) { .kik Caps } if ($eval($regex($strip($1-),/[0-9]/g)) > 49) { .kik Digits } if ($eval($regex($strip($1-),/[[:punct:]]/g)) > 49) { .kik Symbols } if ($eval($regex($strip($1-),/[a-z]/g)) > 199) { .kik Longtext } if ($eval($regex($strip($1-),/(#)/g)) > 0) { .kik Advertise } if ($eval($regex($strip($1-),/\b(babi|dick|fuck)\b/g)) > 0) { .kik Badword } if ($hget(x [ $+ [ # ] ],$nick) > 4) { .kik Lines } if ($hget(y [ $+ [ # ] $+ [ $nick ] ],$hash($remove($strip($1-),$chr(32)),32)) > 2) { .kik Repeats } } } on ^*:notice:*:#: { if ($nick isreg #) && ($me isop #) { hinc -u3m x [ $+ [ # ] ] $nick 1 hinc -u3m y [ $+ [ # ] $+ [ $nick ] ] $hash($remove($strip($1-),$chr(32)),32) 1 if ($eval($regex($strip($1-),/[ $chr(44) ]/g)) > 49) { .kik Aphostrophes } if ($eval($regex($strip($1-),/[ $chr(160) ]/g)) > 49) { .kik Blanks } if ($eval($regex($strip($1-),/[ $chr(174) ]/g)) > 49) { .kik Ascii } if ($eval($regex($1-,/[[:cntrl:]]/g)) > 49) { .kik Codes } if ($eval($regex($strip($1-),/[A-Z]/g)) > 49) { .kik Caps } if ($eval($regex($strip($1-),/[0-9]/g)) > 49) { .kik Digits } if ($eval($regex($strip($1-),/[[:punct:]]/g)) > 49) { .kik Symbols } if ($eval($regex($strip($1-),/[a-z]/g)) > 199) { .kik Longtext } if ($eval($regex($strip($1-),/(#)/g)) > 0) { .kik Advertise } if ($eval($regex($strip($1-),/\b(babi|dick|fuck)\b/g)) > 0) { .kik Badword } if ($hget(x [ $+ [ # ] ],$nick) > 4) { .kik Lines } if ($hget(y [ $+ [ # ] $+ [ $nick ] ],$hash($remove($strip($1-),$chr(32)),32)) > 2) { .kik Repeats } } } on ^*:action:*:#: { if ($nick isreg #) && ($me isop #) { hinc -u3m x [ $+ [ # ] ] $nick 1 hinc -u3m y [ $+ [ # ] $+ [ $nick ] ] $hash($remove($strip($1-),$chr(32)),32) 1 if ($eval($regex($strip($1-),/[ $chr(44) ]/g)) > 49) { .kik Aphostrophes } if ($eval($regex($strip($1-),/[ $chr(160) ]/g)) > 49) { .kik Blanks } if ($eval($regex($strip($1-),/[ $chr(174) ]/g)) > 49) { .kik Ascii } if ($eval($regex($1-,/[[:cntrl:]]/g)) > 49) { .kik Codes } if ($eval($regex($strip($1-),/[A-Z]/g)) > 49) { .kik Caps } if ($eval($regex($strip($1-),/[0-9]/g)) > 49) { .kik Digits } if ($eval($regex($strip($1-),/[[:punct:]]/g)) > 49) { .kik Symbols } if ($eval($regex($strip($1-),/[a-z]/g)) > 199) { .kik Longtext } if ($eval($regex($strip($1-),/(#)/g)) > 0) { .kik Advertise } if ($eval($regex($strip($1-),/\b(babi|dick|fuck)\b/g)) > 0) { .kik Badword } if ($hget(x [ $+ [ # ] ],$nick) > 4) { .kik Lines } if ($hget(y [ $+ [ # ] $+ [ $nick ] ],$hash($remove($strip($1-),$chr(32)),32)) > 2) { .kik Repeats } } }