home *** CD-ROM | disk | FTP | other *** search
/ Fresh Fish 2 / FFMCD02.bin / useful / lib / emacs / 18.59 / etc / ms-kermit-7bit < prev    next >
Text File  |  1991-05-13  |  9KB  |  313 lines

  1. ;;; This file is designed for 7-bit connections.
  2. ;;; Use the file ms-kermit if you have an 8-bit connection.
  3.  
  4. ;;; This kermit script maps the IBM-PC keyboard for use with Gnu Emacs.
  5. ;;; The ALT key is used to generate Meta characters and, in conjunction
  6. ;;; with the CTRL key, Control-Meta characters.  A few other useful
  7. ;;; mappings are also performed.
  8. ;;; Andy Lowry, May 1989
  9.  
  10. ;;; Exchange ESC and backquote... tilde stays put (shift-backquote)
  11. set key \27 `
  12. set key ` \27
  13.  
  14. ;;; BACKSPACE deletes backward one character
  15. set key scan \270 \127
  16.  
  17. ;;; The following mappings affect certain special keys... all the keys
  18. ;;; are duplicated on the numeric keypad when NUM LOCK is off, but
  19. ;;; the keypad versions are NOT mapped (string definition space too small 
  20. ;;; for that)
  21.  
  22. ;;; INSERT toggles overwrite mode
  23. set key scan \4434 \27xoverwrite-mode\13
  24. ;;; HOME moves point to beginning of buffer
  25. set key scan \4423 \27<
  26. ;;; PAGE-UP scrolls backward one screen
  27. set key scan \4425 \27v
  28. ;;; DELETE deletes one character *forward*
  29. set key scan \4435 \4
  30. ;;; END moves point to end of buffer
  31. set key scan \4431 \27>
  32. ;;; PAGE-DOWN scrolls forward one screen
  33. set key scan \4433 \22
  34. ;;; ARROW keys move in the appropriate directions
  35. set key scan \4424 \16
  36. set key scan \4427 \2
  37. set key scan \4432 \14
  38. set key scan \4429 \6
  39.  
  40. ;;; META versions of all the printing characters except uppercase 
  41. ;;; letters are generated by using the ALT key.  The definition string 
  42. ;;; consists of an ESC character followed by the META-ized character.
  43. ;;; The characters are listed roughly left-to-right and top-to-bottom
  44. ;;; as they appear on the keyboard
  45. set key scan \2345 \27`
  46. set key scan \2424 \27\o61    ; need to use char code, since digit
  47. set key scan \2425 \27\o62    ; would not terminate '\27'
  48. set key scan \2426 \27\o63
  49. set key scan \2427 \27\o64
  50. set key scan \2428 \27\o65
  51. set key scan \2429 \27\o66
  52. set key scan \2430 \27\o67
  53. set key scan \2431 \27\o70
  54. set key scan \2432 \27\o71
  55. set key scan \2433 \27\o60
  56. set key scan \2434 \27\45
  57. set key scan \2435 \27=
  58. set key scan \2857 \27~
  59. set key scan \2936 \27!
  60. set key scan \2937 \27@
  61. set key scan \2938 \27#
  62. set key scan \2939 \27$
  63. set key scan \2940 \27%
  64. set key scan \2941 \27^
  65. set key scan \2942 \27&
  66. set key scan \2943 \27*
  67. set key scan \2944 \27(
  68. set key scan \2945 \27)
  69. set key scan \2946 \27_
  70. set key scan \2947 \27+
  71. set key scan \2469 \27\9
  72. set key scan \2320 \27q
  73. set key scan \2321 \27w
  74. set key scan \2322 \27e
  75. set key scan \2323 \27r
  76. set key scan \2324 \27t
  77. set key scan \2325 \27y
  78. set key scan \2326 \27u
  79. set key scan \2327 \27i
  80. set key scan \2328 \27o
  81. set key scan \2329 \27p
  82. set key scan \2330 \27[
  83. set key scan \2842 \27{
  84. set key scan \2331 \27]
  85. set key scan \2843 \27}
  86. set key scan \2347 \27\
  87. set key scan \2859 \27|
  88. set key scan \2334 \27a
  89. set key scan \2335 \27s
  90. set key scan \2336 \27d
  91. set key scan \2337 \27f
  92. set key scan \2338 \27g
  93. set key scan \2339 \27h
  94. set key scan \2340 \27j
  95. set key scan \2341 \27k
  96. set key scan \2342 \27l
  97. set key scan \2343 \27\59
  98. set key scan \2855 \27:
  99. set key scan \2344 \27'
  100. set key scan \2856 \27"
  101. set key scan \2348 \27z
  102. set key scan \2349 \27x
  103. set key scan \2350 \27c
  104. set key scan \2351 \27v
  105. set key scan \2352 \27b
  106. set key scan \2353 \27n
  107. set key scan \2354 \27m
  108. set key scan \2355 \27,
  109. set key scan \2867 \27<
  110. set key scan \2356 \27.
  111. set key scan \2868 \27>
  112. set key scan \2357 \27/
  113. set key scan \2869 \27?
  114.  
  115. ;;; CONTROL-META characters are generated by using both the CTRL and
  116. ;;; ALT keys simultaneously.  All the lowercase letters are included.
  117. ;;; The definition string consists of an ESC character followed by
  118. ;;; the control character corresponding to the letter.
  119. set key scan \3344 \27\17
  120. set key scan \3345 \27\23
  121. set key scan \3346 \27\5
  122. set key scan \3347 \27\18
  123. set key scan \3348 \27\20
  124. set key scan \3349 \27\25
  125. set key scan \3350 \27\21
  126. set key scan \3351 \27\9
  127. set key scan \3352 \27\15
  128. set key scan \3353 \27\16
  129. set key scan \3358 \27\1
  130. set key scan \3359 \27\19
  131. set key scan \3360 \27\4
  132. set key scan \3361 \27\6
  133. set key scan \3362 \27\7
  134. set key scan \3363 \27\8
  135. set key scan \3364 \27\10
  136. set key scan \3365 \27\11
  137. set key scan \3366 \27\12
  138. set key scan \3372 \27\26
  139. set key scan \3373 \27\24
  140. set key scan \3374 \27\3
  141. set key scan \3375 \27\22
  142. set key scan \3376 \27\2
  143. set key scan \3377 \27\14
  144. set key scan \3378 \27\13
  145.  
  146. end of msiem2.ini
  147. ------------------
  148.  
  149. msiema.hlp
  150. -----------
  151. Date:     Wed, 14 Sep 88 05:20:08 GMT
  152. From:     spolsky@YALE.ARPA
  153. Subject:  Using MS kermit 2.31 with emacs
  154. Keywords: MS-DOS Kermit 2.31, EMACS, Meta Key
  155.  
  156. If you are using kermit (version 2.31 only) with emacs on a mainframe, the
  157. following file may help you. It assigns all the Alt-keys so that the Alt key
  158. may be used as a "Meta" shift, e.g. Alt-x produces M-x, etc.  Note that it
  159. will distinguish correctly between upper and lower case and accepts all
  160. printables. (If anybody has the patience to do the Meta-Ctrl combinations,
  161. please post them!)  This actually sends "escapes" so you don't need 8 bits.
  162. This file also sets up the cursor keys to behave as expected.
  163.  
  164. On extended keyboards (the ones with a separate cursor pad, like PS/2s) you
  165. also get assignments for Page Up/Down, Home, End, Insert, Delete, etc.
  166.  
  167. Please let me know if you find any problems with this.
  168.  
  169. Joel Spolsky             bitnet: spolsky@yalecs     uucp: ...!yale!spolsky
  170. Yale University          arpa:   spolsky@yale.edu   voicenet: 203-436-1483
  171.  
  172. [Ed. - Thanks, Joel!  Your key definitions file has been put in the kermit
  173. distribution area as msiema.ini ("ms" for MS-Kermit, "i" because it's an
  174. initialization file, "ema" for EMACS), along with this message as msiema.hlp.]
  175.  
  176. end of msiema.hlp
  177. -----------------
  178.  
  179.  
  180. msiema.ini
  181. ------------
  182. ; Emacs keyboard layout for Kermit 2.31
  183. ; by Joel Spolsky, Yale Univ.  Save this in a file, then
  184. ; initialize it by issuing the kermit command
  185. ; take filename
  186. ; It will set up the keyboard to allow ALT to be used
  187. ; as a meta-key, and will allow cursor keys to be used
  188. ; with emacs.
  189.  
  190. ; First, define all the ALT keys to send ESC+key
  191. ; to simulate "meta"
  192.  
  193. set key \2320 \27q  ;; letters: unshifted
  194. set key \2321 \27w
  195. set key \2322 \27e
  196. set key \2323 \27r
  197. set key \2324 \27t
  198. set key \2325 \27y
  199. set key \2326 \27u
  200. set key \2327 \27i
  201. set key \2328 \27o
  202. set key \2329 \27p
  203. set key \2334 \27a
  204. set key \2335 \27s
  205. set key \2336 \27d
  206. set key \2337 \27f
  207. set key \2338 \27g
  208. set key \2339 \27h
  209. set key \2340 \27j
  210. set key \2341 \27k
  211. set key \2342 \27l
  212. set key \2348 \27z
  213. set key \2349 \27x
  214. set key \2350 \27c
  215. set key \2351 \27v
  216. set key \2352 \27b
  217. set key \2353 \27n
  218. set key \2354 \27m
  219. set key \2832 \27Q ;; letters: shifted
  220. set key \2833 \27W
  221. set key \2834 \27E
  222. set key \2835 \27R
  223. set key \2836 \27T
  224. set key \2837 \27Y
  225. set key \2838 \27U
  226. set key \2839 \27I
  227. set key \2840 \27O
  228. set key \2841 \27P
  229. set key \2846 \27A
  230. set key \2847 \27S
  231. set key \2848 \27D
  232. set key \2849 \27F
  233. set key \2850 \27G
  234. set key \2851 \27H
  235. set key \2852 \27J
  236. set key \2853 \27K
  237. set key \2854 \27L
  238. set key \2860 \27Z
  239. set key \2861 \27X
  240. set key \2862 \27C
  241. set key \2863 \27V
  242. set key \2864 \27B
  243. set key \2865 \27N
  244. set key \2866 \27M
  245. set key \2857 \27\126    ; ALT + ~   ;; special symbols begin here
  246. set key \2345 \27\96     ; ALT + `
  247. set key \2936 \27\33     ; ALT + !
  248. set key \2937 \27\64     ; ALT + @
  249. set key \2938 \27\35     ; ALT + #
  250. set key \2939 \27\36     ; ALT + $
  251. set key \2940 \27\37     ; ALT + %
  252. set key \2941 \27\94     ; ALT + ^
  253. set key \2942 \27\38     ; ALT + &
  254. set key \2943 \27\42     ; ALT + *
  255. set key \2944 \27\40     ; ALT + (
  256. set key \2945 \27\41     ; ALT + )
  257. set key \2946 \27\95     ; ALT + _
  258. set key \2947 \27\43     ; ALT + +
  259. set key \2842 \27\123    ; ALT + {
  260. set key \2843 \27\125    ; ALT + }
  261. set key \2330 \27\91     ; ALT + [
  262. set key \2331 \27\93     ; ALT + ]
  263. set key \2859 \27\124    ; ALT + :
  264. set key \2347 \27\92     ; ALT + \
  265. set key \2867 \27<       ; ALT + <
  266. set key \2868 \27>       ; ALT + >
  267. set key \2343 \27\59     ; ALT + ;
  268. set key \2855 \27\58     ; ALT + :
  269. set key \2344 \27\39     ; ALT + '
  270. set key \2856 \27\34     ; ALT + "
  271. set key \2355 \27\44     ; ALT + ,
  272. set key \2356 \27\46     ; ALT + .
  273. set key \2357 \27\47     ; ALT + /
  274. set key \2869 \27\63     ; ALT + ?
  275. set key \2424 \27\49  ;; numbers
  276. set k