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


Unban Niubot..
#2
Il y a une légère optimisation que je ferais: contrôler que la victime est bannie avant le reste.
D'autant plus qu'il me semble voir une erreur: si un autre utilisateur que Niubot pose un ban, tu débannis (et deop le poseur) sans vérifier si la victime doit être bannie.
Voici comment j'agencerais ton code:

tcl
namespace eval ::niuban {
   variable niubotchan "#salon"
   bind MODE - "* +b" [namespace current]::unban_niubot
   proc unban_niubot { nick uhost hand chan mc target } {
      variable niubotchan
      if {[isbotnick $nick]} { return 0 }
      if {[isban $target $chan]} { return 0 }
 
      if {[string match -nocase niubot?? $nick]} {
         putquick "PRIVMSG $niubotchan :unban $target $chan"
      } else {
         putquick "mode $chan -ob $nick $target"
         puthelp "privmsg $niubotchan :\037\0034Seuls les bans via $::botnick sont autorisés !\037\0034"
      }
   }
}

irc.zeolia.net - Offrez-moi un café
Merci de ne pas demander d'aide en MP
Away


Messages In This Thread
Unban Niubot.. - by aliasangelius - 11/11/2012, 18:35
RE: Unban Niubot.. - by CrazyCat - 12/11/2012, 10:16
RE: Unban Niubot.. - by aliasangelius - 12/11/2012, 10:21
RE: Unban Niubot.. - by CrazyCat - 12/11/2012, 18:20
RE: Unban Niubot.. - by aliasangelius - 13/11/2012, 09:58

Possibly Related Threads…
Thread Author Replies Views Last Post
  [Résolu] problème de timer sur un unban Alucard`68 6 3,820 18/04/2017, 15:25
Last Post: Alucard`68
  Création d'un script d'unban Demonis 9 6,413 17/03/2013, 22:18
Last Post: Demonis
  Eggdrop, qui unban automatiquement... IluZi0n 4 4,751 16/04/2009, 14:52
Last Post: David
  unban apres x temps pepino 0 4,189 16/08/2008, 22:00
Last Post: pepino

Forum Jump:


Users browsing this thread: 1 Guest(s)