Mercurial > emacs
annotate etc/ms-7bkermit @ 74428:b401fcc1d9c0
*** empty log message ***
author | Richard M. Stallman <rms@gnu.org> |
---|---|
date | Tue, 05 Dec 2006 04:07:34 +0000 |
parents | 3681678d3d86 |
children | 0259a1711394 a8190f7e546e |
rev | line source |
---|---|
71189
3681678d3d86
Add copyright notice and copying permissions.
Eli Zaretskii <eliz@gnu.org>
parents:
52401
diff
changeset
|
1 ;;; Copyright (c) 1999, 2003, 2006 |
3681678d3d86
Add copyright notice and copying permissions.
Eli Zaretskii <eliz@gnu.org>
parents:
52401
diff
changeset
|
2 ;;; Free Software Foundation, Inc. |
3681678d3d86
Add copyright notice and copying permissions.
Eli Zaretskii <eliz@gnu.org>
parents:
52401
diff
changeset
|
3 |
25853 | 4 ;;; This file is designed for 7-bit connections. |
5 ;;; Use the file ms-kermit if you have an 8-bit connection. | |
6 | |
7 ;;; This kermit script maps the IBM-PC keyboard for use with Gnu Emacs. | |
8 ;;; The ALT key is used to generate Meta characters and, in conjunction | |
9 ;;; with the CTRL key, Control-Meta characters. A few other useful | |
10 ;;; mappings are also performed. | |
11 ;;; Andy Lowry, May 1989 | |
12 | |
13 ;;; Exchange ESC and backquote... tilde stays put (shift-backquote) | |
14 set key \27 ` | |
15 set key ` \27 | |
16 | |
17 ;;; BACKSPACE deletes backward one character | |
18 set key scan \270 \127 | |
19 | |
20 ;;; The following mappings affect certain special keys... all the keys | |
21 ;;; are duplicated on the numeric keypad when NUM LOCK is off, but | |
49600
23a1cea22d13
Trailing whitespace deleted.
Juanma Barranquero <lekktu@gmail.com>
parents:
25853
diff
changeset
|
22 ;;; the keypad versions are NOT mapped (string definition space too small |
25853 | 23 ;;; for that) |
24 | |
25 ;;; INSERT toggles overwrite mode | |
26 set key scan \4434 \27xoverwrite-mode\13 | |
27 ;;; HOME moves point to beginning of buffer | |
28 set key scan \4423 \27< | |
29 ;;; PAGE-UP scrolls backward one screen | |
30 set key scan \4425 \27v | |
31 ;;; DELETE deletes one character *forward* | |
32 set key scan \4435 \4 | |
33 ;;; END moves point to end of buffer | |
34 set key scan \4431 \27> | |
35 ;;; PAGE-DOWN scrolls forward one screen | |
36 set key scan \4433 \22 | |
37 ;;; ARROW keys move in the appropriate directions | |
38 set key scan \4424 \16 | |
39 set key scan \4427 \2 | |
40 set key scan \4432 \14 | |
41 set key scan \4429 \6 | |
42 | |
49600
23a1cea22d13
Trailing whitespace deleted.
Juanma Barranquero <lekktu@gmail.com>
parents:
25853
diff
changeset
|
43 ;;; META versions of all the printing characters except uppercase |
23a1cea22d13
Trailing whitespace deleted.
Juanma Barranquero <lekktu@gmail.com>
parents:
25853
diff
changeset
|
44 ;;; letters are generated by using the ALT key. The definition string |
25853 | 45 ;;; consists of an ESC character followed by the META-ized character. |
46 ;;; The characters are listed roughly left-to-right and top-to-bottom | |
47 ;;; as they appear on the keyboard | |
48 set key scan \2345 \27` | |
49 set key scan \2424 \27\o61 ; need to use char code, since digit | |
50 set key scan \2425 \27\o62 ; would not terminate '\27' | |
51 set key scan \2426 \27\o63 | |
52 set key scan \2427 \27\o64 | |
53 set key scan \2428 \27\o65 | |
54 set key scan \2429 \27\o66 | |
55 set key scan \2430 \27\o67 | |
56 set key scan \2431 \27\o70 | |
57 set key scan \2432 \27\o71 | |
58 set key scan \2433 \27\o60 | |
59 set key scan \2434 \27\45 | |
60 set key scan \2435 \27= | |
61 set key scan \2857 \27~ | |
62 set key scan \2936 \27! | |
63 set key scan \2937 \27@ | |
64 set key scan \2938 \27# | |
65 set key scan \2939 \27$ | |
66 set key scan \2940 \27% | |
67 set key scan \2941 \27^ | |
68 set key scan \2942 \27& | |
69 set key scan \2943 \27* | |
70 set key scan \2944 \27( | |
71 set key scan \2945 \27) | |
72 set key scan \2946 \27_ | |
73 set key scan \2947 \27+ | |
74 set key scan \2469 \27\9 | |
75 set key scan \2320 \27q | |
76 set key scan \2321 \27w | |
77 set key scan \2322 \27e | |
78 set key scan \2323 \27r | |
79 set key scan \2324 \27t | |
80 set key scan \2325 \27y | |
81 set key scan \2326 \27u | |
82 set key scan \2327 \27i | |
83 set key scan \2328 \27o | |
84 set key scan \2329 \27p | |
85 set key scan \2330 \27[ | |
86 set key scan \2842 \27{ | |
87 set key scan \2331 \27] | |
88 set key scan \2843 \27} | |
89 set key scan \2347 \27\ | |
90 set key scan \2859 \27| | |
91 set key scan \2334 \27a | |
92 set key scan \2335 \27s | |
93 set key scan \2336 \27d | |
94 set key scan \2337 \27f | |
95 set key scan \2338 \27g | |
96 set key scan \2339 \27h | |
97 set key scan \2340 \27j | |
98 set key scan \2341 \27k | |
99 set key scan \2342 \27l | |
100 set key scan \2343 \27\59 | |
101 set key scan \2855 \27: | |
102 set key scan \2344 \27' | |
103 set key scan \2856 \27" | |
104 set key scan \2348 \27z | |
105 set key scan \2349 \27x | |
106 set key scan \2350 \27c | |
107 set key scan \2351 \27v | |
108 set key scan \2352 \27b | |
109 set key scan \2353 \27n | |
110 set key scan \2354 \27m | |
111 set key scan \2355 \27, | |
112 set key scan \2867 \27< | |
113 set key scan \2356 \27. | |
114 set key scan \2868 \27> | |
115 set key scan \2357 \27/ | |
116 set key scan \2869 \27? | |
117 | |
118 ;;; CONTROL-META characters are generated by using both the CTRL and | |
119 ;;; ALT keys simultaneously. All the lowercase letters are included. | |
120 ;;; The definition string consists of an ESC character followed by | |
121 ;;; the control character corresponding to the letter. | |
122 set key scan \3344 \27\17 | |
123 set key scan \3345 \27\23 | |
124 set key scan \3346 \27\5 | |
125 set key scan \3347 \27\18 | |
126 set key scan \3348 \27\20 | |
127 set key scan \3349 \27\25 | |
128 set key scan \3350 \27\21 | |
129 set key scan \3351 \27\9 | |
130 set key scan \3352 \27\15 | |
131 set key scan \3353 \27\16 | |
132 set key scan \3358 \27\1 | |
133 set key scan \3359 \27\19 | |
134 set key scan \3360 \27\4 | |
135 set key scan \3361 \27\6 | |
136 set key scan \3362 \27\7 | |
137 set key scan \3363 \27\8 | |
138 set key scan \3364 \27\10 | |
139 set key scan \3365 \27\11 | |
140 set key scan \3366 \27\12 | |
141 set key scan \3372 \27\26 | |
142 set key scan \3373 \27\24 | |
143 set key scan \3374 \27\3 | |
144 set key scan \3375 \27\22 | |
145 set key scan \3376 \27\2 | |
146 set key scan \3377 \27\14 | |
147 set key scan \3378 \27\13 | |
148 | |
149 end of msiem2.ini | |
150 ------------------ | |
151 | |
152 msiema.hlp | |
153 ----------- | |
154 Date: Wed, 14 Sep 88 05:20:08 GMT | |
155 From: spolsky@YALE.ARPA | |
156 Subject: Using MS kermit 2.31 with emacs | |
157 Keywords: MS-DOS Kermit 2.31, EMACS, Meta Key | |
158 | |
159 If you are using kermit (version 2.31 only) with emacs on a mainframe, the | |
160 following file may help you. It assigns all the Alt-keys so that the Alt key | |
161 may be used as a "Meta" shift, e.g. Alt-x produces M-x, etc. Note that it | |
162 will distinguish correctly between upper and lower case and accepts all | |
163 printables. (If anybody has the patience to do the Meta-Ctrl combinations, | |
164 please post them!) This actually sends "escapes" so you don't need 8 bits. | |
165 This file also sets up the cursor keys to behave as expected. | |
166 | |
167 On extended keyboards (the ones with a separate cursor pad, like PS/2s) you | |
168 also get assignments for Page Up/Down, Home, End, Insert, Delete, etc. | |
169 | |
170 Please let me know if you find any problems with this. | |
171 | |
172 Joel Spolsky bitnet: spolsky@yalecs uucp: ...!yale!spolsky | |
173 Yale University arpa: spolsky@yale.edu voicenet: 203-436-1483 | |
174 | |
175 [Ed. - Thanks, Joel! Your key definitions file has been put in the kermit | |
176 distribution area as msiema.ini ("ms" for MS-Kermit, "i" because it's an | |
177 initialization file, "ema" for EMACS), along with this message as msiema.hlp.] | |
178 | |
179 end of msiema.hlp | |
180 ----------------- | |
181 | |
182 | |
183 msiema.ini | |
184 ------------ | |
185 ; Emacs keyboard layout for Kermit 2.31 | |
186 ; by Joel Spolsky, Yale Univ. Save this in a file, then | |
187 ; initialize it by issuing the kermit command | |
188 ; take filename | |
189 ; It will set up the keyboard to allow ALT to be used | |
190 ; as a meta-key, and will allow cursor keys to be used | |
191 ; with emacs. | |
192 | |
193 ; First, define all the ALT keys to send ESC+key | |
194 ; to simulate "meta" | |
195 | |
196 set key \2320 \27q ;; letters: unshifted | |
197 set key \2321 \27w | |
198 set key \2322 \27e | |
199 set key \2323 \27r | |
200 set key \2324 \27t | |
201 set key \2325 \27y | |
202 set key \2326 \27u | |
203 set key \2327 \27i | |
204 set key \2328 \27o | |
205 set key \2329 \27p | |
206 set key \2334 \27a | |
207 set key \2335 \27s | |
208 set key \2336 \27d | |
209 set key \2337 \27f | |
210 set key \2338 \27g | |
211 set key \2339 \27h | |
212 set key \2340 \27j | |
213 set key \2341 \27k | |
214 set key \2342 \27l | |
215 set key \2348 \27z | |
216 set key \2349 \27x | |
217 set key \2350 \27c | |
218 set key \2351 \27v | |
219 set key \2352 \27b | |
220 set key \2353 \27n | |
221 set key \2354 \27m | |
222 set key \2832 \27Q ;; letters: shifted | |
223 set key \2833 \27W | |
224 set key \2834 \27E | |
225 set key \2835 \27R | |
226 set key \2836 \27T | |
227 set key \2837 \27Y | |
228 set key \2838 \27U | |
229 set key \2839 \27I | |
230 set key \2840 \27O | |
231 set key \2841 \27P | |
232 set key \2846 \27A | |
233 set key \2847 \27S | |
234 set key \2848 \27D | |
235 set key \2849 \27F | |
236 set key \2850 \27G | |
237 set key \2851 \27H | |
238 set key \2852 \27J | |
239 set key \2853 \27K | |
240 set key \2854 \27L | |
241 set key \2860 \27Z | |
242 set key \2861 \27X | |
243 set key \2862 \27C | |
244 set key \2863 \27V | |
245 set key \2864 \27B | |
246 set key \2865 \27N | |
247 set key \2866 \27M | |
248 set key \2857 \27\126 ; ALT + ~ ;; special symbols begin here | |
249 set key \2345 \27\96 ; ALT + ` | |
250 set key \2936 \27\33 ; ALT + ! | |
251 set key \2937 \27\64 ; ALT + @ | |
252 set key \2938 \27\35 ; ALT + # | |
253 set key \2939 \27\36 ; ALT + $ | |
254 set key \2940 \27\37 ; ALT + % | |
255 set key \2941 \27\94 ; ALT + ^ | |
256 set key \2942 \27\38 ; ALT + & | |
257 set key \2943 \27\42 ; ALT + * | |
258 set key \2944 \27\40 ; ALT + ( | |
259 set key \2945 \27\41 ; ALT + ) | |
260 set key \2946 \27\95 ; ALT + _ | |
261 set key \2947 \27\43 ; ALT + + | |
262 set key \2842 \27\123 ; ALT + { | |
263 set key \2843 \27\125 ; ALT + } | |
264 set key \2330 \27\91 ; ALT + [ | |
265 set key \2331 \27\93 ; ALT + ] | |
266 set key \2859 \27\124 ; ALT + : | |
267 set key \2347 \27\92 ; ALT + \ | |
268 set key \2867 \27< ; ALT + < | |
269 set key \2868 \27> ; ALT + > | |
270 set key \2343 \27\59 ; ALT + ; | |
271 set key \2855 \27\58 ; ALT + : | |
272 set key \2344 \27\39 ; ALT + ' | |
273 set key \2856 \27\34 ; ALT + " | |
274 set key \2355 \27\44 ; ALT + , | |
275 set key \2356 \27\46 ; ALT + . | |
276 set key \2357 \27\47 ; ALT + / | |
277 set key \2869 \27\63 ; ALT + ? | |
278 set key \2424 \27\49 ;; numbers | |
279 set key \2425 \27\50 | |
280 set key \2426 \27\51 | |
281 set key \2427 \27\52 | |
282 set key \2428 \27\53 | |
283 set key \2429 \27\54 | |
284 set key \2430 \27\55 | |
285 set key \2431 \27\56 | |
286 set key \2432 \27\57 | |
287 set key \2433 \27\48 | |
288 | |
289 ;; These 6 special keys for extended (PS/2) keyboards: | |
290 set key \4434 \25 ;; Insert is like ^Y - yank from kill ring | |
291 set key \4435 \23 ;; Delete is like ^W - kill to ring | |
292 set key \4423 \1 ;; Home is ^A | |
293 set key \4431 \5 ;; End is ^E | |
294 set key \4425 \27V ;; Page up is Esc-V | |
295 set key \4433 \22 ;; Page dn is ^v | |
296 | |
297 set key \328 \16 ;; up cursor is ^P | |
298 set key \331 \2 ;; left cursor is ^B | |
299 set key \333 \6 ;; right cursor is ^F | |
300 set key \336 \14 ;; down cursor is ^N | |
301 set key \4427 \2 ;; left cursor on extended kbd | |
302 set key \4432 \14 ;; down cursor on extended kbd | |
303 set key \4424 \16 ;; up cursor on extended kbd | |
304 set key \4429 \6 ;; right cursor on extended kbd | |
305 | |
306 set key \5491 \27b ;; ctrl-left cursor is M-b | |
307 set key \5492 \27f ;; ctrl-right cursor is M-f | |
308 | |
309 ;; move kermit's screen scroll (playback) features to Alt- Home,End,PgUp,PgDn | |
310 ;; (this is an issue for extended keyboards only) | |
311 | |
312 set key \2455 \khomscn | |
313 set key \2463 \kendscn | |
314 set key \2457 \kupscn | |
315 set key \2465 \kdnscn | |
52401 | 316 |
71189
3681678d3d86
Add copyright notice and copying permissions.
Eli Zaretskii <eliz@gnu.org>
parents:
52401
diff
changeset
|
317 ;;; COPYING PERMISSIONS: |
3681678d3d86
Add copyright notice and copying permissions.
Eli Zaretskii <eliz@gnu.org>
parents:
52401
diff
changeset
|
318 ;;; |
3681678d3d86
Add copyright notice and copying permissions.
Eli Zaretskii <eliz@gnu.org>
parents:
52401
diff
changeset
|
319 ;;; This document is free software; you can redistribute it and/or modify |
3681678d3d86
Add copyright notice and copying permissions.
Eli Zaretskii <eliz@gnu.org>
parents:
52401
diff
changeset
|
320 ;;; it under the terms of the GNU General Public License as published by |
3681678d3d86
Add copyright notice and copying permissions.
Eli Zaretskii <eliz@gnu.org>
parents:
52401
diff
changeset
|
321 ;;; the Free Software Foundation; either version 2 of the License, or |
3681678d3d86
Add copyright notice and copying permissions.
Eli Zaretskii <eliz@gnu.org>
parents:
52401
diff
changeset
|
322 ;;; (at your option) any later version. |
3681678d3d86
Add copyright notice and copying permissions.
Eli Zaretskii <eliz@gnu.org>
parents:
52401
diff
changeset
|
323 ;;; |
3681678d3d86
Add copyright notice and copying permissions.
Eli Zaretskii <eliz@gnu.org>
parents:
52401
diff
changeset
|
324 ;;; This program is distributed in the hope that it will be useful, |
3681678d3d86
Add copyright notice and copying permissions.
Eli Zaretskii <eliz@gnu.org>
parents:
52401
diff
changeset
|
325 ;;; but WITHOUT ANY WARRANTY; without even the implied warranty of |
3681678d3d86
Add copyright notice and copying permissions.
Eli Zaretskii <eliz@gnu.org>
parents:
52401
diff
changeset
|
326 ;;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the |
3681678d3d86
Add copyright notice and copying permissions.
Eli Zaretskii <eliz@gnu.org>
parents:
52401
diff
changeset
|
327 ;;; GNU General Public License for more details. |
3681678d3d86
Add copyright notice and copying permissions.
Eli Zaretskii <eliz@gnu.org>
parents:
52401
diff
changeset
|
328 ;;; |
3681678d3d86
Add copyright notice and copying permissions.
Eli Zaretskii <eliz@gnu.org>
parents:
52401
diff
changeset
|
329 ;;; You should have received a copy of the GNU General Public License |
3681678d3d86
Add copyright notice and copying permissions.
Eli Zaretskii <eliz@gnu.org>
parents:
52401
diff
changeset
|
330 ;;; along with this program; if not, write to the Free Software |
3681678d3d86
Add copyright notice and copying permissions.
Eli Zaretskii <eliz@gnu.org>
parents:
52401
diff
changeset
|
331 ;;; Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA |
3681678d3d86
Add copyright notice and copying permissions.
Eli Zaretskii <eliz@gnu.org>
parents:
52401
diff
changeset
|
332 |
52401 | 333 ;;; arch-tag: b066a884-e956-4f46-9d9c-13502f6cf7a6 |