home *** CD-ROM | disk | FTP | other *** search
/ Chip 1998 April / CHIP4_98.ISO / software / ccconrad / basic.exe / CHIP / Programme.Bas / Beispiele_2 / TIMEREAD.BAS < prev    next >
Encoding:
BASIC Source File  |  1997-06-17  |  459 b   |  28 lines
  1. '**************************************
  2. '
  3. ' C-Control/BASIC       TIMEREAD.BAS
  4. '
  5. ' Aufgabe:
  6. '
  7. ' - Auslesen der Echtzeituhr
  8. ' - Senden an den PC
  9. '
  10. '**************************************
  11. ' --- Definitionen --------------------
  12.  
  13. define Sekunde byte
  14.  
  15. ' --- Programmoperationen -------------
  16.  
  17. #Loop
  18.   print hour, minute, second
  19.   print day, month, year
  20.   #Loop2
  21.   if Sekunde = second then goto Loop2
  22.   Sekunde = second
  23. goto Loop
  24. end
  25.  
  26.  
  27.  
  28.