home *** CD-ROM | disk | FTP | other *** search
/ Acorn User: China / Acorn User China CD-ROM (UK) (Disc B) / Acorn User China CD-ROM (UK) (Disc B).bin / STUTTGART / LANG / GOFER / !Gofer_!Run < prev    next >
Encoding:
Text File  |  1994-06-14  |  801 b   |  27 lines
  1. | version 2.30
  2. set Gofer$Dir <Obey$Dir>
  3. iconsprites <Gofer$Dir>.!sprites
  4. |
  5. | default prelude
  6. if "<GOFER>"="" then set GOFER <Gofer$Dir>.preludes.gcwmin
  7. |
  8. | filetypes and Run actions
  9. set Gofer_Script$ &448
  10. set File$Type_448 G_Script
  11. set Alias$@RunType_448 / <Gofer$Dir>.!Run %%*0
  12. set Gofer_Project$ &449
  13. set File$Type_449 G_Proj
  14. set Alias$@RunType_449 / <Gofer$Dir>.!Run + %%*0
  15. set Gofer_Prelude$ &44A
  16. set File$Type_44A G_Prel
  17. set Alias$@RunType_44A set GOFER %%*0
  18. | ensure we have !Edit up
  19. if "<TaskWindow$Server>"<>"Resources:$.Apps.!Edit" then Error 0 "Gofer needs !Edit" 
  20. |
  21. | set default options
  22. set Gofer$Opts -h120000 -pGo> -rit +tfcow1k -sdgleiu.
  23. set Go_run <Gofer$Dir>.GoferCode <Gofer$Opts>
  24. |
  25. wimpslot -min 16K -max 16K
  26. | NB. No carriage return at end of next line!
  27. / <Gofer$Dir>.!RunImage %*0