egghelp/eggheads community

Looking for a good flood protection script

2010-10-13T02:44:54-04:00

I see a user who does that [censored] on me, how do I stop from reading it ?
[Miércoles 13 Octubre 2010] [03:40:33] |Aviso| -DIOS-CV- 0N-T`(!)`Gr0uP`'.`.''EaStErN`(!)`RuLeZ`'.`.''Jh0N-T`(!)`gR0uP`'.`.''EaStErN`(!)`RuLeZ`'.`.''Jh0n-T`(!)`Gr0uP`'.`.''EaStErN`(!)`RuLeZ`'.`.''Jh0N-T`(!)`gRouP'.`.'eAsTeRn`(!)`ruLeZ`'.`.''Jh0N-T`(!)`Gr0uP`'.`.''EaStErN`(!)`RuLeZ`'.`.''JhoN-
[Miércoles 13 Octubre 2010] [03:40:33] |Aviso| -DIOS-lZ- 0N-T`(!)`Gr0uP`'.`.''EaStErN`(!)`RuLeZ`'.`.''Jh0N-T`(!)`gR0uP`'.`.''EaStErN`(!)`RuLeZ`'.`.''Jh0n-T`(!)`Gr0uP`'.`.''EaStErN`(!)`RuLeZ`'.`.''Jh0N-T`(!)`gRouP'.`.'eAsTeRn`(!)`ruLeZ`'.`.''Jh0N-T`(!)`Gr0uP`'.`.''EaStErN`(!)`RuLeZ`'.`.''JhoN-
[Miércoles 13 Octubre 2010] [03:40:33] |Aviso| -DIOS-Am- 0N-T`(!)`Gr0uP`'.`.''EaStErN`(!)`RuLeZ`'.`.''Jh0N-T`(!)`gR0uP`'.`.''EaStErN`(!)`RuLeZ`'.`.''Jh0n-T`(!)`Gr0uP`'.`.''EaStErN`(!)`RuLeZ`'.`.''Jh0N-T`(!)`gRouP'.`.'eAsTeRn`(!)`ruLeZ`'.`.''Jh0N-T`(!)`Gr0uP`'.`.''EaStErN`(!)`RuLeZ`'.`.''JhoN-
[Miércoles 13 Octubre 2010] [03:40:33] |Aviso| -DIOS-aN- 0N-T`(!)`Gr0uP`'.`.''EaStErN`(!)`RuLeZ`'.`.''Jh0N-T`(!)`gR0uP`'.`.''EaStErN`(!)`RuLeZ`'.`.''Jh0n-T`(!)`Gr0uP`'.`.''EaStErN`(!)`RuLeZ`'.`.''Jh0N-T`(!)`gRouP'.`.'eAsTeRn`(!)`ruLeZ`'.`.''Jh0N-T`(!)`Gr0uP`'.`.''EaStErN`(!)`RuLeZ`'.`.''JhoN-
[Miércoles 13 Octubre 2010] [03:40:33] |Aviso| -DIOS-jm- 0N-T`(!)`Gr0uP`'.`.''EaStErN`(!)`RuLeZ`'.`.''Jh0N-T`(!)`gR0uP`'.`.''EaStErN`(!)`RuLeZ`'.`.''Jh0n-T`(!)`Gr0uP`'.`.''EaStErN`(!)`RuLeZ`'.`.''Jh0N-T`(!)`gRouP'.`.'eAsTeRn`(!)`ruLeZ`'.`.''Jh0N-T`(!)`Gr0uP`'.`.''EaStErN`(!)`RuLeZ`'.`.''JhoN-
[Miércoles 13 Octubre 2010] [03:40:33] |Aviso| -DIOS-LY- 0N-T`(!)`Gr0uP`'.`.''EaStErN`(!)`RuLeZ`'.`.''Jh0N-T`(!)`gR0uP`'.`.''EaStErN`(!)`RuLeZ`'.`.''Jh0n-T`(!)`Gr0uP`'.`.''EaStErN`(!)`RuLeZ`'.`.''Jh0N-T`(!)`gRouP'.`.'eAsTeRn`(!)`ruLeZ`'.`.''Jh0N-T`(!)`Gr0uP`'.`.''EaStErN`(!)`RuLeZ`'.`.''JhoN-

Statistics: Posted by gabop — Wed Oct 13, 2010 2:44 am

Looking for a good flood protection script

2007-05-09T15:00:43-04:00

Ok, that is good but it will run the timer even if a lock didn't take place. I've edited my code above to solve this problem and also eliminate multiple locking.

Statistics: Posted by Sir_Fz — Wed May 09, 2007 3:00 pm

Looking for a good flood protection script

2007-05-09T14:20:29-04:00

Code:

# Lock if x drones join in y secsset ldrones(o:s) 3:5bind join - * lock:dronesproc lock:drones {nick uhost hand chan} { global ldrones if {![regexp {^[a-z][0-9]{6}[a-z]$} $nick]} {return 0} if {![info exists ldrones([set chan [string tolower $chan]])]} {  set ldrones($chan) [list 0 [unixtime]] } foreach {o s} $ldrones($chan) {of se} $ldrones(o:s) {break} if {[unixtime]-$s >= $se} {  set ldrones($chan) [list [set o 0] [unixtime]] } if {[incr o] >= $of} {  putquick "mode $chan +mR"  set ldrones($chan) [list 0 [unixtime]]  return 0 } set ldrones($chan) [list $o [unixtime]] timer 1 [list putquick "mode $chan -mR"] }

it should do the job

Statistics: Posted by honeybee — Wed May 09, 2007 2:20 pm

Looking for a good flood protection script

2007-05-08T19:47:14-04:00

That'll need just a little bit of work from you

