botlending forum  

Go Back   botlending forum > Eggdrop & TCL > Tcl scripting

Tcl scripting Tcl scripting related questions

Reply
 
LinkBack Thread Tools Display Modes
Old 08-08-2004, 02:12   #1 (permalink)
Junior Member
 
Join Date: Aug 2004
Location: Planeta Moldova
Age: 22
Posts: 9
Rep Power: 0
d0oM is an unknown quantity at this point
Default converting

cine are idee de proc ce va *transforma* (convert) minutele ce depasesc 60 in ore de tip format 01:00 , relativ 120 -> 02:00 etc...
__________________
empty
d0oM is offline   Reply With Quote
Old 08-08-2004, 02:39   #2 (permalink)
Administrator

aka aqwzsx
 
Join Date: Jun 2004
Posts: 827
Blog Entries: 126
Rep Power: 3
UniversaliA is on a distinguished road
Default

# -------------------------
# www.bot.net.ru (c) DlMA
# -------------------------

Code:
proc stime2 {t} {
   if {![isnumber $t]} {return "??time??"}
   if {$t<0} {return "?? seconds"}
   if {$t<60} {return "$t seconds"}
   if {$t<3600} {return [format "%02d minutes %02d seconds" [expr $t/60] [expr $t%60]]}
   if {$t<3600*24} {return [format "%02d hours %02d minutes" [expr $t/(60*60)] [expr ($t/60)%60]]}
   if {$t<3600*24*100} {return [format "%02d days %02d hours" [expr $t/(3600*24)] [expr ($t/3600)%24]]}
   return [format "%d days" [expr $t/(60*60*24)]]
}
tu asta ai in botii xairo
UniversaliA is offline   Reply With Quote
Reply

Bookmarks


Currently Active Users Viewing This Thread: 1 (0 members and 1 guests)
 
Thread Tools
Display Modes

Posting Rules
You may not post new threads
You may not post replies
You may not post attachments
You may not edit your posts

BB code is On
Smilies are On
[IMG] code is On
HTML code is Off
Trackbacks are On
Pingbacks are On
Refbacks are On
Forum Jump


All times are GMT +3. The time now is 07:27.


Powered by vBulletin® Version 3.7.3
Copyright ©2000 - 2009, Jelsoft Enterprises Ltd.