home *** CD-ROM | disk | FTP | other *** search
/ ARM Club 3 / TheARMClub_PDCD3.iso / hensa / recreation / frotz_2 / !Frotz / !Run < prev    next >
Text File  |  1997-10-06  |  2KB  |  52 lines
  1. | !Run file for !Frotz 1.28ß
  2. | © Musus Umbra, 1996/7
  3.  
  4.  
  5. %run <obey$dir>.resources.smarticons <obey$dir>.!Sprites
  6.  
  7. set file$type_11a Z-Code
  8. set file$type_5ce Z-Save
  9. set file$type_5cd Z-Recrd
  10. set file$type_5cc Z-AUX
  11. set alias$@runtype_11a /<obey$dir>.!Run %%*0
  12. set alias$@runtype_5ce error You must be playing a game to load a savefile!|m||
  13. set alias$@runtype_5cd error You must be playing a game to use a record file!|m||
  14. set alias$@runtype_5cc error You must be playing a game to load one of its auxiliary files|m||
  15.  
  16. set Frotz$Dir <obey$dir>
  17. set Frotz$Path <obey$dir>.
  18. set FrotzRes$Dir <obey$dir>.Resources
  19.  
  20. | Altering the next line allows you to specify the path that Frotz will
  21. | look for sound samples on (see the help file for for info).
  22. | By default, this is Frotz:Sounds (and any changes should also include
  23. | this directory).  When Frotz loads the game, it sets Frotz$GameDir to the
  24. | pathname of the directory containing the storyfile.
  25. setMacro FrotzSnd$Path <Frotz$Path>Sounds.,<Frotz$GameDir>.Sounds.
  26.  
  27. rmensure ZapRedraw 0.30 rmload FrotzRes:ZapRedraw
  28. rmensure ZapRedraw 0.30 error Frotz needs ZapRedraw 0.30 or later!
  29.  
  30. set Frotz$OS3 yes
  31. rmensure UtilityModule 3.00 set Frotz$OS3 no
  32. rmensure DataVox 3.65 rmload FrotzRes:DataVox
  33. rmensure DataVox 3.65 error Frotz needs DataVox 3.65 or later!
  34.  
  35. if "<frotz$os3>" = "no" AND "<system$path>" = "" then error Please locate a copy of !System and try again
  36.  
  37. if "<frotz$os3>" = "no" Then %print FrotzRes:OS2chars
  38.  
  39. rmensure SharedCLibrary 3.75 rmload System:Modules.Clib
  40. rmensure SharedCLibrary 3.75 error Frotz needs Clib 3.75 or later
  41. rmensure FPEmulator 2.80 rmload System:Modules.FPEmulator
  42. rmensure FPEmulator 2.80 error Frotz needs FPEmulator 3.75 or later
  43. rmensure Colourtrans 0.52 error Frotz needs ColourTrans 0.52 or later
  44.  
  45.  
  46. unset frotz$os3
  47.  
  48. | if "%*0" <> "" then wimpslot -min 512K -max 512K
  49. | if "%*0" = "" then wimpslot -min 256K -max 256K
  50.  
  51. wimpslot -min 256K -max 256K
  52. /Frotz:!RunImage %*0