Un script anti-flood pour mon eggdrop

[Virgile]

Merci pour la réponse.

J'avance un peu plus, j'ai quelque peu modifié mon code qui n'allait pas, mais j'ai toujours cette même erreur, mais surement plus pour la même raison.

J'édite mon premier message avec le nouveau code.

Hum, je ne peux pas éditer mon premier message avant 60 minutes. Je pose donc mon code dans celui-ci :

tclcopier

			#Variables constantes
 
set request_max 3
set timer_max 10

#Variables
 
set timer_flood 0
set anti_flood 0
set attente_max 60

#Timer
 
utimer 1 [incr timer_flood]

#Binds
 
bind pub - !aide pub:aide
bind msg - aide msg:aide

#Procedures
 
proc pub:aide { nick uhost handle channel arg } {
 
global timer_flood anti_flood attente_max timer_max request_max
 
	if {[[$timer_flood < $timer_max && $anti_flood < $request_max] || [$timer_flood >= $timer_max && $anti_flood <= $request_max]] && $attente_max == 60} {
 
		putquick "NOTICE $nick :Aide...Bla bla"
 
		incr anti_flood
 
	} elseif {$attente_max == 60} {
 
		set attente_max 0
 
		putquick "PRIVMSG $channel :La limite de : $request_max pour $timer_max secondes a été atteinte."
		putquick "PRIVMSG $channel :Merci de patienter $attente_max secondes"
 
 
	} elseif {$attente_max == 0} {
 
		utimer 60 init_var
 
		proc init_var {
 
			set timer_flood 0 
			set anti_flood 0
			set attente_max 60 
 
		}
 
	}
 
}