home *** CD-ROM | disk | FTP | other *** search
/ The Datafile PD-CD 5 / DATAFILE_PDCD5.iso / demos / proart24 / Virtualise / !Virtualis / !Run < prev    next >
Text File  |  1996-09-12  |  2KB  |  45 lines
  1. |   File        : !Run
  2. |   Date        : 12-Sep-96
  3. |   Author      : © A.Thoukydides, 1995, 1996
  4. |   Description : Start !Virtualis.
  5.  
  6. | Set a system variable to the application directory
  7. Set Virtualise$Dir <Obey$Dir>
  8.  
  9. | Directory to contain configuration files
  10. If "<Virtualise$ConfigDir>" = "" Then SetMacro Virtualise$ConfigDir <Choices$Write>.Virtualise
  11.  
  12. | Load the application sprites
  13. IconSprites <Virtualise$Dir>.!Sprites
  14.  
  15. | Check that it is a sufficiently recent version of the operating system
  16. RMEnsure UtilityModule 3.50 Error 0 This application is only suitable for use with RISC OS 3.50 or later versions.
  17.  
  18. | Ensure that there is sufficient memory
  19. WimpSlot -min 96K -max 96K
  20.  
  21. | Special care needs to be taken over the C library
  22. Set Virtualise$CLibLoaded 1
  23. RMEnsure SharedCLibrary 0.00 Set Virtualise$CLibLoaded 0
  24. If Virtualise$CLibLoaded=1 Then RMEnsure SharedCLibrary 4.58 Error 0 You are already running a version of CLib which is too old. This application needs SharedCLibrary 4.58 or later.
  25. UnSet Virtualise$CLibLoaded
  26.  
  27. | Ensure that the correct versions of modules are loaded
  28. Run <Virtualise$Dir>.Ensure SharedCLibrary 4.58 CLib
  29. Run <Virtualise$Dir>.Ensure FPEmulator     4.04 FPEmulator
  30. Run <Virtualise$Dir>.Ensure MessageTrans   0.28 MsgTrans
  31. Run <Virtualise$Dir>.Ensure ColourTrans    1.61 Colours
  32. Run <Virtualise$Dir>.Ensure Iconbar        1.12 Toolbox.IconBar
  33. Run <Virtualise$Dir>.Ensure Menu           0.24 Toolbox.Menu
  34. Run <Virtualise$Dir>.Ensure ProgInfo       0.09 Toolbox.ProgInfo
  35. Run <Virtualise$Dir>.Ensure Toolbox        1.36 Toolbox.Toolbox
  36. Run <Virtualise$Dir>.Ensure Window         1.31 Toolbox.Window
  37.  
  38. | Load the current version of the Virtualise module
  39. RMEnsure Virtualise 1.11 Run <Virtualise$Dir>.Virtualise
  40.  
  41. | Check again that there is sufficient memory to run
  42. WimpSlot -min 96K -max 96K
  43.  
  44. | Finally start the application
  45. Run <Virtualise$Dir>.!RunImage %*0