home *** CD-ROM | disk | FTP | other *** search
/ Acorn User 1 / AU_CD1.iso / pubdomain / freeware / maillabel / !MailLabel / !Run < prev    next >
Text File  |  1994-08-24  |  2KB  |  32 lines

  1. |
  2. | !Run File For !MailLabel
  3. | By Toby Smith (TctS)
  4. WimpSlot -Min 100K -Max 100K
  5. Set MailLabel$Dir <Obey$Dir>
  6. Iconsprites <MailLabel$Dir>.!Sprites
  7. Set Alias$@RunType_010 Run <Obey$Dir>.!Run -Load %%*0
  8. Set File$Type_010 MailLabelDATA
  9. Set File$Type_D0B Configuration
  10. | Operating system specifics
  11. | If RISC OS 3 is running -we don't need system to get ColourTrans!
  12. |                         -Don't load the extra sprites (they're in OS3 ROM)
  13. Set MailLabel$OSversion 350
  14. RMEnsure UtilityModule 3.20 Set MailLabel$OSversion 300
  15. RMEnsure UtilityModule 3.00 Set MailLabel$OSversion 200
  16. RMEnsure UtilityModule 3.00 if "<System$Path>" = "" then error 0 System Resources cannot be located. MailLabel wants Colours 
  17. RMEnsure ColourTrans 0 RMLoad SYSTEM:Modules.Colours
  18. RMEnsure UtilityModule 3.00 Iconsprites <MailLabel$Dir>.Resources.RO2
  19. RMEnsure MessageTrans RMLoad SYSTEM:Modules.MsgTrans
  20. RMEnsure MessageTrans Error 0 MailLabel could not find the MessageTrans module in computer or as System:Modules.MsgTrans
  21. | Swap commenting on the following 2 lines if you want to read FontMenu from 
  22. | internal rather than System storage
  23. |RMEnsure FontMenu 1.16 RMLoad SYSTEM:Modules.FontMenu
  24. RMEnsure FontMenu 1.16 RMLoad <Obey$Dir>.Resources.FontMenu
  25. RMEnsure FontMenu 1.16 Error 0 MailLabel could not find the FontMenu module in computer, as System:Modules.FontMenu, or in own directory.
  26. |***************  NOTHING ABOVE THIS SHOULD BE ALTERED *********************
  27. |Set this flag if Interactive Help is/is not required
  28. |Save on time and memory if not used!
  29. Set HelpWanted TRUE
  30.  
  31. Run <MailLabel$Dir>.!RunImage %*0