Soucis avec un tcl de sajoin

[KeeViiNou]

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

ROBOTX is an IRC Operator
Numeo is available for help.
Numeo is a Bot on DOMAINE

Voilà l'erreur

[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.

[aliasangelius]

Salut,
Pourquoi vous tenez à vos sajoin, et eggdrop ircop ? C'est la mode ?

Fait un join avec des flags, et il invite la personne sur le salon c'est plus simple

"Envoyé depuis mon GT-N7000 avec Tapatalk"

[KeeViiNou]

C'est justement pas avec des olines c'est pour les membres du staff et vu qu'il y a aucun accès via mirc c'est plus simple via applet de rien taper

[aliasangelius]

Reprenons.
Ton idée et lorsqu'un membre de ton staff, rejoin un salon, disons accueil.
Ton eggdrop va sajoin ce membre sur un salon précis suuvant son host.
C'est bien sa la question principal de ta recherche non ?

Si c'est oui, ma réponse apportée et adéquate a ta demande.

"Flags" puis "invite".
Plus exactement, flag E pour admin, flag X pour ircop.. etc.

Et tu Fait sa juste avec un bind join des if matchattr.

Exemple :

TCL

if ![matchattr $hand X $chan] {
putserv "invite $nick $salonadmin"
return 0
}

Voila un exemple sans mettre de oline a vos eggdrop.
Et c'est tout autant efficaces..

"Envoyé depuis mon GT-N7000 avec Tapatalk"

[KeeViiNou]

C'est ça ! Donc si je comprends bien le code sera le suivant :

TCL

set vhostnivip {
	*@Root.Domaine.extension
}
set salonaide "#salon#
set salonstaff "#salon#
set salonadmin "#salon#
set bureau"#salon#
set ircops "#salon#
 
proc putfast {arg} {
 append arg "\n"
 putdccraw 0 [string length $arg] $arg
}
 
 
if ![matchattr $hand X $chan] {
putserv "invite $nick $salonadmin"
return 0
}

[aliasangelius]

Pas exactement.

La tu fait sur les flags, donc les vhost ne serviront plus.
et putfast idem sert à rien.

TCL

set salonadmin "#admin"
bind join - "*" mejoinircops
proc mejoinircops {nick host hand arg} {
if ![matchattr $hand X $chan] {
putserv "invite $nick $salonadmin"
return 0
}
}

Voila un exemple à la brouillon, mais le principe et la

[KeeViiNou]

Donc là plus besoin de vhost ?

[BaGrift]

Donc là plus besoin de vhost ?

Non plus besoin de vhost tout passe par les flag de l'egg

[KeeViiNou]

Je suis un peu à la rue... flag de l'eggdrop c'est à dire ?

[cestlemien]

salut,

Le fichier de config du serveur suffit pas pour faire ça ? ah .dommage.

Cordialement.

[CrazyCat]

Modération: suppression du message de  aliasangelius

Mais il n'a pas tort dans le sens où un eggdrop n'est pas forcément utilisé sur un réseau que l'on maîtrise, et bien heureusement. C'est aussi pour cela que je préfère les invites aux sajoins, il faut penser à l'utilisateur lambda sur un réseau quelconque.

Je pense que je vais mettre en place des règles qui seront que les seules demandes acceptées sont celles pour des eggdrops "sans droits", c'est à dire pas ircop. Et que ces scripts puissent fonctionner sans bidouillage côté serveur.

[aliasangelius]

Côté ou je répondez pour : keev, dans la semaine je te ferais un exemple avec des explicatifs. Mais si tu veut des exemples en attendant.
Va sur le wiki et recherche flag.
Ou alors regarde côté gestion.bot un de mes scripts qui utilise cette fonction.

Mais dans la semaine je te guiderais juste la je peux pas dsl

Envoyé de mon GT-N7000 en utilisant Tapatalk

---

Pour compléter le message de Crazy.
Pour moi le forum eggdrop.fr
Ce n'es aucun rapport avec les utilisations server.
Nous sommes sur la partie tcl et eggdrop. Alors voir des messages comme : utilisée les config de server pour faire joindre un salon, sa reviens au même que de faire un sajoin sur un user.. c'est contraire a la CFQ.

De plus, nous remarqueront que tu stipulé dans d'autres poste cestlemien de ne pas octroyer de droit au eggdrop pour sajoin, cela va de même pour les configurations de server je suis pas pour..

Bref je m'excuse pour mon poste supprimé auprès de l'équipe et de la communauté.

Envoyé de mon GT-N7000 en utilisant Tapatalk

[KeeViiNou]

Merci aliasangelius

[KeeViiNou]

Oui effectivement je me souviens des flags c'est le truc en party line |+Q #monchan mais j'ai plus du tout les commandes complètes pour mettre ça a des simple opérateur ou halfop..

[aliasangelius]

Oui c'est ce genre de choses mais je te ferait un exemple pour tu comprenne bien.
Mais c'est bien plus ou moins cela en effets

Envoyé de mon GT-N7000 en utilisant Tapatalk