+- Communauté Eggdrop (https://forum.eggdrop.fr)
+-- Forum : Eggdrop et scripts (https://forum.eggdrop.fr/forumdisplay.php?fid=8)
+--- Forum : Scripts (https://forum.eggdrop.fr/forumdisplay.php?fid=4)
+--- Sujet : [aide] comment rajouter des hosts et des salons en plus pour sajoin (/showthread.php?tid=1367)
[aide] comment rajouter des hosts et des salons en plus pour sajoin - Naruto - 16/07/2013
Bonjour à tous .
J'ai un problème que je n'arrive pas à résoudre tout seul ( vu mon niveau )
je vous explique mon problème dans se tcl je peux sajoin que *@StaffAnim.monsite.net sur #Staff et #Team
et je souhaiterais rajouter d'autre hosts pour des salons différent
genre *@Anim.monsite.net sajoin sur #Team
et *@Staff.monsite.net sajoin sur #Staff
comment je peux faire pour rajouter ces deux hosts et les deux salons dans mon code ?
tcl
proc putfast {arg} {
append arg "\n"
putnow $arg -oneline
#putnow 0 [string length $arg] $arg
}
set vhostsaj {
*@StaffAnim.monsite.net
}
bind join - "*" mesajoin
proc mesajoin {nick host hand arg} {
global vhostsaj
foreach vhost1 $vhostsaj {
if [string match -nocase $vhost1 $host] {
putfast "SAJOIN $nick #Staff"
putfast "SAJOIN $nick #Team"
}
}
}
Je vous remercie pour vos réponses donné .
RE: [aide] comment rajouter des hosts et des salons en plus pour sajoin - CrazyCat - 16/07/2013
Il faut un peu adapter le script pour avoir une association vhost => canaux
tcl
set vhostsaj {
"*@StaffAnim.monsite.net" "#canal1,#canal2"
"*@Anim.monsite.net" "#canal2"
}
bind join - "*" mesajoin
proc mesajoin {nick host hand arg} {
foreach vhost [array names $::vhostsaj] {
if {[string match -nocase $vhost $host]]} {
putserv "SAJOIN $nick $::vhostsaj($vhost)"
}
}
}
Bon, il y a sûrement un petit souci sur l'utilisation du tableau dans le putserv, ainsi que dans la possibilité de faire sajoin #canal1,#canal2, mais de toutes manières le sajoin, c'est le mal.
RE: [aide] comment rajouter des hosts et des salons en plus pour sajoin - Naruto - 16/07/2013
Bonsoir CrazyCat.
Merci bien pour l'aide je vais testé , pour la question du sajoin je sais bien que sais pas terrible mais vu que l'auto invite ne fonctionne pas je ne peux que opté pour cette solution :/
tcl
while executing
"proc mesajoin {nick host hand arg} {
foreach vhost [array names $::vhostsaj] {
if {[string match -nocase $vhost $host]] {
putserv "S..."
(file "scripts/sajoin.tcl" line 14)
invoked from within
le invoked from within ca veux dire qu'il manque ca { ?
après le reste je ne sais pas.
RE: [aide] comment rajouter des hosts et des salons en plus pour sajoin - aliasangelius - 16/07/2013
Salut, Non je pense plutôt un : } Oublier :)
tcl
if {[string match -nocase $vhost $host]] {
Essaye de remplacer par :
tcl
if {[string match -nocase $vhost $host]]} {
De plus si l'auto invite ne fonctionne pas y'a aussi : putserv "NOTICE $nick :..." Je dit sa je dit rien
RE: [aide] comment rajouter des hosts et des salons en plus pour sajoin - Naruto - 16/07/2013
Salut aliasangelius le bot se lance bien mais aucunes erreurs en pl et ca ne fonctionne pas .
Ceci dit si il faut en autoinvite je ne suis pas contre mais bon je ne sais pas codé le tcl .
J'ai changé ca:
putserv "SAJOIN $nick $::vhostsaj($vhost)
par ca:
putserv "SAJOIN $nick $::vhostsaj($vhost)"
ca fonctionne toujours pas
RE: [aide] comment rajouter des hosts et des salons en plus pour sajoin - Naruto - 17/07/2013
Re j'ai trouvé comment faire ça fonctionne bien pour les sajoins .
Je vais tenté de modifier le code pour qu'il invite bye.
{résolu}
RE: [aide] comment rajouter des hosts et des salons en plus pour sajoin - CrazyCat - 17/07/2013
J'ai corrigé dans le source initial les deux erreurs de syntaxe (le } et le " manquants), mais il serait sympa de ta part de nous montrer ton code fonctionnel.
Je trouve ça très détestable les personnes qui demandent une aide qu'on leur apporte bien gentiment et qui, lorsqu'elles corrigent une erreur dans les codes fournis, ne diffusent pas leur solution.
RE: [aide] comment rajouter des hosts et des salons en plus pour sajoin - cestlemien - 17/07/2013
Salut,
Et pourquoi:
•Ne pas utiliser simplement le fichier de configuration du serveur, et non passer par un eggdrop ?
•Ou peut une etre piste par flag et non par vhost ...
-flags XX/sajoin salon XX
-flags yy/sajoin salonXX,YY
Cordialement
RE: [aide] comment rajouter des hosts et des salons en plus pour sajoin - CrazyCat - 17/07/2013
(17/07/2013, 10:04)cestlemien a écrit : •Ne pas utiliser simplement le fichier de configuration du serveur, et non passer par un eggdrop ?Tout simplement parce que l'on a pas forcément la main sur le serveur. Ce genre de TCL, en utilisant des invite plutôt que des sajoin, fonctionne partout même si l'eggdrop n'est pas ircop.
(17/07/2013, 10:04)cestlemien a écrit : •Ou peut une etre piste par flag et non par vhost ...C'est effectivement une solution bien plus propre, mais beaucoup (trop) ici préfèrent gérer par vhost, avec tout ce que ça implique. Bref, ça fait des tcl limités pour les personnes ayant la main sur les vhosts, et c'est mal.
-flags XX/sajoin salon XX
-flags yy/sajoin salonXX,YY
RE: [aide] comment rajouter des hosts et des salons en plus pour sajoin - Naruto - 17/07/2013
Bonjour, cestlemien et CrazyCat.
j'ai fait ça comme ceci:
tcl
set vhostsaj {
*@StaffAnim.monsite.net
}
set vhostsaj1 {
*@Staff.monsite.net
}
set vhostsaj2 {
*@Anim.monsite.net
}
bind join - "*" mesajoin
proc mesajoin {nick host hand arg} {
global vhostsaj
foreach vhost1 $vhostsaj {
if [string match -nocase $vhost1 $host] {
puthelp "SAJOIN $nick #Staff"
puthelp "SAJOIN $nick #Team"
}
}
}
bind join - "*" mesajoin2
proc mesajoin2 {nick host hand arg} {
global vhostsaj1
foreach vhost2 $vhostsaj1 {
if [string match -nocase $vhost2 $host] {
puthelp "SAJOIN $nick #Staff"
}
}
}
bind join - "*" mesajoin3
proc mesajoin3 {nick host hand arg} {
global vhostsaj2
foreach vhost3 $vhostsaj2 {
if [string match -nocase $vhost3 $host] {
puthelp "SAJOIN $nick #Team"
}
}
}
putlog "sajoin.tcl bien chargé"
Passé par fichier de configuration du serveur peut être une meilleur idée après je ne sais pas comment modifier celui ci pour qu'il sajoin ,c'est une autre histoire :/
Désolé de ne pas avoir diffusé le code plus tot.
RE: [aide] comment rajouter des hosts et des salons en plus pour sajoin - CrazyCat - 17/07/2013
C'est à dire qu'à chaque join, tu vas lancer 3 procédures ?
Et je ne vois pas l'intérêt d'un foreach lorsqu'il n'y a qu'une entrée dans tes listes...
Bref, ça fonctionne mais c'est très laid et très peu optimisé.
RE: [aide] comment rajouter des hosts et des salons en plus pour sajoin - aliasangelius - 17/07/2013
Bonsoir,
Donc pour résumer ton vhost là ne sert strictement à rien.. Pour plusieurs raison.
1) Tu devrais utiliser le système de host pré défini par eggdrop ce qui permets d'avoir un meilleur système pour ma part.
2) Ensuite fonctionner par flag ET plus simple pourquoi ? Car lorsque tu va attribuer disons je vais dire un exemple ne dessous.
Je suis sur irc avec les flags ABC.
Level A "admin", Level B "Co-Admin", Level C "Opérateur"
Je veut que Admin aille sur salon abc, je veut que Co-Admin aille sur salon bc, Je veut que Opérateur aille sur salon c.
Donc là tu utilise simplement le sytème de flag avec un simple if.. C'est plus simple si l'eggdrop voie que Tel personne à le flag ABC il va les faire joindre sur les 3 salon par exemple.
Si co admin il les fera joindre que sur deux salon.
Etc tu vois ce que je veut dire ?