home *** CD-ROM | disk | FTP | other *** search
/ The Datafile PD-CD 4 / DATAFILE_PDCD4.iso / games2 / zip2000 / !Zip2000 / !Run < prev    next >
Text File  |  1996-01-26  |  2KB  |  58 lines
  1. Set Zip$Dir <Obey$Dir>
  2. IconSprites <Zip$Dir>.!Sprites
  3. Set File$Type_061 Z-Code1
  4. Set File$Type_062 Z-Code2
  5. Set File$Type_063 Z-Code3
  6. Set File$Type_064 Z-Code4
  7. Set File$Type_065 Z-Code5
  8. Set File$Type_066 Z-Code6
  9. Set File$Type_067 Z-Code7
  10. Set File$Type_068 Z-Code8
  11. Set File$Type_11A Z-Code
  12. Set Alias$@RunType_061 /<Zip$Dir> 
  13. Set Alias$@RunType_062 /<Zip$Dir> 
  14. Set Alias$@RunType_063 /<Zip$Dir> 
  15. Set Alias$@RunType_064 /<Zip$Dir> 
  16. Set Alias$@RunType_065 /<Zip$Dir> 
  17. Set Alias$@RunType_066 /<Zip$Dir> 
  18. Set Alias$@RunType_067 /<Zip$Dir> 
  19. Set Alias$@RunType_068 /<Zip$Dir> 
  20. Set Alias$@RunType_11A /<Zip$Dir> 
  21.  
  22. IF "%0"="" THEN Error To use Zip 2000, double-click on a story file
  23.  
  24. Set ZipSave$Path <Zip$Dir>.Resources.SavedGames.
  25. Set Zip$ChoicesFile <Zip$Dir>.Choices
  26.  
  27. Set System$Path_Message System resources cannot be found
  28.  
  29. RMEnsure Toolbox 1.36 RMLoad System:Modules.Toolbox.Toolbox
  30. RMEnsure Toolbox 1.36 Error You need Toolbox 1.36 or later to run Zip 2000
  31.  
  32. RMEnsure Window 1.30 RMLoad System:Modules.Toolbox.Window
  33. RMEnsure Window 1.30 Error You need Window Object 1.30 or later to run Zip 2000
  34.  
  35. RMEnsure Menu 0.23 RMLoad System:Modules.Toolbox.Menu
  36. RMEnsure Menu 0.23 Error You need Menu 0.23 or later to run Zip 2000
  37.  
  38. RMEnsure ProgInfo 0.09 RMLoad System:Modules.Toolbox.ProgInfo
  39. RMEnsure ProgInfo 0.09 Error You need ProgInfo 0.09 or later to run Zip 2000
  40.  
  41. RMEnsure Iconbar 1.11 RMLoad System:Modules.Toolbox.IconBar
  42. RMEnsure Iconbar 1.11 Error You need Iconbar 1.11 or later to run Zip 2000
  43.  
  44. RMEnsure FileInfo 0.14 RMLoad System:Modules.Toolbox.FileInfo
  45. RMEnsure FileInfo 0.14 Error You need FileInfo 0.14 or later to run Zip 2000
  46.  
  47. RMEnsure DCS 1.06 RMLoad System:Modules.Toolbox.DCS_Quit
  48. RMEnsure DCS 1.06 Error You need DCS Object 1.06 or later to run Zip 2000
  49.  
  50. RMEnsure SaveAs 0.11 RMLoad System:Modules.Toolbox.SaveAs
  51. RMEnsure SaveAs 0.11 Error You need SaveAs 0.11 or later to run Zip 2000
  52.  
  53. IF "<Font$Bold>"="" THEN Set Font$Bold "Bold Demi ExtraBold Ultra Heavy"
  54. IF "<Font$Italic>"="" THEN Set Font$Italic "Italic Oblique Slant"
  55.  
  56. WimpSlot 160k 160k
  57. Run <Zip$Dir>.!RunImage %*0
  58.