home *** CD-ROM | disk | FTP | other *** search
/ System Booster / System Booster.iso / Archives / Timing / UpTime17.lha / UpTime / scripts / SayUpTime < prev   
Encoding:
Text File  |  1993-09-23  |  815 b   |  32 lines
  1. ;
  2. ;   $VER: SayUpTime 1.0 (23.09.93)
  3. ;
  4. ;   Written 20. September 1993 by J.Matern
  5. ;   This file is part of the 'UpTime'-package © by Jürgen Matern.
  6. ;   The package may be redistributed under limitations discribed
  7. ;   in the file 'UpTime.doc' which should have come with this
  8. ;   distribution. Read this file for more information!
  9. ;
  10. ;   Last changed: 23. September 1993
  11. ;
  12. set LastBoot `date`
  13. if exists ENV:UpTime/LastBoot
  14.    set LastBoot `getenv UpTime/LastBoot`
  15. endif
  16. set LastTime 0
  17. if exists ENV:UpTime/UpTime
  18.    set LastTime `getenv UpTime/UpTime`
  19. endif
  20.  
  21. set hours `eval $LastTime / 60`
  22. set minutes `eval $LastTime - ($hours * 60)`
  23. set LastTime `echo SystemUpTime: $hours h $minutes min.`
  24.  
  25. set LastBoot `S:CutArg $LastBoot`
  26.  
  27. echo "    $LastBoot  $LastTime"
  28. unset hours
  29. unset minutes
  30. unset LastBoot
  31. unset LastTime
  32.