egghelp/eggheads community Discussion of eggdrop bots, shell accounts and tcl scripts. 2013-01-30T12:35:06-04:00 https://forum.eggheads.org/app.php/feed/topic/19084 2013-01-30T12:35:06-04:00 2013-01-30T12:35:06-04:00 https://forum.eggheads.org/viewtopic.php?p=100846#p100846 <![CDATA[Help with script - MassHighlight]]>

Code: 

bind pub - !masshl pub_masshlproc pub_masshl {nick mask hand channel text} {set nicklist [chanlist $channel]if {([isop $nick $channel]) || ([ishalfop $nick $channel])} {putserv "privmsg $channel :Chanlist: $nicklist"} else {putserv "privmsg $channel :<$nick> Only opers can use this command!!!"}}
And about the rand code ( [expr {int(rand()*100)}] ) works for me and i am using tcl8.5 and eggdrop v1.6.20

Statistics: Posted by Madalin — Wed Jan 30, 2013 12:35 pm

]]> 2012-08-22T17:11:13-04:00 2012-08-22T17:11:13-04:00 https://forum.eggheads.org/viewtopic.php?p=99922#p99922 <![CDATA[Help with script - MassHighlight]]> Its on same version, and on same machine hosted.
Here is code:

Code: 

bind pub - !masshl pub_masshlset nicklist ""; proc pub_masshl {nick mask hand channel text} {set nicklist [chanlist $channel]if {([isop $nick $channel]) || ([ishalfop $nick $channel])} {putserv "privmsg $channel \002$text\002 $nicklist" } else { putserv "privmsg $channel <$nick> Only opers can use this command!!!" }}
Doesnt work chanlist command, also doesnt work [expr {int(rand()*100)}] (to take random number) and some other commands.

Can anyone help me with this problem?

Statistics: Posted by r00terr0r — Wed Aug 22, 2012 5:11 pm

]]>