19/02/2010, 13:23
bonjour,
j'ai essayer comme ceci:
mais il op tous les users :( et n'accepte pas les pseudos avec les caractère spéciaux [ ] ni les extensions. help please ..
Cordialement
j'ai essayer comme ceci:
tcl
bind join - "#Salon *" SalonDeVip
proc SalonDeVip {nick host hand chan} {
global UserDb
set UserDb [open UserVip.db r]
while {![eof $UserDb]} {
set get [gets $UserDb]
if {[string first [string tolower $get] [string tolower $nick]]} {
pushmode $chan +o $nick
return 1
}
close $UserDb
return 0
}
}
mais il op tous les users :( et n'accepte pas les pseudos avec les caractère spéciaux [ ] ni les extensions. help please ..
Cordialement