badhost.tcl
#1
bonjour,
voila je souhaiterai savoir si mon bind join serai correct pour KICK BAN un user qui aurai un badhost ce trouvant dans le fichier badhost.db

tcl
#-//-//-//-//-//-//#
#  jOin Badhost    #
#-//-//-//-//-//-//#
 
bind join - * * proc:badhost
proc:badhost {nick uhost hand chan} {
global botnick 
set badhost [open Badhost/badhost.db r]
putquick "kick $chan $nick :$raisonbl "
putquick "mode $chan +b $nick*!*@*"
}



cordialement
[font=Times New Roman]La différence entre Linux et Windows ,c'est que Linux c'est comme une belle fille , il faut l'apprivoiser , la comprendre , la séduire tandis que Windows , c'est comme une prostitué , il faut payer et surtout bien se protéger.[/font]
Répondre Avertir


Messages dans ce sujet
badhost.tcl - par fedora - 15/02/2009, 13:18
RE: badhost.tcl - par heretoc - 15/02/2009, 16:48
RE: badhost.tcl - par fedora - 16/02/2009, 22:31
RE: badhost.tcl - par BdS - 17/02/2009, 10:54

Atteindre :


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