Communauté Eggdrop
Un soucis avec TCL - Version imprimable

+- Communauté Eggdrop (https://forum.eggdrop.fr)
+-- Forum : Eggdrop et TCL (https://forum.eggdrop.fr/forumdisplay.php?fid=8)
+--- Forum : Scripts TCL (https://forum.eggdrop.fr/forumdisplay.php?fid=4)
+--- Sujet : Un soucis avec TCL (/showthread.php?tid=923)

Pages : 1 2


Un soucis avec TCL - dorset_sp - 01/04/2011

Salut,

J'ai actuellement rencontré un soucis avec un script tcl, à vrai dire le script ne répond pas, en sachant bien qu'il a bien été poser, et aucunes modifications a pu rendre le script inutilisable.

En tapant (.tcl set ::errorInfo) voilà le message que j'ai :

[16:46:10] <(eggdrop)> Tcl: invalid command name "storenote"
[16:46:11] <(eggdrop)> Tcl: while executing
[16:46:11] <(eggdrop)> Tcl: "storenote $_from $_to $_data $_idx"

J'ai aussi essayer de reload l'eggdrop, mais en vin ça n'a toujours pas fonctionner, je vais vous mettrez le script tcl :

bind join - "*" join:
proc join: { nick uhost hand chan } {
if {$chan == "#Test"} {
putserv "PRIVMSG $nick :Bienvenue à vous sur #Test !"
return 0
}
}

Voilà quoi, l'eggdrop n'envoie pas de message quand une personne, se connecte dans mon salon, pouvez-vous m'en dire d'avantages à ce sujet là s'il-vous-plaît ?


RE: Un soucis avec TCL - djkenny - 01/04/2011

salut,

essais de remplacer
tcl
if {$chan == "#Test"} {


par
tcl
if [string equal -nocase $chan "#test"] {





RE: Un soucis avec TCL - dorset_sp - 02/04/2011

Ca ne marche toujours pas, je regardes même dans la partyline pour voir si il n'y a pas de messages d'erreurs.
Il ne répond toujours pas au script, et il n'indique pas une erreur.

Peut-être est-ce la version de l'eggdrop ? j'ai la version 1.6.20 !
Pour ma par, je ne penses pas que la version influence sur le script tcl, je peux me tromper aussi.


RE: Un soucis avec TCL - djkenny - 02/04/2011

essais de changer le nom de la proc, j ai un doute sur le bon fonctionnement du "join:" essais de mettre un truc du genre
tcl
bind join - "*" join:welcome
proc join:welcome { nick uhost hand chan } {
  if [string equal -nocase $chan "#test"] {
      putserv "PRIVMSG $nick :Bienvenue à vous sur $chan !"
  }
}





RE: Un soucis avec TCL - dorset_sp - 02/04/2011

Je viens de le faire, j'ai ensuite fait un rehash sur l'eggdrop, mais ça ne marche toujours pas.
Je sais pas si l'éventuelle souci, viendrai du tcl, ou alors du eggdrop même.


RE: Un soucis avec TCL - CrazyCat - 02/04/2011

En party-line, ça donne quoi si tu fais:
Code :
.binds join



RE: Un soucis avec TCL - dorset_sp - 02/04/2011

Ca donne ça :

[16:07:46] <(eggdrop)> [16:06:58] #dorset_sp# binds join
[16:07:46] <(eggdrop)> Liaisons de commande:
[16:07:46] <(eggdrop)> TYPE FLAGS COMMAND HITS BINDING (TCL)
[16:07:46] <(eggdrop)> No command bindings for type: join.


RE: Un soucis avec TCL - djkenny - 02/04/2011

si tu fais un restart, tu n'as pas d' erreurs?


RE: Un soucis avec TCL - dorset_sp - 02/04/2011

Aucuns rapports d'erreurs.


RE: Un soucis avec TCL - aliasangelius - 02/04/2011

Bonjour,

Voici ce que j'obtien moi :

Citation :[17:32:25] ( alias_angelius ) .binds join
[17:32:25] <Xbot02> [16:32:32] #alias_angelius# binds join
[17:32:26] <Xbot02> Liaisons de commande:
[17:32:26] <Xbot02> TYPE FLAGS COMMAND HITS BINDING (TCL)
[17:32:26] <Xbot02> join -|- * 0 join:welcome

ensuite je fait un part/join sur le salon ou j'ai pris soin de mettre dans le code qui à été mis j'ai juste remplace #test part #Services

et voici le résultat :

[quote]
[17:32:46] ( Part ) * alias_angelius * (00Hadmin@430935128.9tel.net) de #services
[17:32:46] ( Join ) * alias_angelius * (00Hadmin@430935128.9tel.net) sur #services
[17:32:46] ( Information ) Mode +sntO
[17:32:46]
[17:32:47] ( Privé ) * Xbot02 * (user-FR@7596679435.talk-me.fr)

[17:32:47] ( Xbot02 ) Bienvenue à vous sur #Services !
[quote]

en ayant le tcl :

tcl
bind join - "*" join:welcome
proc join:welcome { nick uhost hand chan } {
  if [string equal -nocase $chan "#Services"] {
      putserv "PRIVMSG $nick :Bienvenue à vous sur $chan !"
  }
}



Donc question :

as-tu mis le tcl dans le dossier scripts ?
as-tu mis dans ta conf de l'eggdrop la ligne : source scripts/letcl.tcl
as-tu rehash l'eggdrop ?


RE: Un soucis avec TCL - dorset_sp - 02/04/2011

Oui j'ai fais tout ça.


RE: Un soucis avec TCL - aliasangelius - 02/04/2011

hmm tente un .restart voir même si pour ceci normalement pas besoin mais essaye.

Ps : tu te situe bien sur le salon ou le bot doit te pv donc : #test ?


RE: Un soucis avec TCL - dorset_sp - 03/04/2011

Je viens à nouveau faire un .restart, le bot s'est déconnecté parfaitement, sans message d'erreur.
Et oui, je me situes bien sur le salon #Test


RE: Un soucis avec TCL - aliasangelius - 03/04/2011

et en PL .binds join

Te retourne rien comme résultat ?


RE: Un soucis avec TCL - dorset_sp - 03/04/2011

Ca m'affiche ça :

[16:07:46] <(eggdrop)> [16:06:58] #dorset_sp# binds join
[16:07:46] <(eggdrop)> Liaisons de commande:
[16:07:46] <(eggdrop)> TYPE FLAGS COMMAND HITS BINDING (TCL)
[16:07:46] <(eggdrop)> No command bindings for type: join.