john@jetson.UUCP (John Owens) (08/06/88)
Here is a substitute for /usr/lib/keyboard/keys in SCO Xenix that
allows use of the meta key in GNU Emacs. Pressing ALT with any key
causes the code returned to have the 80hex bit set. In conjunction
with this, I added lisp/term/ansi.el with the single line
(setq meta-flag t)
Here's the keys file. Make sure MAPKEY=YES is in your
/etc/default/boot. (This also allows you to enter graphics characters
from the keyboard.) Enjoy!
# alt
# scan cntrl alt alt cntrl lock
# code base shift cntrl shift alt shift cntrl shift state
0 nop nop nop nop nop nop nop nop O
1 esc esc nop nop 0x9b 0x9b nop nop O
2 '1' '!' nop nop 0xb1 0xa1 nop nop O
3 '2' '@' nul nul 0xb2 0xc0 0x80 0x80 O
4 '3' '#' nop nop 0xb3 0xa3 nop nop O
5 '4' '$' nop nop 0xb4 0xa4 nop nop O
6 '5' '%' nop nop 0xb5 0xa5 nop nop O
7 '6' '^' rs rs 0xb6 0xde 0x9e 0x9e O
8 '7' '&' nop nop 0xb7 0xa6 nop nop O
9 '8' '*' nop nop 0xb8 0xaa nop nop O
10 '9' '(' nop nop 0xb9 0xa8 nop nop O
11 '0' ')' nop nop 0xb0 0xa9 nop nop O
12 '-' '_' ns ns 0xad 0xdf 0x9f 0x9f O
13 '=' '+' nop nop 0xbd 0xab nop nop O
14 bs bs del del 0x88 0x88 0xff 0xff O
15 ht btab nop nop 0x89 btab nop nop O
16 'q' 'Q' dc1 dc1 0xf1 0xd1 0x91 0x91 C
17 'w' 'W' etb etb 0xf7 0xd7 0x97 0x97 C
18 'e' 'E' enq enq 0xe5 0xc5 0x85 0x85 C
19 'r' 'R' dc2 dc2 0xf2 0xd2 0x92 0x92 C
20 't' 'T' dc4 dc4 0xf4 0xd4 0x94 0x94 C
21 'y' 'Y' em em 0xf9 0xd9 0x99 0x99 C
22 'u' 'U' nak nak 0xf5 0xd5 0x95 0x95 C
23 'i' 'I' ht ht 0xe9 0xc9 0x89 0x89 C
24 'o' 'O' si si 0xef 0xcf 0x8f 0x8f C
25 'p' 'P' dle dle 0xf0 0xd0 0x90 0x90 C
26 '[' '{' esc esc 0xdb 0xfb 0x9b 0x9b O
27 ']' '}' gs gs 0xdd 0xfd 0x9d 0x9d O
28 cr cr nl nl 0x8d 0x8d 0x8a 0x8a O
29 ctrl ctrl ctrl ctrl ctrl ctrl ctrl ctrl O
30 'a' 'A' soh soh 0xe1 0xc1 0x81 0x81 C
31 's' 'S' dc3 dc3 0xf3 0xd3 0x93 0x93 C
32 'd' 'D' eot eot 0xe4 0xc4 0x84 0x84 C
33 'f' 'F' ack ack 0xe6 0xc6 0x86 0x86 C
34 'g' 'G' bel bel 0xe7 0xc7 0x87 0x87 C
35 'h' 'H' bs bs 0xe8 0xc8 0x88 0x88 C
36 'j' 'J' nl nl 0xea 0xca 0x8a 0x8a C
37 'k' 'K' vt vt 0xeb 0xcb 0x8b 0x8b C
38 'l' 'L' np np 0xec 0xcc 0x8c 0x8c C
39 ';' ':' nop nop 0xbb 0xba nop nop O
40 '\'' '"' nop nop 0xa7 0xa2 nop nop O
41 '`' '~' nop nop 0xe0 0xfe nop nop O
42 lshift lshift lshift lshift lshift lshift lshift lshift O
43 '\\' '|' fs fs 0xdc 0xfc 0x9c 0x9c O
44 'z' 'Z' sub sub 0xfa 0xda 0x9a 0x9a C
45 'x' 'X' can can 0xf8 0xd8 0x98 0x98 C
46 'c' 'C' etx etx 0xe3 0xc3 0x83 0x83 C
47 'v' 'V' syn syn 0xf6 0xd6 0x96 0x96 C
48 'b' 'B' stx stx 0xe2 0xc2 0x82 0x82 C
49 'n' 'N' so so 0xee 0xce 0x8e 0x8e C
50 'm' 'M' cr cr 0xed 0xcd 0x8d 0x8d C
51 ',' '<' nop nop 0xac 0xbc nop nop O
52 '.' '>' nop nop 0xae 0xbe nop nop O
53 '/' '?' nop nop 0xaf 0xbf nop nop O
54 rshift rshift rshift rshift rshift rshift rshift rshift O
55 '*' '*' nscr nscr 0xaa 0xaa nscr nscr O
56 alt alt alt alt alt alt alt alt O
57 ' ' ' ' ' ' ' ' 0xa0 0xa0 0xa0 0xa0 O
58 clock clock clock clock clock clock clock clock O
59 fkey1 fkey13 fkey25 fkey37 scr1 scr11 scr1 scr11 O
60 fkey2 fkey14 fkey26 fkey38 scr2 scr12 scr2 scr12 O
61 fkey3 fkey15 fkey27 fkey39 scr3 scr13 scr3 scr13 O
62 fkey4 fkey16 fkey28 fkey40 scr4 scr14 scr4 scr14 O
63 fkey5 fkey17 fkey29 fkey41 scr5 scr15 scr5 scr15 O
64 fkey6 fkey18 fkey30 fkey42 scr6 scr16 scr6 scr16 O
65 fkey7 fkey19 fkey31 fkey43 scr7 scr7 scr7 scr7 O
66 fkey8 fkey20 fkey32 fkey44 scr8 scr8 scr8 scr8 O
67 fkey9 fkey21 fkey33 fkey45 scr9 scr9 scr9 scr9 O
68 fkey10 fkey22 fkey34 fkey46 scr10 scr10 scr10 scr10 O
69 nlock nlock dc3 dc3 nlock nlock 0x93 0x93 O
70 slock slock del del slock slock 0xff 0xff O
71 fkey49 '7' '7' '7' 0xb7 0xb7 0xb7 0xb7 N
72 fkey50 '8' '8' '8' 0xb8 0xb8 0xb8 0xb8 N
73 fkey51 '9' '9' '9' 0xb9 0xb9 0xb9 0xb9 N
74 fkey52 '-' '-' '-' 0xad 0xad 0xad 0xad N
75 fkey53 '4' '4' '4' 0xb4 0xb4 0xb4 0xb4 N
76 fkey54 '5' '5' '5' 0xb5 0xb5 0xb5 0xb5 N
77 fkey55 '6' '6' '6' 0xb6 0xb6 0xb6 0xb6 N
78 fkey56 '+' '+' '+' 0xab 0xab 0xab 0xab N
79 fkey57 '1' '1' '1' 0xb1 0xb1 0xb1 0xb1 N
80 fkey58 '2' '2' '2' 0xb2 0xb2 0xb2 0xb2 N
81 fkey59 '3' '3' '3' 0xb3 0xb3 0xb3 0xb3 N
82 fkey60 '0' '0' '0' 0xb0 0xb0 0xb0 0xb0 N
83 del '.' del del 0xff 0xff 0xff 0xff N
84 nop nop nop nop nop nop nop nop O
85 nop nop nop nop nop nop nop nop O
86 nop nop nop nop nop nop nop nop O
87 fkey11 fkey23 fkey35 fkey47 scr11 scr11 scr11 scr11 O
88 fkey12 fkey24 fkey36 fkey48 scr12 scr12 scr12 scr12 O
--
John Owens john@jetson.UPMA.MD.US
SMART HOUSE L.P. uunet!jetson!john (old uucp)
+1 301 249 6000 john%jetson.uucp@uunet.uu.net (old internet)