egghelp/eggheads community

Timer problem

2006-06-16T11:23:03-04:00

OK, I added the line "foreach chan [channels]" and it works now. Annoying that every variable is deleted by invoking another proc.

Statistics: Posted by darton — Fri Jun 16, 2006 11:23 am

Timer problem

2006-06-16T11:10:36-04:00

This here does not work.

Code:

set votefile "scripts/vote.txt"if {![file exists $votefile]} {catch {close [open $votefile w]}}setudef flag votebind pub - !vote votescriptproc votescript {nick uhost hand chan arg} { global votefile  channel set $chan +vote  putquick "PRIVMSG $chan :Vote initiated by $nick: $arg Type !poll yes and !poll no"      utimer 60 do:vote}proc do:vote {} {  channel set $chan -vote   set fp [open $votefile "r"]    set data [read -nonewline $fp]   close $fp    set lines [split $data "\n"]    set num 0   set randline [lindex $lines $num]    set yes [lindex $randline 0]   set no [lindex $randline 1]  putquick "PRIVMSG $chan :Voting period over. Results: Yes: $yes, No: $no"  set fd [open $::votefile r+]   while {![eof $fd]} {      lappend list [gets $fd]   }   set list [lreplace $list 0 0 [list 0 0]]   seek $fd 0   puts -nonewline $fd [join $list \n]   close $fd  }

Tcl error in script for 'timer182':
can't read "chan": no such variable

Statistics: Posted by darton — Fri Jun 16, 2006 11:10 am

Timer problem

2006-06-16T09:36:16-04:00

How can I invoke another proc after a special time?

timer, utimer (provided by eggdrop) or after (native tcl command)

Statistics: Posted by user — Fri Jun 16, 2006 9:36 am

Timer problem

2006-06-16T09:24:03-04:00

How can I invoke another proc after a special time?

Statistics: Posted by darton — Fri Jun 16, 2006 9:24 am

Timer problem

2006-06-16T01:13:38-04:00

proc's are not to be put to sleep by timer; you should get your proc chores done as soon as possible and relinquish control to eggdrop, thus conforming to its event-driven I/O model

what you need to do is usually done by registering a timer which will invoke the specified proc after a short period of time

Statistics: Posted by demond — Fri Jun 16, 2006 1:13 am

Timer problem

2006-06-15T15:07:59-04:00

Hello!
I began to make a vote script. So maybe you can help me with a timer. In the following code I marked the line where I want to insert a timer.

Code:

set votefile "scripts/vote.txt"if {![file exists $votefile]} {catch {close [open $votefile w]}}setudef flag votebind pub - !vote votescriptproc votescript {nick uhost hand chan arg} { global votefile  channel set $chan +vote  putquick "PRIVMSG $chan :Vote initiated by $nick: $arg Type !poll yes and !poll no"  ####Here a timer must be inserted. After 1 minute the bot should continue with the rest of this script.  channel set $chan -vote   set fp [open $votefile "r"]    set data [read -nonewline $fp]   close $fp    set lines [split $data "\n"]    set num 0   set randline [lindex $lines $num]    set yes [lindex $randline 0]   set no [lindex $randline 1]  putquick "PRIVMSG $chan :Voting period over. Results: Yes: $yes, No: $no"  set fd [open $::votefile r+]   while {![eof $fd]} {      lappend list [gets $fd]   }   set list [lreplace $list 0 0 [list 0 0]]   seek $fd 0   puts -nonewline $fd [join $list \n]   close $fd  }

Statistics: Posted by darton — Thu Jun 15, 2006 3:07 pm