home *** CD-ROM | disk | FTP | other *** search
/ Acorn User 4 / AUCD4.iso / _aacade / website / pd / supersnake / !Snake / !Run < prev    next >
Text File  |  1995-11-04  |  1KB  |  26 lines
  1. | RISC OS Loader for !Snake
  2. | Written by Paul Vigay (C) 1993
  3. |
  4. If "<System$Path>" = "" then Error 0 System resources have not been seen yet.
  5.  
  6. RMEnsure FPEmulator 2.70 RMLoad System:modules.FPEmulator
  7. RMEnsure FPEmulator 2.70 Error !Snake needs FPEmulator 2.70 or later in your !System.modules directory.
  8. RMEnsure ABCLibrary 2.00 RMLoad System:modules.ABCLib
  9. RMEnsure ABCLibrary 2.00 Error !Snake needs ABCLibrary 2.00 or later in your !System.modules directory.
  10.  
  11. Set Snake$Path <obey$dir>
  12. IconSprites <Snake$Path>.!Sprites
  13. | Load sound samples
  14. RMEnsure Pop 0.00 RMLoad <Snake$Path>.Samples.Pop
  15. RMEnsure Slide 0.00 RMLoad <Snake$Path>.Samples.Slide
  16. RMEnsure WarbDoing 0.00 RMLoad <Snake$Path>.Samples.WarbDoing
  17. RMEnsure Whoosh1 0.00 RMLoad <Snake$Path>.Samples.Whoosh1
  18. RMEnsure CryPiano 0.00 RMLoad <Snake$Path>.Samples.CryPiano
  19. RMEnsure Munch 0.00 RMLoad <Snake$Path>.Samples.Munch
  20.  
  21. | OK, so now check to see if we are running on a RISC PC
  22. Set Snake$RiscPC Yes
  23. RMEnsure UtilityModule 3.5 Set Snake$RiscPC No
  24. WimpSlot -min 448k -max 448k
  25. Run "<Snake$Path>.!RunImage" %*0
  26.