Mise en forme de code: pensez à utiliser les balises [ tcl ] et [ /tcl ] (sans les espaces bien sûr) autour de vos codes tcl afin d'avoir un meilleur rendu et une coloration syntaxique. x


Soucis avec un tcl de sajoin
#1
Bonjour j'ai un soucis avec le code suivant :

tcl
set vhostnivip {
	*@Root.Domaine.fr
	*@NetAdmin.Domainet.fr
	*@TechAdmin.Domaine.fr
	*@Operateur.Domaine.fr
    *@IrcOp.sDomaine.fr
	*@Fondateur.sDomaine.fr
}
 
set salonaide "#SAlon1"
set salonstaff "#SAlon2"
set salonadmin "#SAlon3"
set bureau "#SAlon4"
set ircops "#SAlon5"
 
###############
##  PUTFAST  ##################################################
## Améliore la vitesse des commandes mais peut etre instable ##
###############################################################
 
proc putfast {arg} {
 append arg "\n"
 putdccraw 0 [string length $arg] $arg
}
 
 
 
###############################################
########### JOIN SALON DE STAFF ###############
###############################################
##   Modifier les noms de salons si besoin   ##
###############################################
bind join - "*" mejoinircops
proc mejoinircops {nick host hand arg} {
global puwhois puwhowas chanip salonip vhostnivip
  foreach vhost $vhostnivip { 
  if [string match -nocase $vhost $host]  {
putquick "SAJOIN $nick $ircops"
    }  
  }
}
bind join - "*" mejoinadmin
proc mejoinadmin {nick host hand arg} {
global puwhois puwhowas chanip salonip vhostnivip
  foreach vhost $vhostnivip { 
  if [string match -nocase $vhost $host]  {
putquick "SAJOIN $nick $bureau"
    }  
  }
}
 
bind join - "*" mejoin
proc mejoin {nick host hand arg} {
global puwhois puwhowas chanip salonip vhostnivip
  foreach vhost $vhostnivip { 
  if [string match -nocase $vhost $host]  {
putquick "SAJOIN $nick $salonstaff"
    }  
  }
}
 
bind join - "*" mejoin2
proc mejoin2 {nick host hand arg} {
global puwhois puwhowas chanip salonip vhostnivip
  foreach vhost $vhostnivip { 
  if [string match -nocase $vhost $host]  {
putquick "SAJOIN $nick $salonadmin"
    }  
  }
}


Pourtant le tcl est bien en ircop
Quote:ROBOTX is an IRC Operator
Numeo is available for help.
Numeo is a Bot on DOMAINE
Voilà l'erreur
Quote:[13:19] <(Numeo> [13:19:24] Tcl error [mejoin2]: can't read "salonadmin": no such variable
[13:19] <(Numeo> [13:19:24] Tcl error [mejoin]: can't read "salonstaff": no such variable
[13:19] <(Numeo> [13:19:24] Tcl error [mejoinadmin]: can't read "bureau": no such variable
[13:19] <(Numeo> [13:19:24] Tcl error [mejoinircops]: can't read "ircops": no such variable

Modération : merci d'utiliser les balises code ou tcl pour mettre du script, pas quote.


Messages In This Thread
Soucis avec un tcl de sajoin - by KeeViiNou - 07/03/2014, 12:42
RE: Soucis avec un tcl de sajoin - by BaGrift - 09/03/2014, 19:20

Possibly Related Threads…
Thread Author Replies Views Last Post
  TCL Auto-sajoin fonctionne partiellement. Aristide 24 15,241 24/02/2017, 17:36
Last Post: cestlemien
  [Bug] Soucis avec un tcl Dark.tcl de Kyrien d'après la création de GeoZzZ [Sujet Reformulé] KeeViiNou 2 3,268 24/02/2017, 10:59
Last Post: KeeViiNou
  [Demande] Soucis avec expr aliasangelius 6 4,178 13/01/2017, 18:06
Last Post: aliasangelius
  Soucis avec un tcl KeeViiNou 1 3,720 08/05/2016, 14:06
Last Post: KeeViiNou
  [Résolu] Soucis avec une commande Scorpio 11 6,396 22/01/2016, 12:58
Last Post: Scorpio
  Soucis de codage avec un kick KeeViiNou 14 8,525 26/03/2014, 23:18
Last Post: KeeViiNou
  Soucis avec un codage KeeViiNou 9 6,343 14/03/2014, 21:22
Last Post: aliasangelius
Sad Problème sajoin sur un salon. Alucard`68 1 3,852 22/04/2012, 16:58
Last Post: CrazyCat
  Petit soucis avec un script d'annonce de la saint du jour, etc... loulou7593 3 5,920 19/11/2011, 14:53
Last Post: CrazyCat
  petit soucis avec logger lesny 54 33,306 12/08/2011, 18:52
Last Post: lesny

Forum Jump:


Users browsing this thread: 1 Guest(s)