Mon bot me fais une demande de dcc chat
#1
Bonjour,
je viens car j'ai un soucis, j'aimerais que mon bot me demande lui meme un dcc chat quand je me auth aupres de lui.

J'ai vu quelque chose du genre
TCL
bind msg - link dcc:dem
proc dcc:dem {nick uhost handle text} {
   puthelp "DCC CHAT $nick"
}



Mais apparement meme juste ca tout seul, ne fonctionne pas donc j'aimerais que mon bot m'invite en dcc chat quand je me auth.

Si quelqu'un a une petite idée merci.
Répondre Avertir
#2
tu peut ajouté un truc dans ce genre si dans ta proc de auth :

TCL
if [validuser $hand] {
  puthelp "DCC CHAT $nick"
}


[font=Times New Roman]La différence entre Linux et Windows ,c'est que Linux c'est comme une belle fille , il faut l'apprivoiser , la comprendre , la séduire tandis que Windows , c'est comme une prostitué , il faut payer et surtout bien se protéger.[/font]
Répondre Avertir
#3
Ceci serais bon ou pas pour que quand je join le salon
et que je me auth le bot m'envoi une demande de dcc chat ?

TCL
bind join - * showdcc 
proc showdcc {nick uhost hand chan}
global showdcc
if [validuser $hand] {
  puthelp "DCC CHAT $nick"
}


Répondre Avertir
#4
Pour le dcc chat il faut faire comme cela

TCL
bind join - * showdcc 
proc showdcc {nick uhost hand chan}
global showdcc botnick
if [validuser $hand] {
*ctcp:CHAT $nick $uhost $hand $botnick CHAT 
}


Répondre Avertir
#5
apparement ca ne fonctionne pas.
Voici ce que j'ai en erreure.

[18:02] wrong # args: should be "proc name args body"
while executing
"proc showdcc {nick uhost hand chan}"
(file "scripts/dcc.tcl" line 2)
invoked from within
"source scripts/dcc.tcl"
Répondre Avertir
#6
TCL
proc showdcc {nick uhost hand chan arg} {



désolé j'avais recopié ton code et juste ajouté la commande dcc .
il manquai arg et un {
Répondre Avertir
#7
Bon là le bot se connecte bien mais par contre en pl j'ai ca comme erreure

[22:22] Tcl error [showdcc]: wrong # args: should be "*ctcp:CHAT nick user@host handle dest/chan keyword text"
Répondre Avertir
#8
voila comme cela sa marche je viens d'essayé .

TCL
bind join - * showdcc 
proc showdcc {nick host hand chan} {
     global botnick
     if [validuser $hand] {
*ctcp:CHAT $nick $host $hand $botnick CHAT $nick
     }
}


Répondre Avertir


Atteindre :


Utilisateur(s) parcourant ce sujet : 1 visiteur(s)
Tchat 100% gratuit -Discutez en toute liberté