A "drawing by lots" bot?

[eiSiQ]

Hi There!

I want to code such a bot.

I need a thing before I can start:

How can i randomly pick one out of the Nicklist and give him 30 seconds of time to say anything?

How to do that?

Thanks for your help!

[Papillon]

well.... all u have to do is to use "foreach u [chanlist #channel]" to find all the nicks in the channel, then use "rand" to pick one of them. after that u just have to activate a utimer which will be canceled if the nick responds in time... 30 secs

[eiSiQ]

ah ok, thx!

can you give me a link to a documentation, where to read all those things?

thx!

[Papillon]

http://www.egghelp.org/enhance.htm#tclscripts

that's a good place to start
also read the tcl-commands.doc in your eggdrop's "doc-dir" it has alot of commands u might find useful

[eiSiQ]

thanks!

i'll have a look there!

[ppslim]

Code: Select all

set rnick [lindex [chanlist #channel] [expr [rand [llength [chanlist #channel]]] - 1]]

That will get you a random nickname.

[stdragon]

Code: Select all

set rnick [lindex [chanlist #channel] [expr [rand [llength [chanlist #channel]]] - 1]]

He probably doesn't want to pick the bot's nick. Also you don't need the -1 since rand n returns 0 to n-1.

Code: Select all

set nicks [lrange [chanlist #chan] 1 end]
set len [llength $nicks]
set randnick [lindex $nicks [rand $len]]

This assumes that the bot's nick is the first in the list. I don't think that's a documented feature but it generally works out.

Now to do your second part, giving him 30 seconds to say something, you have to use a pubm bind and a utimer. Check tcl-commands.doc for more information. If you want t ocatch actions too (like /me says hi), then use a ctcp bind.

[eiSiQ]

oh thx!

can you tell me more about that ctcp bind?

because I don't know much about tcl programming.

oh and btw. the nicklist is sorted in alphabetically order, so the bot nick isn't the first in the list, but thanks anyway!