egghelp/eggheads community

Ignore certain nicks (random reply script)

2013-02-18T07:59:30-04:00

Replace

foreach n $temp(ignore) { if {[string tolower $nick] == [string tolower $n]} { return } }

with

if {[lsearch -nocase $temp(ignore) $nick]} return

or using my version

foreach n $temp(ignore) { if {[string match -nocase $nick $n]} { break } }

This last version is better than the first i made (now its using string match and break) the secod is caesar idea

Statistics: Posted by Madalin — Mon Feb 18, 2013 7:59 am

Ignore certain nicks (random reply script)

2013-02-18T07:35:44-04:00

Replace the foreach line with the one I mentioned?

Statistics: Posted by caesar — Mon Feb 18, 2013 7:35 am

Ignore certain nicks (random reply script)

2013-02-18T05:27:50-04:00

So how would the script look like if you add this fix?

Statistics: Posted by x0x — Mon Feb 18, 2013 5:27 am

Ignore certain nicks (random reply script)

2013-02-18T05:20:17-04:00

There no need to loop inside a list when you have list functions specially made for this kind of operations like lsearch that will "see if a list contains a particular element".

Also, to end a loop you should use break not return. There's no need for two transformations of strings in to lower format if you would have used string match -nocase for instance.

Anyway, the best option would have been a lsearch -nocase like this:

Code:

if {[lsearch -nocase $temp(ignore) $nick]} return

instead of the foreach line.

Statistics: Posted by caesar — Mon Feb 18, 2013 5:20 am

Ignore certain nicks (random reply script)

2013-02-16T09:12:58-04:00

Works great! Thank you!

Statistics: Posted by x0x — Sat Feb 16, 2013 9:12 am

Ignore certain nicks (random reply script)

2013-02-16T09:00:04-04:00

Try this

Code:

bind pubm - *word* pub_randomset temp(ignore) {"nick1""nick2"}proc pub_random {nick mask hand channel args} {global randommessage tempforeach n $temp(ignore) { if {[string tolower $nick] == [string tolower $n]} { return } }putquick "PRIVMSG $channel :[lindex $randommessage [rand [llength $randommessage]]]"}set randommessage {"Message 1""Message 2""Message 3"}putlog "Random Reply Script Loaded"

Statistics: Posted by Madalin — Sat Feb 16, 2013 9:00 am

Ignore certain nicks (random reply script)

2013-02-16T08:49:15-04:00

This script replies to certain words (wildcard) with a random message. I would like to have it ignore a couple of nicknames tho. How to add this?

Code:

bind pubm - *word* pub_randomproc pub_random {nick mask hand channel args} {   global randommessage   putquick "PRIVMSG $channel :[lindex $randommessage [rand [llength $randommessage]]]"   }set randommessage {"Message 1""Message 2""Message 3"}putlog "Random Reply Script Loaded"

Statistics: Posted by x0x — Sat Feb 16, 2013 8:49 am