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 / EXAM06.CTL < prev    next >
Text File  |  1993-01-07  |  586b  |  32 lines
  1. /* EXAM06.CTL
  2. - *001 Main menu
  3. SET CURSOR ^C2=>
  4. KEY (UP) FIELD -1
  5. KEY (DOWN) FIELD 1
  6. KEY A,@1 CALL *002
  7. KEY B,@2 CALL @003
  8. KEY Q,@3 QUIT
  9. /.
  10. Select an option:
  11.  
  12.       ^K   A. Display the current date and time
  13.       ^K   B. Do a directory of the default subdirectory
  14.  
  15.       ^K   Q. Quit
  16. ./
  17. - *002 Display the current date and time
  18. KEY (ANY) POP
  19. /.
  20. Current date:    ^EDATE^
  21. Current time:    ^ETIME^
  22. Elapsed time:    ^EETIME^
  23.  
  24. Press any key to return to the main menu
  25. ./
  26. - @003 Do a directory
  27. RUN DIR /W
  28. ECHO Press a key to return to the main menu
  29. PAUSE
  30. POP
  31.  
  32.