egghelp/eggheads community Discussion of eggdrop bots, shell accounts and tcl scripts. 2003-11-17T14:06:40-04:00 https://forum.eggheads.org/app.php/feed/topic/6093 2003-11-17T14:06:40-04:00 2003-11-17T14:06:40-04:00 https://forum.eggheads.org/viewtopic.php?p=30192#p30192 <![CDATA[Re: idleking]]>
is it posible to make so that you can see the idle record of all time?
Of course, but using the code you provided as a "base" would not bring you any closer to the goal except from a few of the basics of fetching the idle time from eggdrop's internal chanlist.
For a script to store the highest idle time you'll have to check the idle time of anyone quitting/parting the channel against the record and check every user currently on the channel when someone types the !idleking trigger.

Statistics: Posted by user — Mon Nov 17, 2003 2:06 pm

]]> 2003-11-13T11:50:20-04:00 2003-11-13T11:50:20-04:00 https://forum.eggheads.org/viewtopic.php?p=29945#p29945 <![CDATA[idleking]]> i have a script that show the leading idle time.
my question, is it posible to make so that you can see the idle record of all time?
ex.
<nick1>!idleking
<bot><nick7> once watched porn movies for 1634 minutes and that is the alltime record.

this is the script atm
###############################################
#
# Idletime
#
# Originally named "Idle des jeunes" in French, which is funny as hell.
#
# modify by alex
###############################################


bind pub - !idle idle_getnick


proc idle_getnick {nick mask hand chan args} {
global botnick

if {$args == "" || $args == "{}" || ![info exists args]} {
set idle_max_idle "0"
set idle_max_idle_nick "Q"
foreach mec [chanlist $chan] {
set idle_idle [getchanidle $mec $chan]
if {$idle_idle > $idle_max_idle && $mec != $botnick} {set idle_max_idle $idle_idle ; set idle_max_idle_nick $mec}
}
putchan $chan "$idle_max_idle_nick, has been watching porn movies for $idle_max_idle minutes and is the current record holder. aka The_PornKing"
} else {
if {$args == $botnick} {
putchan $chan "Idle for about... 3 days, but I've been sleeping a lot."
return 71
}
if {[string toupper $args] == [string toupper $nick]} {
putchan $chan "Ahah. Verry funny."
return 72
}
if {![onchan $args $chan]} {
regsub "{" $args "" args
regsub "}" $args "" args
putchan $chan "$args last spoke on March 1986 ;)"
return 73
}
set idle [getchanidle $args $chan]
if {$idle == 0} {
putchan $chan "Errrr... $args *just* talked right now :/"
} else {
putchan $chan "$args has been idle for $idle minutes :/"
}
}
}

Statistics: Posted by Alexander — Thu Nov 13, 2003 11:50 am

]]>