16/12/2011, 22:23
Bonsoir,
J'aimerais avoir une petite aide pour un code, je vous explique.
Les utilisateurs ayant un flag +Z qui tapes !ban pseudo ca doit ban le pseudo qu'ils ont precisés.
Mais j'aimerais que les utilisateurs ayant un flag +Z ne soit pas banni pour eviter les bans entre eux.
Voici le code
maintenant j'ai essayé d'ajouter cela dans le code mais ca ne fonctionne pas
Quelqu'un peut m'aider ??
Cordialement
J'aimerais avoir une petite aide pour un code, je vous explique.
Les utilisateurs ayant un flag +Z qui tapes !ban pseudo ca doit ban le pseudo qu'ils ont precisés.
Mais j'aimerais que les utilisateurs ayant un flag +Z ne soit pas banni pour eviter les bans entre eux.
Voici le code
tcl
bind pub Z !ban ban
proc ban {nick host hand chan arg} {
global botnick
set nicks [join [lindex [split $arg] 0]]
set reason [join [lrange [split $arg] 1 end]]
if {$nicks == ""} {
putserv "PRIVMSG $::chanback :Tu veux Bannir qui $nick ?"
return 0
}
if {$reason == ""} {
putserv "KICK $chan $nicks :Bannii"
} else {
putserv "KICK $chan $nicks :$reason"
}
putquick "MODE $chan -o $nicks"
putquick "MODE $chan +b $nicks"
putserv "PRIVMSG $::chanback :$nick vient de Bannir $nicks sur $chan"
}
maintenant j'ai essayé d'ajouter cela dans le code mais ca ne fonctionne pas
tcl
if {[matchattr $nick Z]} {
putserv "PRIVMSG $::chanback :ANTIBAN $nick Il est impossible de Ban un autre @"
}
Quelqu'un peut m'aider ??
Cordialement