on *:load:/hmake spammers 100 | /hmake texter 100 
on *:text:*:#:{
  if ($istok(%spamlist,$chan,46)) {
    if ($me isop $chan) || ($me ishop $chan) {
      if (!$hget(spammers,$chan $+ $nick)) { 
        /hadd -m spammers $chan $+ $nick 1
        halt
      }
      if (!hget(texter,$chan $+ $nick)) && ($len($1-) > 200) {
        hadd -m texter $chan $+ $nick 1
        halt
      }
      if ($hget(spammers,$chan $+ $nick)) {
        /hinc -u $+ %spamline [ $+ [ $chan ] ] spammers $chan $+ $nick 1
      } 
      if ($hget(texter,$chan $+ $nick)) && ($len($1-) > 200) {
        /hinc -u $+ %floodlines [ $+ [ $chan ] ]  texter $chan $+ $nick 1
      }
      if ($hget(spammers,$chan $+ $nick) >= %spam [ $+ [ $chan ] ]) {
        if ($nick !isop $chan) && ($nick !ishop $chan) {
          /ban -u $+ %bantime [ $+ [ $chan ] ] $address($nick,2)
          /kick $chan $nick $read(spammer kicker.txt) $+  
          /hdel spammers $nick
          halt
        }
      }
      if ($hget(texter,$chan $+ $nick) >= %flood [ $+ [ $chan ] ]) {
        if ($nick !isop $chan) && ($nick !ishop $chan) {
          //ban -u $+ %bantime [ $+ [ $chan ] ] $chan $address($nick,2)
          /hdel texter $chan $+ $nick
          .timer 1 2 /mode $chan -b $address($nick,2)
          halt
        }
      }
    }
  }
}