;=========================           
;    Anti-Flood V1.0
;        By Ss
;=========================

on @!*:text:*:#:{
;No comment

 if ($eval($+(%,Flood.,$chan,.,$nick),2) == $null) { set -u30 $+(%,Flood.,$chan,.,$nick) $len($1-) }
;Si no existe esa variable, luego el nick aun no hablo en el canal o hace + de 30 segundos, seteamos la variable con el número de caracteres que contiene lo que dice

 else { 
;Si no:

  if ($eval($+(%,Flood.,$chan,.,$nick),2) >= 400) { .kick $chan $nick 400 Bytes en menos de 30 seg. ¿MUCHO NO? }
;Si lo que lleva dicho, son más de 400 caracteres: kick

  else { inc $+(%,Flood.,$chan,.,$nick) $len($1-) }
;Si son menos, incrementamos la var con los caracteres que dice ahora

 }
}

;Ahora 'curraros' la var que calcule el tiempo que tarda en decir los 400 caracteres ¿facil no?


		_-_-_-_-_-_-_-_-_-_-_-_-_--_-_-_-_-_-_-_-_-
		_-            \\  ||  //                 _-
		_-             [- Ss -]                  _-
		_-            //  ||  \\                 _-
		_-     http://Sscript.infdj.com          _-
		-_-_-_-_-_-_-_-_-_-_-_-_-_--_-_-_-_-_-_-_-_