home *** CD-ROM | disk | FTP | other *** search
/ The World of Computer Software / World_Of_Computer_Software-02-385-Vol-1of3.iso / d / demos301.zip / SAMPLES.ZIP / EXAM05.CTL < prev    next >
Text File  |  1993-01-07  |  624b  |  28 lines
  1. /* EXAM05.CTL
  2. - *001 Main menu
  3. KEY A,(MOUSEL) CALL *002
  4. KEY B,(MOUSER) CALL @003
  5. KEY Q,(MOUSEB) QUIT
  6. /.
  7. Select an option:
  8.  
  9.    A. Display the current date and time          (left mouse button)
  10.    B. Do a directory of the default subdirectory (right mouse button)
  11.  
  12.    Q. Quit                                       (both buttons)
  13. ./
  14. - *002 Display the current date and time
  15. KEY (ANY) POP
  16. /.
  17. Current date:    ^EDATE^
  18. Current time:    ^ETIME^
  19. Elapsed time:    ^EETIME^
  20.  
  21. Press any key to return to the main menu
  22. ./
  23. - @003 Do a directory
  24. RUN DIR /W
  25. ECHO Press a key to return to the main menu
  26. PAUSE
  27. POP
  28.