home *** CD-ROM | disk | FTP | other *** search
/ CD Shareware Masterblend / cdsharewaremasterblend.iso / multi1 / example3.bat < prev    next >
DOS Batch File  |  1992-09-30  |  689b  |  33 lines
  1. @echo off
  2. : QUESTION EXAMPLE 
  3.  
  4. show jupiter.gif
  5. gtext "How long does Jupiter take" 1 5 16 180 260
  6. gtext "to revolve around the Sun ?" 2 5 16 180 260
  7. gtext "1 - 1 year" 5 21 14 200 260
  8. gtext "2 - Almost 6 years" 6 21 14 200 260
  9. gtext "3 - Almost 12 years" 7 21 14 200 260
  10. gtext "4 - 22 years" 8 21 14 200 260
  11. gtext "Please enter 1-4 ?" 9 21 16 180 260
  12.  
  13. KEY 1234
  14. IF ERRORLEVEL 4 GOTO NO
  15. IF ERRORLEVEL 3 GOTO YES
  16. IF ERRORLEVEL 2 GOTO NO
  17. IF ERRORLEVEL 1 GOTO NO
  18.  
  19. :YES
  20. gtext "3 - Almost 12 years" 7 21 14 100 260
  21. gtext "EXCELLENT" 11 21 16 100 260
  22. SAY EXCELLENT
  23. DELAY
  24. SONG2
  25. SCROLL UP
  26. GOTO EXIT:
  27.  
  28. :NO
  29. gtext "ALMOST" 11 21 16 200 260
  30. SAY ALMOST
  31. SCROLL DOWN
  32.  
  33. :EXIT