28/01/2017, 16:11
(Modification du message : 01/02/2017, 18:11 par Alucard`68.)
Bonjour à tous,
Alors voila j'ai créer il y a quelque temps un petit script de modération pour un ami aujourd'hui je voudrais rajouter une exception sur celui-ci.
Je m'explique : de la façon que j'ai codé ses commandes il se trouve que les modérateurs peuvent kick un Chan Master par exemple. Se que je voudrais c'est qu'en fonction du vhost la commande ne fonctionne pas
J'ai tenter de faire ainsi
Non fonctionnel et j'ai se message en PL
Et aussi de cette manière
cette façon est non fonctionnel aussi et j'ai se message en PL
J'avoue que je ne sais pas comment mi prendre pour arriver à mes fins
J'ai bien-sur bien définie le bloc "set vhostmodo" avec les vhost dont les commandes ne doivent pas fonctionné.
Merci d'avance pour votre aide.
Bien à vous.
Bye.
Alors voila j'ai créer il y a quelque temps un petit script de modération pour un ami aujourd'hui je voudrais rajouter une exception sur celui-ci.
Je m'explique : de la façon que j'ai codé ses commandes il se trouve que les modérateurs peuvent kick un Chan Master par exemple. Se que je voudrais c'est qu'en fonction du vhost la commande ne fonctionne pas
J'ai tenter de faire ainsi
tcl
proc kickraison { nick host hand channel text } {
global vhostmodo2 kickraison
set args [split $text]
set victim [lindex $args 0]
set reason [join [lrange $args 1 end]]
foreach vhost $vhostmodo2 {
if { $vhost == $vhostmodo } { return 0 }
if [string match -nocase $vhost $host] {
putserv "PRIVMSG $::cs kick $channel $victim $reason"
putserv "PRIVMSG $::log :\0034$victim \00312à été kick de \0034$channel \00312par \0034$nick \00312pour la raison\0037 $reason."
}
}
}
Non fonctionnel et j'ai se message en PL
Code :
[14:51:57] Tcl error [kickraison]: can't read "vhostmodo": no such variable
tcl
proc kickraison { nick host hand channel text } {
global vhostmodo2 kickraison vhostmodo
set args [split $text]
set victim [lindex $args 0]
set reason [join [lrange $args 1 end]]
foreach vhost $vhostmodo2 $vhostmodo {
if { $vhost == $vhostmodo } { return 0 }
if [string match -nocase $vhost $host] {
putserv "PRIVMSG $::cs kick $channel $victim $reason"
putserv "PRIVMSG $::log :\0034$victim \00312à été kick de \0034$channel \00312par \0034$nick \00312pour la raison\0037 $reason."
}
}
}
cette façon est non fonctionnel aussi et j'ai se message en PL
Code :
[14:55:39] Tcl error [kickraison]: wrong # args: should be "foreach varList list ?varList list ...? command"
J'ai bien-sur bien définie le bloc "set vhostmodo" avec les vhost dont les commandes ne doivent pas fonctionné.
Merci d'avance pour votre aide.
Bien à vous.
Bye.