Communauté Eggdrop
cherche tcl pseudo - 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 : cherche tcl pseudo (/showthread.php?tid=774)



cherche tcl pseudo - T4tou - 03/11/2010

bonjour je cherche un tcl qui permet a l eggdrop de metre tous les nick connecter sur un channel dans un html
merci de m aide
Edit by CrazyCat: Pas d'email


RE: cherche tcl pseudo - CrazyCat - 03/11/2010

Il n'y a pas de tcl comme ça qui existe, mais c'est faisable:
tcl
set canal "#chan"
set fichier "liste.html"
bind join - "$canal *" list:join
bind part - "$canal *" list:part
bind sign - "$canal *" list:quit
 
proc list:join {nick uhost handle chan} { list:log; }
proc list:part {nick uhost handle chan text} {
   if {$nick != $::botnick} { list:log; }
}
proc list:quit {nick uhost handle chan text} {
   if {$nick != $::botnick} { list:log; }
}
proc list:log {} {
   set fp [open $::fichier r]
   foreach cnick [chanlist $::canal] {
      puts $fp $cnick
   }
   close $fp
}





RE: cherche tcl pseudo - T4tou - 03/11/2010

ca fonction pas et il me dit
cl error [list:join]: couldn't open "/domains/tchatweb.net/public_html/liste.html": permission denied
tu sais maider merci pour la reponse rapid


RE: cherche tcl pseudo - T4tou - 03/11/2010

T4tou a écrit :ca fonction pas et il me dit
cl error [list:join]: couldn't open "/domains/tchatweb.net/public_html/liste.html": permission denied
j ai essayer tou sl echemmin possible
jpense que cest un probleme de log non?
tu sais maider merci pour la reponse rapid



RE: cherche tcl pseudo - CrazyCat - 03/11/2010

Tu peux attendre un petit peu avant de upper ? On a aussi un métier et/ou une vie.

Je me suis trompé, c'est:
tcl
set fp [open $::fichier w]


(r = lecture, w = écriture)


RE: cherche tcl pseudo - T4tou - 03/11/2010

esquse moi ces pas fait expres je voulais rajouter dans citer il a reposter
merci bcp pour ton aide
derniere question sans abuse il a moyen de metre les pseudo exemple Mandarin denise daneel Xaz enfer
mais
Mandarin
denise
daneel
Xaz
enfer
merci et dsler :s


RE: cherche tcl pseudo - CrazyCat - 03/11/2010

Oui, c'est possible, il suffit de corriger la ligne d'écriture en:
tcl
puts $fp "$cnick\n"





RE: cherche tcl pseudo - T4tou - 03/11/2010

non ca les mais pas
http://tchatweb.net/liste.html
puts $fp "$cnick\n"
merci


RE: cherche tcl pseudo - CrazyCat - 03/11/2010

Ah, en rendu html !
Remplace le \n par <br />


RE: cherche tcl pseudo - T4tou - 03/11/2010

voila j ai rajouter
puts $fp "<br>"
merci pour ton aide ses sympas