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


un pti tcl de send
#1

tcl
set commande(choix) "!"
set sendfile_chans "#irc-pacifique"
set sendfile_file "C:...."
bind pub - $commande(choix)sendfile pub:sendfile
proc pub:sendfile {nick uhost hand chan arg} {
global sendfile_file sendfile_chans
if {([lsearch -exact [string tolower $sendfile_chans] [string tolower $chan]] != -1) || ($sendfile_chans == "*")} {
switch -- [dccsend $sendfile_file $nick] {
0 { putserv "NOTICE $nick : c good" }
1 { putserv "NOTICE $nick :Erreur: merci de recommencer plus tard." }
}
}



voila jaimerai faire un petit systeme de partage de fichier via mon egg mais je seche un peut la.
Away


Messages In This Thread
un pti tcl de send - by caline012 - 25/03/2008, 00:59
RE: un pti tcl de send - by DaV34 - 25/03/2008, 20:23
RE: un pti tcl de send - by caline012 - 25/03/2008, 20:28
RE: un pti tcl de send - by caline012 - 26/03/2008, 01:50
RE: un pti tcl de send - by DaV34 - 26/03/2008, 07:48
RE: un pti tcl de send - by caline012 - 26/03/2008, 11:48
RE: un pti tcl de send - by CrazyCat - 26/03/2008, 13:26
RE: un pti tcl de send - by caline012 - 26/03/2008, 13:33
RE: un pti tcl de send - by caline012 - 29/03/2008, 16:10
RE: un pti tcl de send - by CrazyCat - 29/03/2008, 18:32
RE: un pti tcl de send - by caline012 - 29/03/2008, 18:40
RE: un pti tcl de send - by CrazyCat - 29/03/2008, 18:55
RE: un pti tcl de send - by caline012 - 29/03/2008, 18:59
RE: un pti tcl de send - by caline012 - 30/03/2008, 01:19
RE: un pti tcl de send - by CrazyCat - 30/03/2008, 01:46
RE: un pti tcl de send - by caline012 - 30/03/2008, 13:32
RE: un pti tcl de send - by CrazyCat - 30/03/2008, 22:30
RE: un pti tcl de send - by caline012 - 03/04/2008, 11:20

Possibly Related Threads…
Thread Author Replies Views Last Post
  DCC SEND Yugo 3 2,742 20/08/2010, 23:25
Last Post: Artix

Forum Jump:


Users browsing this thread: 1 Guest(s)