+- 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 : Join chan (/showthread.php?tid=1043)
Pages :
1
2
RE: Join chan - Aristide - 27/09/2011
@djkenny: Effectivement j'avais en party-line, No such Variable $pseudo, je l'ai remplacé par nick, et puis le bot kick tous les Joins sur le salons, mais les nicks avec les vhost autorisées.
Je vais tester celui que tu viens de me poster. Merci bcp
RE: Join chan - Aristide - 27/09/2011
Le bot Kick tous les nick qui Join le salon, ce que je veux faire c'est juste une exception des Vhost que j'ai défini dans la Variable "Set Vhost", pour qu'il ne les kicks pas.
RE: Join chan - aliasangelius - 27/09/2011
Salut,
Tien essaye ça mais suis pas sur de mon coup j'ai pas tester le code :
tcl
#######################
## Secure Join Staff ##
#######################
set chekback "#test"
set vhost {
*@NetAdmin.*.org
*@TechAdmin.*.org
*@BotAdmin.*.org
}
bind join - "*" pub:join
proc pub:join { nick uhost handle channel } {
global chekback vhost
if [string equal -nocase $channel $chekback] {
foreach host $vhost {
if [string match -nocase $host $uhost] {
return 1
}
}
set raison " \00304$nick - \00302Vous n'êtes pas autorisé à être sur ce salon."
if {![$vhost $nick]} {
putquick "KICK $channel $nick :$raison"
putquick "MODE $channel +bb *!$uhost $nick*!*@*"
}
} else {
putserv "privmsg $chekback :\0034Autorisation pour \002\[$nick\] \0034acceptée."
pushmode $chan +v $nick"
}
}
RE: Join chan - Aristide - 27/09/2011
@alias_angelius: Merci pour la réponse, mais avec ce code j'ai cette erreur en party-line, et le bot ne kick plus.
Code :
Tcl error [pub:join]: invalid command name "
*@NetAdmin.*.org
*@TechAdmin.*.org
*@BotAdmin.*.org
*@Local.*.org
"RE: Join chan - aliasangelius - 27/09/2011
essaye de remplacer :
tcl
if {![$vhost $nick]} {
par :
tcl
if {![$host $nick]} {
RE: Join chan - djkenny - 27/09/2011
alias_angelius a écrit :essaye de remplacer :
tcl
par :
tcl
dans les 2 cas ça ne veut rien dire...
@Aristide: revois la variables vhost, a mon avis t as du faire une erreur dans la configuration car la dernière version que je t ai donné fonctionne parfaitement lorsque que j ajoute mon host dans la liste.
RE: Join chan - aliasangelius - 27/09/2011
Bah un tcl d'autorisation avec un flag se ferait en 4 lignes et serait beaucoup plus simple