home *** CD-ROM | disk | FTP | other *** search
/ The World of Computer Software / World_Of_Computer_Software-02-387-Vol-3of3.iso / f / funquiz.zip / FQLVL31.BAT < prev    next >
DOS Batch File  |  1993-02-03  |  2KB  |  73 lines
  1.  
  2. :THIS IS THE FQLVL31 BATCH FILE FOR MARA'S "FUNQUIZ"
  3.  
  4. @ECHO OFF
  5. :31A
  6. LOADSCRN HLTHCH1.SCR
  7. WAIT K 3
  8. LOADSCRN GPHLVL3.SCR
  9. POPWIN 4 9 22 13 RED WHI 2
  10. WRITE 9 11 RED WHI S UP YOU GO
  11. WAIT K 5
  12. LOADSCRN PL1.SCR
  13. TICWRITE T 25 7 WHI BLU HISTORY
  14. TICWRITE T 19 12 WHI BLU HOW MANY U.S. PRESIDENTS DIED ON JULY 4TH ?
  15. TICWRITE T 33 14 WHI BLU F1 THREE
  16. TICWRITE T 33 16 WHI BLU F2 NONE
  17. TICWRITE T 33 18 WHI BLU F3 ONE
  18. KEYPRESS F1 F2 F3
  19. IF ERRORLEVEL 3 GOTO W31A
  20. IF ERRORLEVEL 2 GOTO W31A
  21. IF ERRORLEVEL 1 GOTO R31A
  22. :W31A
  23. BEEPER W
  24. POPWIN 25 8 55 14 BLA RED 2
  25. WRITE 30 10 BLA RED C TROUBLE,
  26. WRITE 30 12 BLA RED C THAT'S WRONG.
  27. WAIT K 1
  28. FQLVL32.BAT
  29. :R31A
  30. BEEPER R
  31. POPWIN 25 8 55 14 BLA GRE 2
  32. WRITE 30 10 BLA GRE C OH YES
  33. WRITE 30 12 BLA GRE C YOU'RE GOOD.
  34. WAIT K 1
  35. GOTO 31B
  36. :31B
  37. LOADSCRN PL1.SCR
  38. TICWRITE T 25 7 WHI BLU SCIENCE
  39. TICWRITE T 19 12 WHI BLU DOGS BARK. WHAT DO CATTLE DO ?
  40. TICWRITE T 33 14 WHI BLU F1 CRY
  41. TICWRITE T 33 16 WHI BLU F2 BAY
  42. TICWRITE T 33 18 WHI BLU F3 LOW
  43. KEYPRESS F1 F2 F3
  44. IF ERRORLEVEL 3 GOTO R31B
  45. IF ERRORLEVEL 2 GOTO W31A
  46. IF ERRORLEVEL 1 GOTO W31A
  47. :R31B
  48. BEEPER R
  49. POPWIN 25 8 55 14 BLA GRE 2
  50. WRITE 30 10 BLA GRE C YOU'RE
  51. WRITE 30 12 BLA GRE C REALLY ROLLIN'
  52. WAIT K 1
  53. GOTO 31C
  54. :31C
  55. LOADSCRN PL1.SCR
  56. TICWRITE T 25 7 WHI BLU SPORTS
  57. TICWRITE T 19 12 WHI BLU URUGUAY WON THE FIRST SOCCER WORLD CUP IN..
  58. TICWRITE T 33 14 WHI BLU F1 1926
  59. TICWRITE T 33 16 WHI BLU F2 1930
  60. TICWRITE T 33 18 WHI BLU F3 1934
  61. KEYPRESS F1 F2 F3
  62. IF ERRORLEVEL 3 GOTO W31A
  63. IF ERRORLEVEL 2 GOTO R31C
  64. IF ERRORLEVEL 1 GOTO W31A
  65. :R31C
  66. BEEPER R
  67. POPWIN 25 8 55 14 BLA GRE 2
  68. WRITE 30 10 BLA GRE C YOU ARE
  69. WRITE 30 12 BLA GRE C ON YOUR WAY UP.
  70. WAIT K 2
  71. FQLVL41.BAT
  72.  
  73.