home *** CD-ROM | disk | FTP | other *** search
/ 3D Dinosaur Adventure / DINO16B14.iso / install1.scr < prev    next >
Encoding:
Text File  |  1994-02-28  |  1.3 KB  |  58 lines
  1. indestdir
  2. set _text insteng.txl
  3. err_handler %_text%\errhand.txt
  4. getOpt -T
  5. if %_err% eq 0
  6.     set _option "-T"
  7. endif
  8. rem determine which menu item to highlight
  9. set _next 0
  10. getOpt -N:
  11. if %_err% eq 0
  12.     set _next %_1%
  13. endif
  14. :loop
  15. textbox 1 1 80 25 blue
  16. color back blue
  17. type %_text%\cpyrght.txt 11 22 60 4
  18. color back cyan
  19. type %_text%\install.txt 3 2 77 6 -border
  20. menu %_text%\shell.mnu 20 11 40 7 %_text%\shell.tit %_text%\updown.leg -default %_next%
  21. switch %_1%
  22. case demo:
  23.     chain  -curoff d\setup.exe
  24. case escape:
  25.     textbox 1 1 80 25 black
  26. case quit:
  27.     textbox 1 1 80 25 black
  28. case readme:
  29.     set _next %_2%
  30.     goto doc_top
  31. case default:
  32.     chain  -curoff %_1%\install %_option% -N %_2%
  33. endswitch
  34. rem exit with status 99 to signal batch file to not rerun us.
  35. quit 99
  36. rem 
  37. rem readme menu
  38. :doc_top
  39. set _doctext dino3d\doceng.txl
  40. textbox 1 1 80 25 blue
  41. color back blue
  42. type %_doctext%\readme0.txt 5 18 70 7
  43. color back cyan
  44. menu %_doctext%\readme.mnu 15 3 50 12 %_doctext%\readme.tit %_doctext%\updown.leg -default %_line%
  45. set _choice "%_1%"
  46. switch %_choice%
  47. case default:
  48.     textbox 1 1 80 25 black
  49.     spawn dino3d\more.com dino3d\doc\readme%_choice%.txt
  50.     type %_doctext%\anykey.txt 1 25 80 1
  51.     waitkey_noesc
  52.     set _line %_choice%
  53.     goto doc_top
  54. case escape:
  55. case quit:
  56. endswitch
  57. goto loop
  58.