This is the new home of the egghelp.org community forum.
All data has been migrated (including user logins/passwords) to a new phpBB version.


For more information, see this announcement post. Click the X in the top right-corner of this box to dismiss this message.

banlist

Old posts that have not been replied to for several years.
Locked
User avatar
CooLB0Y
Voice
Posts: 29
Joined: Fri Mar 26, 2004 2:06 pm
Location: Australia

banlist

Post by CooLB0Y »

there is a tcl cleans channel ban list every x time?
x=the time u set like 20 min
User avatar
Xpert
Halfop
Posts: 88
Joined: Mon Mar 08, 2004 7:03 am

Post by Xpert »

Code: Select all

proc remove:bans {} {
  foreach bans [chanbans #channel] {
    pushmode "#channel" "-b" "[lindex $bans 0]"
  }
  timer 20 remove:bans
}

if {![regexp remove:bans [timers]]} {
  timer 20 remove:bans
}
:P
Xpert.
User avatar
CooLB0Y
Voice
Posts: 29
Joined: Fri Mar 26, 2004 2:06 pm
Location: Australia

Post by CooLB0Y »

thanks :)
User avatar
Xpert
Halfop
Posts: 88
Joined: Mon Mar 08, 2004 7:03 am

Post by Xpert »

No problem :P
Xpert.
User avatar
strikelight
Owner
Posts: 708
Joined: Mon Oct 07, 2002 10:39 am
Contact:

Post by strikelight »

Xpert wrote:

Code: Select all

proc remove:bans {} {
  foreach bans [chanbans #channel] {
    pushmode "#channel" "-b" "[lindex $bans 0]"
  }
  timer 20 remove:bans
}

if {![regexp remove:bans [timers]]} {
  timer 20 remove:bans
}
:P
'regexp' is alot slower than 'string match', you should only use regexp for complex jobs....

ie.

Code: Select all

if {![string match *remove:bans* [timers]]} {
  timer 20 remove:bans
}
User avatar
YooHoo
Owner
Posts: 939
Joined: Thu Feb 13, 2003 10:07 pm
Location: Redwood Coast

Re: banlist

Post by YooHoo »

CooLB0Y wrote:there is a tcl cleans channel ban list every x time?
x=the time u set like 20 min
I was under the impression that this would do the exact same thing with no need for tcl...?
set ban-time 20 (in conf)
.chanset <#chan> +dynamicbans

or have I been sniffin too much glue today? :mrgreen:
Locked