home *** CD-ROM | disk | FTP | other *** search
/ ARM Club 3 / TheARMClub_PDCD3.iso / hensa / desktop / cliguard_1 / !CLIGuard / !Run < prev    next >
Text File  |  1995-01-06  |  2KB  |  33 lines
  1. |
  2. | !Run file for !CLIGuard
  3. |
  4. Set CLIGuard$Dir <Obey$Dir>
  5. IconSprites <CLIGuard$Dir>.!Sprites
  6.  
  7. If "<Alias$TaskWindow>"="WimpTask %*0" Then Unset Alias$TaskWindow
  8. RMEnsure TaskWindow 0.00 Set Alias$TaskWindow WimpTask %%*0
  9.  
  10. | If line editor is running, CLI Guardian will notice and set up an alias so
  11. | typing “History” in the command window will open a window with the previously-run
  12. | commands (CLI Guardian’s commands are automatically appended to this list).
  13. | Alternatively, you could set Alias$History to (e.g.) Type <MyHistoryFile>, so
  14. | typing “History” would open a viewer with the appropriate commands.
  15. | Typing “!” will also show a command history, as will pressing F2.
  16. If "<Alias$History>"="Type <CLIGuard$Dir>.History" Then UnSet Alias$History
  17. If "<Alias$History>"="Recall" Then UnSet Alias$History
  18. Set LineEditor$Running 1
  19. RMEnsure LineEditor 0.00 Set LineEditor$Running 0
  20. If "<LineEditor$Running>"="1" Then Set Alias$History Recall
  21. UnSet LineEditor$Running
  22. SetMacro Alias$! History
  23. If "<Alias$History>"="" Then SetMacro Alias$History Type <CLIGuard$Dir>.History
  24.  
  25. If "<CLIGuardCommand$FileType>"="" Then Set CLIGuardCommand$FileType 1111
  26. If "<Alias$CLIGuardRunCommand>"="" Then SetMacro Alias$CLIGuardCommand Run <CLIGuard$Dir>.RunComm <CLIGuardCommand$FileType> %%*0
  27. If "<CLIGuardHelp$FileType>"="" Then Set CLIGuardHelp$FileType 1112
  28. If "<Alias$CLIGuardHelp>"="" Then SetMacro Alias$CLIGuardHelp Run <CLIGuard$Dir>.RunComm <CLIGuardHelp$FileType> %%*0
  29. Set Alias$EditFile Run <CLIGuard$Dir>.RunComm FFF %%*0
  30.  
  31. WimpSlot -min 96K -max 96K
  32. Run <CLIGuard$Dir>.!RunImage
  33.