egghelp/eggheads community Discussion of eggdrop bots, shell accounts and tcl scripts. 2013-05-16T10:16:31-04:00 https://forum.eggheads.org/app.php/feed/topic/18957 2012-05-03T00:52:44-04:00 2012-05-03T00:52:44-04:00 https://forum.eggheads.org/viewtopic.php?p=99325#p99325 <![CDATA[mass hl/slap script]]>

Code: 

proc massslap {nick uhost hand chan text args} {# dump only 25 nicks per lineset chanList [chanlist $chan]while {[llength $chanList] != 0} {puthelp "PRIVMSG $chan :[join [lrange $chanList 0 25]]"set chanList [lrange $chanList 25 end]}}
Right now it's set to dump 25 nicks per line, adjust it to your needs.

Oh, and you don't need:

Code: 

set lista "${lista} $userraw"
use lappend instead.

If you want to remove the bot from the list then add this:

Code: 

set pos [lsearch $chanList $::botnick]set chanList [lreplace $chanList $pos $pos]
before the while loop.

Statistics: Posted by caesar — Thu May 03, 2012 12:52 am

]]> 2013-05-16T10:16:31-04:00 2012-05-02T14:00:13-04:00 https://forum.eggheads.org/viewtopic.php?p=99320#p99320 <![CDATA[mass hl/slap script]]> Statistics: Posted by elbandido — Wed May 02, 2012 2:00 pm

]]>