home *** CD-ROM | disk | FTP | other *** search
/ Science & Nature: Materials / Acorn_YITM_ScienceAndNature2_Materials.iso / _sci2 / _run < prev    next >
Text File  |  1996-05-02  |  1KB  |  43 lines
  1. |
  2. | Runfile for Science II - Materials
  3. | ⌐ 1994 Interactive Learning Productions
  4. |
  5. |
  6. | Fire up ARMovie if necessary.
  7. |
  8.  
  9. if "<Sci2$Running>" <> "" Then Error Science II is already running.
  10. set Sci2$Dir <Obey$Dir>
  11.  
  12. | wimpslot -min 8k -max 8k
  13. Set Sci2$OldARMovie <ARMovie$Dir>
  14.  
  15. wimpslot -min 896k -max 896k
  16.  
  17. set Sci2$Path <Sci2$Dir>.
  18. |set Sci2$Data scsi::Minster.$.Sci2
  19. set Sci2$Data <Sci2$Dir>.^
  20. set Sci2$GData <Sci2$Data>.D.data
  21. set Sci2Overview$Dir <Sci2$Data>.D.OVERVIEW
  22.  
  23. |set Sci2$Debug 0
  24. |set Sci2$Trace 1
  25.  
  26. set Sci2Help$Dir <Sci2$Data>.D.HELP
  27. |set ARLib$Options R
  28. set ARTools$Options R
  29.  
  30. | Run the intro video
  31. Set ILPIntroData$Dir <Sci2$Data>.D.data
  32. Set ILPIntro$Dir <Sci2$Dir>.!ILPINTRO
  33. wimpslot -min 128k -max 128k
  34. Run <Sci2$Dir>.!ILPINTRO.!Run
  35.  
  36. | Force the EuclidX module, even if old version exists
  37. rmensure Euclid 1.05 <Sci2$Dir>.rm.EuclidX
  38. |rmensure Euclid 1.05 error Can't find the EuclidX module.
  39. set Sci2$Running 1
  40. |wimpslot -min 416k -max 416k
  41. wimpslot -min 480k -max 480k
  42. run <Sci2$Dir>.!RunImage
  43.