[Résolu] Aide sur une commande

[aliasangelius]

Bonjour :)

En faisant ainsi :

TCLcopier

set vhostjoinpart "*@faucheur.enjoy-tchat.fr"
 
 
#########################
## Liste des commandes ##
#########################
 
#Ajout/suppression d'un salon pour le robot
bind pub - !oust unassign
proc unassign {nick host hand chan text} {
   global botnick unassign vhostjoinpart
   # on crée $cleave qui est le canal à quitter
   set cleave [join [lrange [split $text] 0 0]]
   if {[validchan $cleave]} { 
      # le canal cible est valide, on le retire
      channel remove $cleave
      foreach pseudo $vhostjoinpart {
         putquick "NOTICE $pseudo:Je suis bien partie de $cleave"
      }
   } else {
      putserv "NOTICE $nick :Je ne connais pas le canal $cleave"
   }
}
 
bind pub - !vien assign
proc assign {nick host hand chan text} {
    global botnick assign vhostjoinpart
   # on crée $cjoin qui est le canal à rejoindre
    set cleave [join [lrange [split $text] 0 0]]
    channel add $cleave
    foreach pseudo $vhostjoinpart {
        putquick "NOTICE $pseudo: $botnick a bien été atribué au salon $cleave"
     }
}

J'ai rechercher sur le forum, comme je n'es pas travaillé énorme sur les vhost, j'espère que ça va fonctionner !