[Demande] Script TCL de mode #Salon

[KeeViiNou]

Hello la compagnie,

Je poste ici un sujet car j'aimerais créer un tcl de "gestion" des modes des salons. Je m'explique, mon salon est mode +m pour des raisons personnelles comme la simplicité de mettre out un utilisateur par exemple. Sur cet eggdrop j'utilise donc un script de silence. Dès que le délais est passé, il enlève le mode +m et j'aimerais avoir un tcl qui le remette automatiquement.
Je suis tombé sur un script de mcdeffice que j'ai tenté de bidouiller et que voici :

tclcopier

bind pub - "+modo" ban
proc ban { nick host hand chan arg } {
	# McDeffice: ![llength $arg] -> permet de connaitre la longueur d'$arg. Ici il est vrai si la valeur ne vaut 1 (qui ai que +b)
	# McDeffice: ![isvoice $nick $chan] -> ici l'utilisateur qui tape +b ne doit pas être en +v (voice)sur le channel où il le tape
	if { ![llength $arg] && ![isvoice $chan] } {
		# McDeffice: Si ces deux conditions sont réunis, alors tu ban du chan le gars qui a taper la commande
		putquick "MODE $chan +modo "
	# McDeffice: Si ses deux conditions ne sont pas reunis :
	} else {
		# McDeffice: alors verifie si +b n'ai pas un nick present sur le chan ?!
		if { ![onchan [lindex $arg 0] $chan] } {
			# McDeffice: si Mr +b n'ai pas sur le chan tu le banni :
			putquick "MODE $chan +modo \ [lindex $arg 0]"
			# McDeffice: ici tu arrete le script pour que le reste ne s'execute pas si Mr +b n'ai pas sur le chan 
			return 0
		}
		# McDeffice: et ici si Mr +b est sur le chan, ben tu le banni quand meme :
		putquick "MODE $chan +modo [lindex $arg 0]"
	}
}
putlog "Le +m activé"

Cependant, j'aimerais y rajouter un timer de 3 minutes équivalant au temps du silence impose. C'est là que je rame un peu...

Pouvez-vous me venir en aide svp ?