Join chan
#6
Salut,

Essaye ce 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
  if {$channel == $chekback} {
    foreach host $vhost {
	  if {![string match -nocase $host $uhost]} {
	   set hostmask "[getchanhost $nick $channel]"
	   set raison " \00304$nick - \00302Vous n'êtes pas autorisé à être sur ce salon."
	    putquick "KICK $channel $pseudo $raison"
	    putquick "MODE $channel +bb $hostmask $pseudo"
	  }
	}
  }
}


Répondre Avertir


Messages dans ce sujet
Join chan - par Aristide - 26/09/2011, 02:10
RE: Join chan - par cestlemien - 26/09/2011, 02:22
RE: Join chan - par Aristide - 26/09/2011, 02:30
RE: Join chan - par cestlemien - 26/09/2011, 02:36
RE: Join chan - par Aristide - 26/09/2011, 02:42
RE: Join chan - par ArKeNiS - 26/09/2011, 07:03
RE: Join chan - par djkenny - 26/09/2011, 07:44
RE: Join chan - par Aristide - 26/09/2011, 08:45
RE: Join chan - par CrazyCat - 26/09/2011, 09:20
RE: Join chan - par djkenny - 26/09/2011, 12:14
RE: Join chan - par Aristide - 26/09/2011, 18:38
RE: Join chan - par djkenny - 26/09/2011, 20:11
RE: Join chan - par DnS - 26/09/2011, 21:45
RE: Join chan - par Aristide - 26/09/2011, 21:45
RE: Join chan - par djkenny - 27/09/2011, 02:11
RE: Join chan - par Aristide - 27/09/2011, 16:27
RE: Join chan - par Aristide - 27/09/2011, 16:52
RE: Join chan - par aliasangelius - 27/09/2011, 17:06
RE: Join chan - par Aristide - 27/09/2011, 17:34
RE: Join chan - par aliasangelius - 27/09/2011, 17:38
RE: Join chan - par djkenny - 27/09/2011, 19:28
RE: Join chan - par aliasangelius - 27/09/2011, 20:24

Atteindre :


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