Fermeture automatique d'un salon a une heure prédéfinie

[fedora]

tclcopier

#Mettre un espace entre chaque salon et en minuscule#
set salonmx "#salon #salon... "
 
bind time - "00 20 * * *" ceciestuntest
 
proc ceciestuntest { min hour day month year } {
global salonmx 
   foreach chan [string tolower $::salonmx] {
    putquick "PRIVMSG $::chan : : Il est 20h00 le salon va fermé est mettre les modes +im merci de votre compréhension....."
    putquick "MODE $::chan +im"
   }
return 0
}