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.
#2
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"
Vous interdisez les erreurs, vous empêchez ainsi la victoire.

Ma super kikoo-page loll
#3
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
#4
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"
Vous interdisez les erreurs, vous empêchez ainsi la victoire.

Ma super kikoo-page loll
#5
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
}

#6
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
#7
Donc là plus besoin de vhost ?
#8
(09/03/2014, 18:12)KeeViiNou Wrote: Donc là plus besoin de vhost ?

Non plus besoin de vhost tout passe par les flag de l'egg
Site Web: Clic ici Nous rejoindres par mIRC -> Clic Ici
inutile d'avoir une grosse machine si il y'a un con deriere l'ecran :D
#9
Je suis un peu à la rue... flag de l'eggdrop c'est à dire ?
#10
salut,

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

Cordialement.
#11
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.
irc.zeolia.net - Offrez-moi un café
Merci de ne pas demander d'aide en MP
Away
#12
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
Vous interdisez les erreurs, vous empêchez ainsi la victoire.

Ma super kikoo-page loll
#13
Merci aliasangelius
#14
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..
#15
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
Vous interdisez les erreurs, vous empêchez ainsi la victoire.

Ma super kikoo-page loll


Possibly Related Threads…
Thread Author Replies Views Last Post
  TCL Auto-sajoin fonctionne partiellement. Aristide 24 15,224 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,264 24/02/2017, 10:59
Last Post: KeeViiNou
  [Demande] Soucis avec expr aliasangelius 6 4,177 13/01/2017, 18:06
Last Post: aliasangelius
  Soucis avec un tcl KeeViiNou 1 3,718 08/05/2016, 14:06
Last Post: KeeViiNou
  [Résolu] Soucis avec une commande Scorpio 11 6,394 22/01/2016, 12:58
Last Post: Scorpio
  Soucis de codage avec un kick KeeViiNou 14 8,521 26/03/2014, 23:18
Last Post: KeeViiNou
  Soucis avec un codage KeeViiNou 9 6,339 14/03/2014, 21:22
Last Post: aliasangelius
Sad Problème sajoin sur un salon. Alucard`68 1 3,847 22/04/2012, 16:58
Last Post: CrazyCat
  Petit soucis avec un script d'annonce de la saint du jour, etc... loulou7593 3 5,916 19/11/2011, 14:53
Last Post: CrazyCat
  petit soucis avec logger lesny 54 33,275 12/08/2011, 18:52
Last Post: lesny

Forum Jump:


Users browsing this thread: 1 Guest(s)