home *** CD-ROM | disk | FTP | other *** search
/ Acorn User 1 / AU_CD1.iso / demos / a_to_i / betsi / _betsi / _run next >
Text File  |  1994-05-18  |  2KB  |  64 lines
  1. | !Betsi
  2. | Version 1.00
  3. |
  4. Set UseBetsi1 0
  5. If "<Obey$Dir>" = "ADFS::Betsi2.$.!Betsi" Then Set UseBetsi1 1
  6. If "<Obey$Dir>" = "adfs::Betsi2.$.!Betsi" Then Set UseBetsi1 1
  7. If "<Obey$Dir>" = "ADFS::Betsi3.$.!Betsi" Then Set UseBetsi1 1
  8. If "<Obey$Dir>" = "adfs::Betsi3.$.!Betsi" Then Set UseBetsi1 1
  9. If "<UseBetsi1>" = "1" Then Set Betsi$Dir ADFS::Betsi1.!Betsi Else Set Betsi$Dir <Obey$Dir>
  10. Unset UseBetsi1
  11. |
  12. Set BetsiData$Dir <Betsi$Dir>
  13. |
  14. <Betsi$Dir>.Hourglass
  15. |
  16. IconSprites <Obey$Dir>.!Sprites
  17. |
  18. if "<System$Path>" = "" Then Run ADFS::Betsi1.!System
  19. if "<System$Path>" = "" then Error 0 System resources cannot be found
  20. |
  21. if "<Font$Path>" = "" Then Run ADFS::Betsi1.!Fonts
  22. |
  23. set ro31$flag 1
  24. RMEnsure UtilityModule 3.10 set ro31$flag 0
  25. If "<ro31$flag>"="1" Then RMEnsure BorderUtils 0.02 RMLoad System:Modules.BorderUtil
  26. RMEnsure IRQUtils 0.09 RMLoad System:Modules.IRQUtils
  27. RMEnsure HourGlass 2.02 RMLoad System:Modules.Hourglass
  28. RMEnsure SoundScheduler 1.13 RMLoad System:Modules.Sound2
  29. RMEnsure WindowUtils 0.04 RMLoad System:Modules.WimpUtils
  30. unset ro31$flag
  31. |
  32. RMEnsure ColourTrans 0.51 RMLoad System:Modules.Colours
  33. RMEnsure ColourTrans 0.51 Error You need ColourTrans 0.51 or later
  34. |
  35. set clib$flag 0
  36. RMensure SharedClibrary 3.75 set clib$flag 1
  37. RMensure SharedClibrary 0 set clib$flag 0
  38. if "<clib$flag>"="1" then Error !!! Old shared C library !!! An old version of the shared C library (clib) is resident in memory.
  39. unset clib$flag
  40. |  
  41. | Install the shared C library (clib)
  42. | -----------------------------------
  43. |
  44. RMensure SharedClibrary 3.75 RMload System:modules.clib
  45. RMensure SharedClibrary 3.75 Error You need at least version 3.75 of the shared C library
  46. |
  47. | Install the floating point emulator
  48. | -----------------------------------
  49. |
  50. RMensure FPEmulator 2.80 RMload System:modules.FPEmulator
  51. RMensure FPEmulator 2.80 Error You need at least version 2.80 of the floating point emulator
  52. |
  53. | Install the Tracker player program
  54. | ----------------------------------
  55. |
  56. RMEnsure 4MationTracker 3.13 RMLoad <Betsi$Dir>.PlayerMod
  57. RMEnsure 4MationTracker 3.13 Error You need 4MationTracker 3.13 or later
  58. |
  59. | Grab extra memory for resources
  60. Wimpslot -min 400K -max 400K
  61. |
  62. Wimpslot -min 320K -max 320K
  63. Run <Betsi$Dir>.!RunImage %*0
  64.