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 :
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 :
tcl
#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
}
}
}