This is the new home of the egghelp.org community forum.
All data has been migrated (including user logins/passwords) to a new phpBB version.
For more information, see this announcement post. Click the X in the top right-corner of this box to dismiss this message.
Help for those learning Tcl or writing their own scripts.
-
stalix
- Voice
- Posts: 23
- Joined: Tue Sep 13, 2005 6:06 pm
Post
by stalix »
set date "October 22 14:00:00 2000"
set msj "have passed with McLaren being losers"
bind pub - !mcloser pub:mcloser
proc pub:mcloser {nick uhost hand chan text} {
global date msj
set dur [expr [clock scan $date]-[clock seconds]]
putquick "PRIVMSG $chan : [duration $dur] $msj"
}
<bot> 0 seconds have passed with McLaren being losers
How can fix them? THANKS!
-
Sir_Fz
- Revered One
- Posts: 3794
- Joined: Sun Apr 27, 2003 3:10 pm
- Location: Lebanon
-
Contact:
Post
by Sir_Fz »
[clock seconds] is recent while $date is very old, so you're doing it vise-versa. Replace
Code: Select all
set dur [expr [clock scan $date]-[clock seconds]]
with
Code: Select all
set dur [expr {[clock seconds] - [clock scan $date]}]