home *** CD-ROM | disk | FTP | other *** search
/ The Fred Fish Collection 1.5 / ffcollection-1-5-1992-11.iso / ff_disks / 001-099 / ff093.lzh / MicroEmacs / doc / .emacsrc next >
Text File  |  1987-08-22  |  2KB  |  83 lines
  1. set $discmd "TRUE"
  2. write-message "[Initializing...]"
  3. 4 handle-tab
  4. bind-to-key set-mark ^@
  5. bind-to-key hunt-forward ^X^A
  6. bind-to-key hunt-backward ^X^H
  7. unbind-key 
  8. bind-to-key delete-next-character 
  9. unbind-key  FNP
  10. unbind-key  FNQ
  11. unbind-key  FNR
  12. unbind-key  FNS
  13. unbind-key  FNT
  14. unbind-key  FNU
  15. unbind-key  FNV
  16. unbind-key  FNW
  17. unbind-key  FNX
  18. unbind-key  FNY
  19. bind-to-key execute-macro-1 ^X^D
  20. 1   store-macro
  21.     beginning-of-line
  22.     kill-to-end-of-line
  23.     kill-to-end-of-line
  24. !endm
  25. bind-to-key execute-macro-2 ^XI
  26. 2   store-macro
  27.     insert-string   "if( )"
  28.     newline-and-indent
  29.     insert-string   " {"
  30.     3 newline-and-indent
  31.     insert-string   "}"
  32.     newline
  33.     5 previous-line
  34.     end-of-line
  35.     2 backward-character
  36. !endm
  37. bind-to-key execute-macro-3 ^XL
  38. 3   store-macro
  39.     insert-string   "while( )"
  40.     newline-and-indent
  41.     insert-string   " {"
  42.     3 newline-and-indent
  43.     insert-string   "}"
  44.     newline
  45.     5 previous-line
  46.     end-of-line
  47.     2 backward-character
  48. !endm
  49. bind-to-key execute-macro-4 FN0
  50. 4   store-macro
  51.     79 insert-string "*"
  52.     beginning-of-line
  53. !endm
  54. bind-to-key execute-macro-5 FN1
  55. 5   store-macro
  56.     beginning-of-line
  57.     set-mark
  58.     next-line
  59.     copy-region
  60.     yank
  61. !endm
  62. bind-to-key execute-macro-6 FN2
  63. 6   store-macro
  64.     insert-string "~n/*~n"
  65.     1 insert-string " *~n"
  66.     insert-string " */"
  67.     2 previous-line
  68.     end-of-line
  69. !endm
  70. bind-to-key execute-macro-7 FN3
  71. 7   store-macro
  72.     insert-string "/"
  73.     76 insert-string "*"
  74.     5  insert-string "~n*"
  75.     insert-string "~n"
  76.     76 insert-string "*"
  77.     insert-string "/"
  78.     5 previous-line
  79.     end-of-line
  80. !endm
  81. write-message "[Ready.]"
  82. set $discmd "TRUE"
  83.