scrit.tcl auto bonjour

[fedora]

bonjour,
je pense arriver un moment faut savoir bien chercher sur le forum, et bien regarder sont code ou il manque des p'tites chose qui s'affiche en party line.Ton TCL est casi le même (je parle du système ) que d'autre code poser sur le forum

tclcopier

set SalonEnvoi "#Amities"
set ConfNick  "pseudo"
 
bind time - "10 19 * * *" MsgEnvoi
 
proc MsgEnvoi {min hour day month year} {
global botnick SalonEnvoi  confirmation
foreach chan [string tolower $::SalonEnvoi] {
   if {$chan != ""} {
putserv "PRIVMSG $::SalonEnvoi  :Le Salon #Amitiés vous offre tout les jours à 19h10 un bon apéritif :p"
putserv "PRIVMSG $::ConfNick :Message correctement dit sur $::SalonEnvoi"
     }
   }
}

cordialement DnS