aide pour une commande de ban
#2
Désolé j'ai posté ce sujet un peu trop tot,

J'ai reussis à trouver mon erreur.

en faisant comme cela
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 {[matchattr $nicks Z]} {
		putserv "PRIVMSG $::chanback :ANTIBAN $nick Il est impossible de Ban un autre @"
		return 0
	}
	if {$reason == ""} {
	putserv "KICK $chan $nicks :Banni"
	} 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"
	 }



Ca fonctionne pour un pseudo simple qui a un flag +Z mais si la personne change d'extension le flag n'est plus reconnu.

Je pense qu'il faudrait plutot une verification du genre si on veut ban un utilisateur et que celui ci est opé ca ne le ban pas.

comme ce genre de chose
TCL
if {![isop $nick $chan]} {return}



Mais je ne vois pas du tout comment integrer ca
Répondre Avertir


Messages dans ce sujet
aide pour une commande de ban - par loulou7593 - 16/12/2011, 22:23
RE: aide pour une commande de ban - par loulou7593 - 16/12/2011, 22:50

Atteindre :


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