Bruit autour de Dés Coquins

[CrazyCat]

Non, il est même complètement faux... tu as essayé de modifier la seule chose qui n'est pas à toucher.
Et sans vouloir te vexer, je dirais même que toute ta procédure est mauvaise... tu devrais essayer de te représenter avec des phrases simples ce qu'elle fait.

Tout ce qu'il faut faire pour pouvoir "commander" le script de manière publique, c'est ajouter:

tclcopier

# Ajout pour la commande en canal
bind pub m|o "!dc" dc:setchan
proc dc:setchan {nick uhost handle chan args} {
   switch [string tolower [lindex $args 0]] {
      "on" {
         channel set $chan +sexdice
         channel set $chan dicelang "fr"
      }
      "off" {
         channel set $chan -sexdice
      }
      default {
         putserv "PRIVMSG $chan :Il faut mettre l'option ON ou OFF"
      }
   }
   return 0;
}

Ca ajoute une commande publique (reservée aux masters globaux ou aux @ du canal) qui permet d'activer (ou désactiver) le tcl en tapant:

Code :

!dc <on|off>

en canal.