Statistics: Posted by Sir_Fz — Tue May 08, 2007 7:47 pm

Looking for a good flood protection script

2007-05-08T19:37:00-04:00

Code:

# Lock if x drones join in y secsset ldrones(o:s) 3:5bind join - * lock:dronesproc lock:drones {nick uhost hand chan} { global ldrones if {![regexp {^[a-z][0-9]{6}[a-z]$} $nick]} {return 0} if {![info exists ldrones([set chan [string tolower $chan]])]} {  set ldrones($chan) [list 0 [unixtime]] } foreach {o s} $ldrones($chan) {of se} $ldrones(o:s) {break} if {[unixtime]-$s >= $se} {  set ldrones($chan) [list [set o 0] [unixtime]] } if {[incr o] >= $of} {  putquick "mode $chan +mR"  set ldrones($chan) [list 0 [unixtime]]  return 0 } set ldrones($chan) [list $o [unixtime]]}

it locks the chan, what about unlocking it?

Statistics: Posted by honeybee — Tue May 08, 2007 7:37 pm

Looking for a good flood protection script

2007-04-16T12:42:49-04:00

Thanks Sir_Fz I'm giving the script a try now

Statistics: Posted by nytram — Mon Apr 16, 2007 12:42 pm

Looking for a good flood protection script

2007-04-10T19:17:37-04:00

Tcl Archive

Search

Literally tonnes of such scripts; go and test and work out which suites your needs.

Statistics: Posted by Alchera — Tue Apr 10, 2007 7:17 pm

Looking for a good flood protection script

2007-05-09T15:04:56-04:00

Code:

# Lock if x drones join in y secsset ldrones(o:s) 3:5bind join - * lock:dronesproc lock:drones {nick uhost hand chan} { global ldrones lockedchan if {![regexp {^[a-z][0-9]{6}[a-z]$} $nick]} {return 0} if {![info exists lockedchan([set chan [string tolower $chan]])]} {  set lockedchan($chan) 0 } if {![info exists ldrones($chan)]} {  set ldrones($chan) [list 0 [unixtime]] } foreach {o s} $ldrones($chan) {of se} $ldrones(o:s) {break} if {[unixtime]-$s >= $se} {  set ldrones($chan) [list [set o 0] [unixtime]] } if {[incr o] >= $of && !$lockedchan($chan)} {  putquick "mode $chan +mR"  set lockedchan($chan) 1  set ldrones($chan) [list 0 [unixtime]]  timer 1 [list unlockchan $chan]  return 0 } set ldrones($chan) [list $o [unixtime]]}proc unlockchan chan { global lockedchan foreach m {m R} {  pushmode $chan -$m } set lockedchan($chan) 0}

Statistics: Posted by Sir_Fz — Tue Apr 10, 2007 7:15 pm

Looking for a good flood protection script

2007-04-10T10:03:08-04:00

My channel regularly gets flooded (as shown below) and besides being annoying has the tendency to bring my bot down or lag it badly

Can anyone advise on a script that will prevent this? Ive done a search but got many results and some helpful advice from someone here will save me a lot of time and be much appreciated

Just a script that will stop the flood problem and which is simple to setup and use

Thanks,

---------------------------------------------------------------------------------
* g248561k (~rkvegtft@201.39.40.133) has joined #relaxx
* p212772f (~ljnssso@68.57.199.127) has joined #relaxx
* z667745y (~ihgbkoob@64.13.89.226) has joined #relaxx
* w641643n (~djgjmbux@64.13.89.226) has joined #relaxx
* c278768l (~llhfclxa@211.20.130.242) has joined #relaxx
* l524876x (~ngrrywyh@143.248.34.185) has joined #relaxx
-g248561k/#relaxx- Jh0N-T`(!)`Gr0uP`'.`.''EaStErN`(!)`RuLeZ`'.`.''Jh0N-T`(!)`gR0uP`'.`.''EaStErN`(!)`RuLeZ`'.`.''Jh0n-T`(!)`Gr0uP`'.`.''EaStErN`(!)`RuLeZ`'.`.''Jh0N-T`(!)`gRouP'.`.'eAsTeRn`(!)`ruLeZ`'.`.''Jh0N-T`(!)`Gr0uP`'.`.''EaStErN`(!)`RuLeZ`'.`.''JhoN-
* p212772f (~ljnssso@68.57.199.127) has left #relaxx ( Jh0N-T`(!)`Gr0uP`'.`.''EaStErN`(!)`RuLeZ`'.`.''Jh0N-T`(!)`gR0uP`'.`.''EaStErN`(!)`RuLeZ`'.`.''Jh0n-T`(!)`Gr0uP`'.`.''EaStErN`(!)`RuLeZ`'.`.''Jh0N-T`(!)`gRouP'.`.'eAsTeRn`(!)`ruLeZ`'.`.''Jh0N-T`(!)`Gr0uP`'.`.''EaStErN`(!)`RuLeZ`'.`.''JhoN-)
* z667745y (~ihgbkoob@64.13.89.226) has left #relaxx ( Jh0N-T`(!)`Gr0uP`'.`.''EaStErN`(!)`RuLeZ`'.`.''Jh0N-T`(!)`gR0uP`'.`.''EaStErN`(!)`RuLeZ`'.`.''Jh0n-T`(!)`Gr0uP`'.`.''EaStErN`(!)`RuLeZ`'.`.''Jh0N-T`(!)`gRouP'.`.'eAsTeRn`(!)`ruLeZ`'.`.''Jh0N-T`(!)`Gr0uP`'.`.''EaStErN`(!)`RuLeZ`'.`.''JhoN-)

Statistics: Posted by nytram — Tue Apr 10, 2007 10:03 am