home *** CD-ROM | disk | FTP | other *** search
/ ARM Club 3 / TheARMClub_PDCD3.iso / hensa / desktop / fasteract_2 / !FasterAct / !Run < prev    next >
Text File  |  1996-04-25  |  1KB  |  28 lines
  1. | Run file for FasterAction
  2. | (c) 1995 Ian Clark
  3. |
  4. If "<OldAct$Path>"<>"" Then Error Faster Act has been loaded, if the program has crashed then run the file called '!Reload' inside the !FasterAct directory.
  5.  
  6. | This is necessary because otherwise the filer action window looses it's templates!
  7.  
  8. /<Obey$Dir>.!Boot
  9.  
  10. | Check for Risc OS 3.5/6, we need different templates, thanks Acorn!
  11. Set RPC$Flag 1
  12. RMEnsure WindowManager 3.17 Set RPC$Flag 0
  13.  
  14. | Must load Border Utils module as we use 3D templates
  15. | Check first in system and then in our dir
  16.  
  17. Set FATemp$Path <FasterAct$Dir>.Resources.,System:Modules.
  18. RMEnsure BorderUtils 0.05 RMEnsure WindowManager 3.17 RMLoad FATemp:BorderUtil
  19. RMEnsure BorderUtils 0.05 RMEnsure WindowManager 3.17 Error 0,I need to be able to find a copy of the 'BorderUtils' module. There should be one inside !FasterAct.Resources
  20. Unset FATemp$Path
  21.  
  22. | Note old filer action resources path.
  23. Set OldAct$Path <FilerAct$Path>
  24. IF "<RPC$Flag>" = "0" Then Set FilerAct$Path <FasterAct$Dir>.Resources.FilerAct.,<FilerAct$Path> Else Set FilerAct$Path <FasterAct$Dir>.Resources.RPCAct.,<FilerAct$Path>
  25. Unset RPC$Flag
  26.  
  27. WimpSlot -min 8k -max 8k
  28. /<FasterAct$Dir>.Resources.!Intro