egghelp/eggheads community Discussion of eggdrop bots, shell accounts and tcl scripts. 2002-11-10T14:02:07-04:00 https://forum.eggheads.org/app.php/feed/topic/2990 2002-11-10T14:02:07-04:00 2002-11-10T14:02:07-04:00 https://forum.eggheads.org/viewtopic.php?p=12995#p12995 <![CDATA[timer prob]]>

Code: 

if {![botonchan #chan]} {return 0}
The bot is obviously not on channel on one of the timer runs - maybe you should set the timer again, then return.

Statistics: Posted by ppslim — Sun Nov 10, 2002 2:02 pm

]]> 2002-11-10T13:11:55-04:00 2002-11-10T13:11:55-04:00 https://forum.eggheads.org/viewtopic.php?p=12992#p12992 <![CDATA[timer prob]]>

Code: 

if {![info exists timecheckn]} { set timecheckn [timer 5 checkn] }proc checkn {} {global cycle_timeif {![botonchan #chan]} {return 0}set nusers [llength [chanlist #chan]]if {$nusers < 10} {if {$cycle_time == 360} {return 0}set cycle_time 360putlog "Cycle time set to \002360\002 seconds, \[$nusers users < 10\]"} elseif {$nusers < 40} {if {$cycle_time == 152} {return 0}set cycle_time 152putlog "Cycle time set to \002152\002 seconds, \[$nusers users < 40\]"} elseif {$nusers < 100} {if {$cycle_time == 97} {return 0}set cycle_time 97 putlog "Cycle time set to \00297\002 seconds, \[$nusers users < 100\]"} elseif {$nusers < 120} {if {$cycle_time == 87} {return 0}set cycle_time 87putlog "Cycle time set to \00287\002 seconds, \[$nusers users < 120\]"} elseif {$nusers < 150} {if {$cycle_time == 69} {return 0}set cycle_time 63putlog "Cycle time set to \00263\002 seconds, \[$nusers users < 150\]"} elseif {$nusers > 180} {if {$cycle_time == 63} {return 0}set cycle_time 63putlog "Cycle time set to \00263\002 seconds, \[$nusers users > 180\]" }set timecheckn [timer 5 checkn]}
Why does timer stops working after some time?
.tcl info exists timecheckn
[18:09] (Sentinel^) Tcl: 1
.tcl timers
[18:10] (Sentinel^) Tcl:

Statistics: Posted by Nexus6 — Sun Nov 10, 2002 1:11 pm

]]>