;========================= ; Anti-FloodCTCP V1.0 ; By Ss ;========================= on *:ctcp:*:{ if ($1 != DCC) { ;No comment if ($eval($+(%,Numero.CTCPs,$nick),2) == $null) { set -u30 $+(%,Numero.CTCPs,$nick) 1 } ;Si nunca nos hizo un CTCP o hace más de 30 segundos, seteamos la var else { inc $+(%,Numero.CTCPs,$nick) 1 } ;Si existe, incrementamos la var if ($eval($+(%,Numero.CTCPs,$nick),2) >= 4) { .notice $nick Game Over, insert coin | .ignore -u60 $nick } En caso de que la var sea >= a 4: Le ignoramos } } _-_-_-_-_-_-_-_-_-_-_-_-_--_-_-_-_-_-_-_-_- _- \\ || // _- _- [- Ss -] _- _- // || \\ _- _- http://Sscript.infdj.com _- -_-_-_-_-_-_-_-_-_-_-_-_-_--_-_-_-_-_-_-_-_