home *** CD-ROM | disk | FTP | other *** search
/ RISCWORLD 5 / RISCWORLD_VOL5.iso / SOFTWARE / Issue5 / GAMES / TANKS / !Tanks / !Run < prev    next >
Encoding:
Text File  |  2004-11-25  |  806 b   |  22 lines
  1. Set Tanks$Dir <Obey$Dir>
  2. Set File$Type_13D TankSave
  3. Set Alias$@RunType_13D run <Tanks$Dir>.!Run %%*0
  4. iconsprites <Tanks$Dir>.!Sprites
  5.  
  6. Set Tanks$FrameDir Ram::0.$.Frames
  7. |ChangeDynamicArea -RamFsSize 16384K
  8.  
  9. rmensure UtilityModule 3.10 error TANKS requires RISCOS 3.10 or later to run.
  10. if "<Tanks$Running>" = "TRUE" THEN error TANKS is already running
  11.  
  12. rmensure Toolbox        1.36 rmload System:Modules.Toolbox.Toolbox
  13. rmensure Window         1.30 rmload System:Modules.Toolbox.Window
  14. rmensure Menu           0.23 rmload System:Modules.Toolbox.Menu
  15. rmensure Iconbar        1.11 rmload System:Modules.Toolbox.Iconbar
  16. rmensure SaveAs         0.11 rmload System:Modules.Toolbox.SaveAs
  17.  
  18. |rmensure Dynamo 0.10 Run System:Modules.Dynamo
  19.  
  20. set Tanks$Parameters "%0"
  21. wimpslot -min 32k -max 32k
  22. run <Tanks$Dir>.Init