egghelp/eggheads community

Re: Banmasks first without delay and with delay after

2026-01-24T12:59:35-04:00

you mean like this right ?

Code:

set counter 0

i've used it at the start of the proc as u suggested
that seems to work if i used proper

Statistics: Posted by simo — Sat Jan 24, 2026 12:59 pm

Re: Banmasks first without delay and with delay after

2026-01-24T12:36:56-04:00

thank you for your reply CrazyCat ,

ive tried your suggestion and got this error :
can't read "counter": no such variable

Just initialize counter to 0 at the beginning of the procedure.

Statistics: Posted by CrazyCat — Sat Jan 24, 2026 12:36 pm

Re: Banmasks first without delay and with delay after

2026-01-24T10:16:17-04:00

im not sure if its proper but i tried this and it seems to work

Code:

   if {![info exists counter]} { putquick "MODE $chan +$mode $masks" -next         }  else { after [expr {$counter*5000}] [list  puthelp "MODE $chan +$mode $masks"] }      incr counter 1

Statistics: Posted by simo — Sat Jan 24, 2026 10:16 am

Re: Banmasks first without delay and with delay after

2026-01-24T10:01:35-04:00

thank you for your reply CrazyCat ,

ive tried your suggestion and got this error :

can't read "counter": no such variable

Statistics: Posted by simo — Sat Jan 24, 2026 10:01 am

Re: Banmasks first without delay and with delay after

2026-01-23T19:17:20-04:00

Did you try inverting the two lines: script script

   incr counter 1   after [expr {$counter*4000}] [list  puthelp "MODE $chan -$mode $masks"]

script Become: script script

   after [expr {$counter*4000}] [list  puthelp "MODE $chan -$mode $masks"]   incr counter 1

script

Statistics: Posted by CrazyCat — Fri Jan 23, 2026 7:17 pm

Re: Banmasks first without delay and with delay after

2026-01-23T13:46:04-04:00

Any help with this code?

Statistics: Posted by simo — Fri Jan 23, 2026 1:46 pm

Banmasks first without delay and with delay after

2026-01-20T20:53:42-04:00

Greetingz,

is there a way to have the first 6 stacked modes +bbbbbb (or of course if there are less than 6 to send in total) be sent direct without any delay and everything after that

Code:

proc StackUnbans {chan banlist {max 6}} {         set chan [string tolower $chan]       set count [llength $banlist]      while {$count > 0} {         if {$count> $max} {            set mode [string repeat "b" $max]            set masks [join [lrange $banlist 0 [expr {$max - 1}]]]            set banlist [lrange $banlist $max end]            incr count -$max         } else {            set mode [string repeat "b" $count]            set masks [join $banlist]            set count 0         }             incr counter 1             after [expr {$counter*4000}] [list  puthelp "MODE $chan -$mode $masks"]      }   }

Statistics: Posted by simo — Tue Jan 20, 2026 8:53 pm