Mise en forme de code: pensez à utiliser les balises [ tcl ] et [ /tcl ] (sans les espaces bien sûr) autour de vos codes tcl afin d'avoir un meilleur rendu et une coloration syntaxique. x


[résolue] Probleme Ban Mode
#1
Sad 
Bonjour,

Alors j'ai trouver un code sur les modes de ban, je l'ai modifié légèrement pour qu'il pose les bans que je veux. Mais rien ne fonctionne...

tcl
bind mode -|- * mode:ban
 
proc mode:ban { nick host hand chan mode victim } {
  if { $mode == "+b" } {
    putquick "MODE $chan -b *!*@Robot.TchaT-Ever.fr"  
  }
  if { $chan == "#Sexe" } {
    if { $mode == "-b" } {
      putquick "MODE $chan +bbbbbbbb ~r:10_*_* ~r:11_*_* ~r:12_*_* ~r:13_*_* ~r:14_*_* ~r:15_*_* ~r:16_*_* ~r:17_*_*"
    }
  }
  if { $chan == "#Adultes" } {
    if { $mode == "-b" } {
      putquick "MODE $chan +bbbbbbbb ~r:10_*_* ~r:11_*_* ~r:12_*_* ~r:13_*_* ~r:14_*_* ~r:15_*_* ~r:16_*_* ~r:17_*_*"
    }
  }
  if { $chan == "#Ados" } {
    if { $mode == "-b" } {
      putquick "MODE $chan +bbbbbbbbbb ~r:2?_*_* ~r:3?_*_* ~r:4?_*_* ~r:5?_*_* ~r:6?_*_* ~r:7?_*_* ~r:8?_*_* ~r:9?_*_* ~r:18_*_* ~r:19_*_* "
    }
  }
}


Code:
[11:58:16] 4× M2ode : AngeDesOmbres / -bbbbbbbbbb ~r:19_*_* ~r:18_*_* ~r:9?_*_* ~r:8?_*_* ~r:7?_*_* ~r:6?_*_* ~r:5?_*_* ~r:4?_*_* ~r:3?_*_* ~r:2?_*_*
Sa ne reban pas...
Mon problème viendrait-il de mon if ?
Je ne vois pas comment faire...
Rectification: sa fonctionne sur les salons #Adultes et #Ados mais pas sur #Sexe pourquoi ?
Merci de votre aide future.

Cordialement.

PS: j'ai oublié de dire que je n'avais pas de message d'erreur en PL.

A ni rien comprendre maintenant sa fonctionne parfaitement désolé du dérangement.
#2
Hypothèse stupide: tester [string tolower $chan] == "#sexe"

C'est pas comme si on avait jamais dit sur ce forum de toujours traiter un canal en minuscules...
irc.zeolia.net - Offrez-moi un café
Merci de ne pas demander d'aide en MP
Away


Possibly Related Threads…
Thread Author Replies Views Last Post
  Problème avec un script TCL (bind mode) Lyokomaster 3 4,431 15/03/2009, 18:05
Last Post: Merwin

Forum Jump:


Users browsing this thread: 1 Guest(s)