home *** CD-ROM | disk | FTP | other *** search
/ The Datafile PD-CD 5 / DATAFILE_PDCD5.iso / utilities / m / mailcheck / !MailCheck / !Run < prev    next >
Text File  |  1997-03-10  |  1KB  |  32 lines
  1. | !Run for MailCheck
  2.  
  3. If "<MailCheck$Running>" = "Yes" Then Error MailCheck is already running
  4.  
  5. IconSprites <Obey$Dir>.!Sprites
  6. Set MailCheck$Dir <Obey$Dir>
  7. SetMacro MailCheck$Path <MailCheck$Dir>.
  8.  
  9. RMEnsure UtilityModule 3.00 Error I need RISC OS 3 or later to run
  10.  
  11. IF "<Wimp$ScrapDir>" = "" Then Error I cannot find !Scrap Else SetMacro MailCheck$Scrap <Wimp$ScrapDir>.MailCheck
  12.  
  13. RMEnsure Internet 0 Error I need an Internet module
  14. Unset MailCheck$NoResolver
  15. RMEnsure Resolver 0.39 RMEnsure Resolve 0 RMEnsure DNSResolver 1.03 RMEnsure ResolverZM 0 RMEnsure InetDB 0 Error No DNS Resolver module found or module too old
  16. RMEnsure DNSResolver 1.03 Set MailCheck$NoMTQuery ""
  17.  
  18. RMEnsure InetServices 1.07 RMLoad System:Modules.Network.IServices
  19. RMEnsure InetServices 1.07 Error InetServices module not found or too old
  20.  
  21. Set MailCheck$THHeap System:Modules.THHeapR
  22. RMEnsure UtilityModule 3.50 Set MailCheck$THHeap System:Modules.THHeapA
  23. RMEnsure THHeap 1.10 RMLoad <MailCheck$THHeap>
  24. RMEnsure THHeap 1.10 Error THHeap module not found or too old
  25. Unset MailCheck$THHeap
  26.  
  27. RMEnsure MoreHelp 1.00 RMLoad System:Modules.MoreHelp
  28. RMEnsure MoreHelp 1.00 Error MoreHelp module not found or too old
  29. MoreHelp_AddTask MailCheck MailCheck:!IntHelp
  30.  
  31. WimpSlot -min 32k -max 32k
  32. Run MailCheck:!RunImage