home *** CD-ROM | disk | FTP | other *** search
/ ProfitPress Mega CDROM2 …eeware (MSDOS)(1992)(Eng) / ProfitPress-MegaCDROM2.B6I / UTILITY / SYSTEM / GETTIME.ZIP / GETTIME.DOC < prev    next >
Encoding:
Text File  |  1990-12-10  |  1.5 KB  |  36 lines
  1.                    GETTIME.PAS
  2.             Dick Thiebaud 12/8/90
  3.  
  4.             GENIE E-mail R.THIEBAUD
  5.  
  6. GETTIME.PAS is a Turbo Pascal program which dials the U.S Naval
  7. Observatory, gets the current time of day, and sets the DOS time.
  8. On an AT, this also sets the real time clock.  I wrote this program
  9. mostly as a learning experience in implementing an interrupt-driven
  10. serial-communications unit in Turbo Pascal.  This program may be freely
  11. used, modified, or adapted as desired.
  12.  
  13. This program only works for a modem in which the DCD signals and the DTR
  14. signals follow the actual state these lines, and are not forced high.
  15. This is the same requirement as is needed for use of Aladdin.
  16.  
  17. The program includes a fairly general-purpose serial communications
  18. unit.  It also includes several other small utility units I used in
  19. building the program.
  20.  
  21. Comments and documentation in the source code are sparse, since this was
  22. mainly written for my own use.  I've tried to make the variable names
  23. and procedure names meaningful.
  24.  
  25. The program expects a parameter file named PARMFILE to be in the
  26. current directory.  This is an Ascii file containing four lines:
  27.  
  28.   1. the time zone, in hours from Greenwich Mean Time.
  29.   2. the communications port, 1 or 2.  (Port 3 or 4 are not supported;
  30.      but this could probably be added easily).
  31.   3. the modem reset command.
  32.   4. the modem dial command for the Naval Observatory.  The
  33.      phone number is 202-653-0351.
  34.  
  35. Execute the program SETPARM.EXE to create or modify the parameter file.
  36.