home *** CD-ROM | disk | FTP | other *** search
/ The C Users' Group Library 1994 August / wc-cdrom-cusersgrouplibrary-1994-08.iso / vol_100 / 197_01 / me150.rc < prev    next >
Text File  |  1979-12-31  |  2KB  |  74 lines
  1. ;    EMACS.RC:    Startup file for MicroEMACS 3.4
  2. ;
  3. ;            This file is executed everytime the
  4. ;            editor is entered
  5.  
  6. ;    ***** Rebind the Function key group
  7.  
  8. bind-to-key hunt-forward        FN^@
  9. 1 label-function-key "hunt     forward"
  10. bind-to-key hunt-backward        FN^A
  11. 2 label-function-key "hunt    backward"
  12. bind-to-key next-window            FN^B
  13. 3 label-function-key "next      window"
  14. bind-to-key execute-macro        FN^C
  15. 4 label-function-key "exec       macro"
  16. bind-to-key find-file            FN^D
  17. 5 label-function-key "find       file"
  18. bind-to-key view-file            FN^E
  19. 6 label-function-key "view       file"
  20. bind-to-key save-file            FN^F
  21. 7 label-function-key "save       file"
  22. bind-to-key exit-emacs            FN^G
  23. 8 label-function-key "exit      emacs"
  24.  
  25. ;    Enter Help
  26. 1 store-macro
  27.     help
  28.     8 resize-window
  29.     bind-to-key execute-macro-12 FNI
  30.     bind-to-key execute-macro-13 FNQ
  31.     bind-to-key execute-macro-11 FNT
  32.     add-mode "red"
  33.     begining-of-file
  34.     2 forward-character
  35.     clear-message-line
  36. !endm
  37.  
  38. ;    consult file
  39. 2 store-macro
  40.     2 split-current-window
  41.     previous-window
  42.     view-file "@File to Consult: "
  43.     8 resize-window
  44.     add-mode "green"
  45.     add-mode "Black"
  46.     next-window
  47. !endm
  48.  
  49. ;    Exit Help
  50. 11 store-macro
  51.     bind-to-key previous-page FNI
  52.     bind-to-key next-page FNQ
  53.     bind-to-key execute-macro-1 FNT
  54.     delete-window
  55.     clear-message-line
  56. !endm
  57.  
  58. ;    last help page
  59. 12 store-macro
  60.     begining-of-line
  61.     search-reverse "=>"
  62.     1 redraw-display
  63. !endm
  64.  
  65. ;    next help page
  66. 13 store-macro
  67.     begining-of-line
  68.     2 forward-character
  69.     search-forward "=>"
  70.     1 redraw-display
  71. !endm
  72.  
  73.  
  74.