Join chan

[Aristide]

@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

[Aristide]

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.

[aliasangelius]

Salut,

Tien essaye ça mais suis pas sur de mon coup j'ai pas tester le code :

tclcopier

#######################
## 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"
   }
}

[Aristide]

@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
"

[aliasangelius]

essaye de remplacer :

tclcopier

if {![$vhost $nick]} {

par :

tclcopier

if {![$host $nick]} {

[djkenny]

essaye de remplacer :

tclcopier

if {![$vhost $nick]} {

par :

tclcopier

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.

[aliasangelius]

Bah un tcl d'autorisation avec un flag se ferait en 4 lignes et serait beaucoup plus simple