egghelp/eggheads community

Checkchan (need help displaying Elapsed Time)

2004-12-14T21:51:24-04:00

tnxie

Statistics: Posted by dotslasher — Tue Dec 14, 2004 9:51 pm

Checkchan (need help displaying Elapsed Time)

2004-12-14T21:35:02-04:00

do u guys know how to calculate the elapsed time?

Code:

expr {$now-$then}

Statistics: Posted by user — Tue Dec 14, 2004 9:35 pm

Checkchan (need help displaying Elapsed Time)

2004-12-14T21:24:56-04:00

well i was trying to find a way to calculate the elapsed time, and aparantly that aint the way :p.

do u guys know how to calculate the elapsed time?

Statistics: Posted by dotslasher — Tue Dec 14, 2004 9:24 pm

Checkchan (need help displaying Elapsed Time)

2004-12-14T21:12:28-04:00

Type:

.tcl set errorInfo

In DCC and check which line is causing the problem. Probobaly your conversion of unixtime number into the gmt, est format. Try using clock, seconds along with format.

Nope. He already located the line causing the problem and it's not even remotely related to what you just said. The error message is pretty unambigous.

Statistics: Posted by user — Tue Dec 14, 2004 9:12 pm

Checkchan (need help displaying Elapsed Time)

2004-12-14T21:07:17-04:00

Type:

.tcl set errorInfo

In DCC and check which line is causing the problem. Probobaly your conversion of unixtime number into the gmt, est format. Try using clock, seconds along with format.

Statistics: Posted by awyeah — Tue Dec 14, 2004 9:07 pm

Checkchan (need help displaying Elapsed Time)

2004-12-14T20:55:16-04:00

what are you trying to "incr"? and what exactly are you trying to do?

Statistics: Posted by user — Tue Dec 14, 2004 8:55 pm

Checkchan (need help displaying Elapsed Time)

2004-12-14T20:53:26-04:00

Code:

# Time elapsed to expire each entry, in seconds. If the nick left more than# $dun_rejoin(time) it is assumed he/she is not going back and forthset dun_rejoin(time) 1200# This will hold the info : host time_of_parting old_nick channel_partedset dun_rejoin(nicks) ""bind join - * dun:rejoin:checkproc dun:rejoin:check {nick uhost hand channel} {    global dun_rejoin# Check if the nick joined a channel of interest    set found ""    set chans [string tolower $dun_rejoin(chans)]    if {$chans == "*"} {set chans [string tolower [channels]]}    foreach j $chans {        if {[string tolower $channel] == $j} {            set found $j            break        }    }    if {$found == ""} {return 0}# Check if the host has been seen already    set found -1    set host  [lindex [split $uhost "@"] 1]    for {set j 0} {$j < [llength $dun_rejoin(nicks)]} {incr j 4} {        if {$host == [lindex $dun_rejoin(nicks) $j] && [string tolower $channel] == [lindex $dun_rejoin(nicks) [expr $j+3]]} {set found $j}    }    if {$found == -1} {        dun:rejoin:clean        return 0    } else {        set previous [lindex $dun_rejoin(nicks) [expr $found+1]]        set poopie [incr [expr $dun_rejoin(time)+[unixtime]] -$previous]        if {$previous > [expr $dun_rejoin(time)+[unixtime]] || $nick == [lindex $dun_rejoin(nicks) [expr $found+2]]} {            dun:rejoin:clean            return 0        } else {            puthelp "WALLCHOPS #darth :\00304$nick\003 ($uhost) rejoined $channel $poopie seconds ago Old Nick was: \00303[lindex $dun_rejoin(nicks) [expr $found+2]]"    dun:rejoin:clean    return 0}    }}

i'm trying to get the elapsed time to display in the msg that my eggdrop sends to the ops (wallchops). i know i'm doing sumt wrong but cant figure out what --> current error i'm getting when trying to put in the $poopie variable --> [Beholder]: [19:45] Tcl error [dun:rejoin:check]: can't read "1103072701": no such variable.

and the problem lies in this code

Code:

set poopie [incr [expr $dun_rejoin(time)+[unixtime]] -$previous]

for sure any hints?

Statistics: Posted by dotslasher — Tue Dec 14, 2004 8:53 pm