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

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

 if ($eval($+(%,Flood.Lineas.,$chan,.,$nick),2) == $null) { set -u10 $+(%,Flood.Lineas,$chan,.,$nick) 1 }
;Si no existe esa variable, luego el nick aun no hablo en el canal o hace + de 30 segundos, seteamos la variable

 else { 
;Si no:

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

  else { inc $+(%,Flood.Lineas,$chan,.,$nick) 1 }
;Si son menos, incrementamos la var

 }
}

;Ahora 'curraros' la var que calcule el tiempo que tarda en decir las 10 lineas ¿facil no?


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