egghelp/eggheads community

help tcl script

2005-02-16T02:02:13-04:00

http://www.tcl.tk/man/tcl8.4/TclCmd/global.htm
read and think about your code again.

Statistics: Posted by De Kus — Wed Feb 16, 2005 2:02 am

help tcl script

2005-02-14T09:04:06-04:00

i write like what u say [De Kus} but the bot can executing another command. the bot stuck.
i wrote like this

proc mx_timer_ask {} {
global botnick quizconf
global Timer
switch $qcounter {
1 {set x_ask $botnick {} {} $quizconf(quizchannel) {} }
2 {set Timer [utimer 10 Question] }
}
if { [incr qcounter] > 2 } { set qcounter 1 }

please give me another way . cos i'm new in this n i want learn but i dont know how to do
for clue i want rotate this 2 script
n please write with the proc
cos i dunno what must i write.
thanks.

Statistics: Posted by tahu — Mon Feb 14, 2005 9:04 am

help tcl script

2005-02-12T21:42:21-04:00

maybe he wants to rotate like this?

Code:

switch $qcounter {  1 {set x_ask $botnick {} {} $quizconf(quizchannel) {} }  2 {set Timer [utimer 10 Question] }}if { [incr qcounter] > 2 } { set qcounter 1 }

alternativly he can use [set qcounter [rand 2]] or something like this for randomize @_o.

PS: this is my last guess without detailed explainations ^^

Statistics: Posted by De Kus — Sat Feb 12, 2005 9:42 pm

help tcl script

2005-02-12T14:42:22-04:00

u mean the u timer should be random ??

try this

Code:

utimer [rand 20] ...

Statistics: Posted by Ofloo — Sat Feb 12, 2005 2:42 pm

help tcl script

2005-02-12T14:06:39-04:00

I dunno bout you guys but I am still confused by their Question.. Tahu Please explain properly..

Statistics: Posted by ^DooM^ — Sat Feb 12, 2005 2:06 pm

help tcl script

2005-02-12T14:02:30-04:00

-set x_ask $botnick {} {} $quizconf(quizchannel) {}
-set Timer [utimer 10 Question]

i mean first round set x_ask
and the second round set timer
something like that.
thanks.

Statistics: Posted by tahu — Sat Feb 12, 2005 2:02 pm

help tcl script

2005-02-12T13:25:20-04:00

in case you want to get a random element from a list you should read:
http://www.tcl.tk/man/tcl8.4/TclCmd/lindex.htm
and
DOC/TCL-COMMANDS section "rand"

I didn't say RTFM, did I?

Statistics: Posted by De Kus — Sat Feb 12, 2005 1:25 pm

help tcl script

2005-02-12T00:56:21-04:00

Randomize what exactly? All this code ever does is adding a timer that is executing another proc (Question) 10sec later.

Statistics: Posted by greenbear — Sat Feb 12, 2005 12:56 am

help tcl script

2005-02-11T23:03:05-04:00

proc g_timer_ask {} {
global botnick quizconf
global Answers AllAnswered RoundOver NumAnswered AnswerCount QuestionTimer
set x_ask $botnick {} {} $quizconf(quizchannel) {}
set Timer [utimer 10 Question]

}

i want to random this but i dont know how to do
plz help me!

Statistics: Posted by tahu — Fri Feb 11, 2005 11:03 pm