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


event.
#6
salut,


tcl
if {$arg2=="QUIT"} {
    set pseudo [string trim [lindex $arg 0] :]
    set message [string trim [lrange $arg 2 end] :]
    if [string equal "KILL" [lindex $message 0]] {
      putdcc $geofront(idx) ":$geofront(logservnick) PRIVMSG $geofront(log) :\0035° \0037Kill \0035° \0036$pseudo \0031vein d'être kill du serveur : \0034$message"
 
    } else {
        putdcc $geofront(idx) ":$geofront(logservnick) PRIVMSG $geofront(log) :\0035° \0037Quit \0035° \0036$pseudo \0031a quitter le serveur : \0034$message"
    }
  }

C'est en reconnaissant ses erreurs que l'on progresse ;)
Away


Messages In This Thread
event. - by aliasangelius - 17/04/2011, 19:07
RE: event. - by CrazyCat - 18/04/2011, 11:34
RE: event. - by djdu32 - 18/04/2011, 11:39
RE: event. - by cestlemien - 18/04/2011, 12:26
RE: event. - by aliasangelius - 18/04/2011, 16:46
RE: event. - by djkenny - 18/04/2011, 18:45
RE: event. - by aliasangelius - 18/04/2011, 19:14
RE: event. - by djkenny - 18/04/2011, 19:41
RE: event. - by aliasangelius - 18/04/2011, 19:45

Forum Jump:


Users browsing this thread: 1 Guest(s)