Système de plainte

[BlackNight]

@CrazyCat: désole pour les couleurs, j'en prend note pour ne plus refaire la même erreur.
En passant, merci pour le coup de main (IRC) pour le cinema.tcl (ca date d'il y a deux mois maintenant, mais bon.)

@Artix: J'ai été obligé de mettre *plainte* , car sur le serveur ou je me sert de ce code, j'utilise un alias Unreal. et sans les * *, cela ne fonctionne pas en passant par l'alias. Ci dessous le code de l'alias (je vais utiliser la balise code, ne sachant pas laquelle prendre pour du codage unreal).

Code :

alias "plainte" {
    format "^[^#]" {
        nick "MonBot";
        type normal;
        parameters "plainte %0-";
    };
    type command;
};

Aussi,

tclcopier

if ![string compare -nocase $comp ""] { --

Tu peux faire

tclcopier

if {$comp ne ""}

Je vais essayer ça dès que possible.
est-ce que de cette façon c'est correct ?:

tclcopier

bind pub - !prend prend
proc prend { nick uhost handle channel arg } {
global chanplainte
   if [$channel ne "$chanplainte"] {
    set comp [lindex $arg 2]
     if [$comp ne ""] {
putserv "NOTICE [lindex $arg 0] :Votre plainte a été prise en charge par $nick."
unset comp
   } else {
   putserv "NOTICE [lindex $arg 0] :Votre plainte a été prise en charge par $nick. informations complémentaires: [lrange $arg 1 end]"
 
}
}
}

@MenzAgitat: non pas pour adulte :p j'entendais cela dans le sens de prendre en charge (-: