Join chan
#16
@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
Répondre Avertir
#17
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.
Répondre Avertir
#18
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"
   }
}


Répondre Avertir
#19
@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
"
Répondre Avertir
#20
essaye de remplacer :

TCL
if {![$vhost $nick]} {



par :

TCL
if {![$host $nick]} {


Répondre Avertir
#21
alias_angelius a écrit :essaye de remplacer :

TCL
if {![$vhost $nick]} {



par :

TCL
if {![$host $nick]} {


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.
C'est en reconnaissant ses erreurs que l'on progresse Wink
Répondre Avertir
#22
Bah un tcl d'autorisation avec un flag se ferait en 4 lignes et serait beaucoup plus simple
Répondre Avertir


Atteindre :


Utilisateur(s) parcourant ce sujet : 1 visiteur(s)
Tchat 100% gratuit -Discutez en toute liberté