Ok, where is my putmode

tradergt · Post by **tradergt** » Thu Sep 12, 2002 11:48 am

I thought there was a command putmode for tcl. I am writing a script to unban when the banlist is full, but putserv writes each unban sperately.. how can I get eggie to stack the mode? or and why does it say putmode is not an available command?

Thanks

eiSiQ · Post by **eiSiQ** » Thu Sep 12, 2002 11:51 am

try pushmode

ppslim · Post by **ppslim** » Thu Sep 12, 2002 1:41 pm

That, or create your own stacking system.

First, populate a list with a ban masks to be removed (in this case, it's $i)

Code: Select all

set b2 {}
foreach b1 $l {
  lappend b2 $b1
  if {[llength $b2] == 4} {
    putserv "MODE $channel -bbbb [join $b2]"
    set b2 {}
  }
}
if {[llength $b2]} { putserv "MODE $chan -[string repeat b [llength $b2]] [join $b2]" }

tradergt · Post by **tradergt** » Thu Sep 12, 2002 2:07 pm

Ok, sue me, I was up till 4 am messing with the script and got putkick and pushmode all tangled.. lol

Thanks guys

:oops: