home *** CD-ROM | disk | FTP | other *** search
/ RISC DISC 1 / RISC_DISC_1.iso / pd_share / code / pascal / !Pascal / !Run < prev    next >
Encoding:
Text File  |  1992-07-28  |  1.0 KB  |  20 lines

  1. *If "<System$Path>" = "" Then Error 0 System resources cannot be found
  2. *WimpSlot -Min 128k -Max 128k
  3. *IconSprites <Obey$Dir>.!Sprites
  4. *Set Pascal$Dir <Obey$Dir>
  5. *If "<P$Path>" = "" Then Set P$Path <Pascal$Dir>.
  6. *If "<P$LibRoot>" = "" Then Set P$LibRoot P:
  7. *RMEnsure FPEmulator 0 RMLoad System:modules.fpemulator
  8. *RMEnsure FPEmulator 2.80 Error You need FPEmulator 2.80 to run !Pascal
  9. *RMEnsure SharedCLibrary 0 System:modules.clib
  10. *RMEnsure SharedCLibrary 3.75 Error You need Clib 3.75 to run !Pascal
  11. *RMEnsure FrontEnd 0 System:modules.frontend
  12. *RMEnsure Frontend 1.13 Error You need version 1.13 of the FrontEnd module to run !Pascal
  13. *RMEnsure TaskWindow 0 System:modules.task
  14. *RMEnsure TaskWindow 0.29 Error You need version 0.29 of the taskwindow module to run !Pascal
  15. *RMEnsure DDEUtils 0 System:modules.ddeutils
  16. *RMEnsure DDEUtils 1.50 Error You need version 1.50 of the DDEUtils module to run !Pascal
  17. *WimpSlot -Min 64k -Max 64k
  18. *Set Alias$Pascal <Pascal$Dir>.Pascal %%*0
  19. *FrontEnd_Start -app Pascal -desc <Pascal$Dir>.desc
  20.