Commit | Line | Data |
---|---|---|
24b31c88 KH |
1 | ;;; latin-pre.el -- Quail packages for inputting various European characters. |
2 | ||
3 | ;; Copyright (C) 1997 Electrotechnical Laboratory, JAPAN. | |
4 | ;; Licensed to the Free Software Foundation. | |
5 | ||
6 | ;; Keywords: mule, multilingual, latin, input method | |
7 | ||
8 | ;; This file is part of GNU Emacs. | |
9 | ||
10 | ;; GNU Emacs is free software; you can redistribute it and/or modify | |
11 | ;; it under the terms of the GNU General Public License as published by | |
12 | ;; the Free Software Foundation; either version 2, or (at your option) | |
13 | ;; any later version. | |
14 | ||
15 | ;; GNU Emacs is distributed in the hope that it will be useful, | |
16 | ;; but WITHOUT ANY WARRANTY; without even the implied warranty of | |
17 | ;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the | |
18 | ;; GNU General Public License for more details. | |
19 | ||
20 | ;; You should have received a copy of the GNU General Public License | |
21 | ;; along with GNU Emacs; see the file COPYING. If not, write to the | |
22 | ;; Free Software Foundation, Inc., 59 Temple Place - Suite 330, | |
23 | ;; Boston, MA 02111-1307, USA. | |
24 | ||
25 | ;;; Commentary: | |
26 | ||
27 | ;; All key translation maps are copied from iso-acc.el. | |
28 | ||
29 | ;;; Code: | |
30 | ||
31 | (require 'quail) | |
32 | ||
33 | (quail-define-package | |
db9dfa94 | 34 | "latin-1-prefix" "Latin-1" "1>" t |
24b31c88 KH |
35 | "Latin-1 characters input method with prefix modifiers |
36 | ||
37 | effect | prefix | examples | |
38 | ------------+--------+---------- | |
39 | acute | ' | 'a -> \e,Aa\e(B, '' -> \e,A4\e(B | |
40 | grave | ` | `a -> \e,A`\e(B | |
41 | circumflex | ^ | ^a -> \e,Ab\e(B | |
42 | diaeresis | \" | \"a -> \e,Ad\e(B, \"\" -> \e,A(\e(B | |
43 | tilde | ~ | ~a -> \e,Ac\e(B | |
44 | cedilla | ~ | ~c -> \e,Ag\e(B | |
45 | misc | ---- | \"s -> \e,A_\e(B, ~d -> \e,Ap\e(B, ~t -> \e,A~\e(B, /a -> \e,Ae\e(B, /e -> \e,Af\e(B, /o -> \e,Ax\e(B | |
46 | symbol | ~ | ~> -> \e,A;\e(B, ~< -> \e,A+\e(B, ~! -> \e,A!\e(B, ~? -> \e,A?\e(B, ~~ -> \e,A8\e(B | |
47 | " nil t) | |
48 | ||
49 | (quail-define-rules | |
50 | ("'A" ?\e,AA\e(B) | |
51 | ("'E" ?\e,AI\e(B) | |
52 | ("'I" ?\e,AM\e(B) | |
53 | ("'O" ?\e,AS\e(B) | |
54 | ("'U" ?\e,AZ\e(B) | |
55 | ("'Y" ?\e,A]\e(B) | |
56 | ("'a" ?\e,Aa\e(B) | |
57 | ("'e" ?\e,Ai\e(B) | |
58 | ("'i" ?\e,Am\e(B) | |
59 | ("'o" ?\e,As\e(B) | |
60 | ("'u" ?\e,Az\e(B) | |
61 | ("'y" ?\e,A}\e(B) | |
62 | ("''" ?\e,A4\e(B) | |
63 | ("' " ?') | |
64 | ("`A" ?\e,A@\e(B) | |
65 | ("`E" ?\e,AH\e(B) | |
66 | ("`I" ?\e,AL\e(B) | |
67 | ("`O" ?\e,AR\e(B) | |
68 | ("`U" ?\e,AY\e(B) | |
69 | ("`a" ?\e,A`\e(B) | |
70 | ("`e" ?\e,Ah\e(B) | |
71 | ("`i" ?\e,Al\e(B) | |
72 | ("`o" ?\e,Ar\e(B) | |
73 | ("`u" ?\e,Ay\e(B) | |
74 | ("``" ?`) | |
75 | ("` " ?`) | |
76 | ("^A" ?\e,AB\e(B) | |
77 | ("^E" ?\e,AJ\e(B) | |
78 | ("^I" ?\e,AN\e(B) | |
79 | ("^O" ?\e,AT\e(B) | |
80 | ("^U" ?\e,A[\e(B) | |
81 | ("^a" ?\e,Ab\e(B) | |
82 | ("^e" ?\e,Aj\e(B) | |
83 | ("^i" ?\e,An\e(B) | |
84 | ("^o" ?\e,At\e(B) | |
85 | ("^u" ?\e,A{\e(B) | |
86 | ("^^" ?^) | |
87 | ("^ " ?^) | |
88 | ("\"A" ?\e,AD\e(B) | |
89 | ("\"E" ?\e,AK\e(B) | |
90 | ("\"I" ?\e,AO\e(B) | |
91 | ("\"O" ?\e,AV\e(B) | |
92 | ("\"U" ?\e,A\\e(B) | |
93 | ("\"a" ?\e,Ad\e(B) | |
94 | ("\"e" ?\e,Ak\e(B) | |
95 | ("\"i" ?\e,Ao\e(B) | |
96 | ("\"o" ?\e,Av\e(B) | |
97 | ("\"s" ?\e,A_\e(B) | |
98 | ("\"u" ?\e,A|\e(B) | |
99 | ("\"y" ?\e,A\7f\e(B) | |
100 | ("\"\"" ?\e,A(\e(B) | |
101 | ("\" " ?\") | |
102 | ("~A" ?\e,AC\e(B) | |
103 | ("~C" ?\e,AG\e(B) | |
104 | ("~D" ?\e,AP\e(B) | |
105 | ("~N" ?\e,AQ\e(B) | |
106 | ("~O" ?\e,AU\e(B) | |
107 | ("~T" ?\e,A^\e(B) | |
108 | ("~a" ?\e,Ac\e(B) | |
109 | ("~c" ?\e,Ag\e(B) | |
110 | ("~d" ?\e,Ap\e(B) | |
111 | ("~n" ?\e,Aq\e(B) | |
112 | ("~o" ?\e,Au\e(B) | |
113 | ("~t" ?\e,A~\e(B) | |
114 | ("~>" ?\\e,A;\e(B) | |
115 | ("~<" ?\\e,A+\e(B) | |
116 | ("~!" ?\e,A!\e(B) | |
117 | ("~?" ?\e,A?\e(B) | |
118 | ("~~" ?\e,A8\e(B) | |
119 | ("~ " ?~) | |
120 | ("/A" ?\e,AE\e(B) | |
121 | ("/E" ?\e,AF\e(B) | |
122 | ("/O" ?\e,AX\e(B) | |
123 | ("/a" ?\e,Ae\e(B) | |
124 | ("/e" ?\e,Af\e(B) | |
125 | ("/o" ?\e,Ax\e(B) | |
126 | ("//" ?\e,A0\e(B) | |
127 | ("/ " ? ) | |
128 | ) | |
129 | ||
130 | (quail-define-package | |
db9dfa94 | 131 | "catalan-prefix" "Latin-1" "CA>" t |
24b31c88 KH |
132 | "Catalan and Spanish input method with prefix modifiers |
133 | ||
134 | effect | prefix | examples | |
135 | ------------+--------+---------- | |
136 | acute | ' | 'a -> \e,Aa\e(B, '' -> \e,A4\e(B | |
137 | grave | ` | `a -> \e,A`\e(B | |
138 | diaeresis | \" | \"i -> \e,Ao\e(B, \"\" -> \e,A(\e(B | |
139 | tilde | ~ | ~n -> \e,Aq\e(B | |
140 | cedilla | ~ | ~c -> \e,Ag\e(B | |
141 | symbol | ~ | ~> -> \e,A;\e(B, ~< -> \e,A+\e(B, ~! -> \e,A!\e(B, ~? -> \e,A?\e(B | |
142 | " nil t) | |
143 | ||
144 | (quail-define-rules | |
145 | ("'A" ?\e,AA\e(B) | |
146 | ("'E" ?\e,AI\e(B) | |
147 | ("'I" ?\e,AM\e(B) | |
148 | ("'O" ?\e,AS\e(B) | |
149 | ("'U" ?\e,AZ\e(B) | |
150 | ("'a" ?\e,Aa\e(B) | |
151 | ("'e" ?\e,Ai\e(B) | |
152 | ("'i" ?\e,Am\e(B) | |
153 | ("'o" ?\e,As\e(B) | |
154 | ("'u" ?\e,Az\e(B) | |
155 | ("' " ?') | |
156 | ("`A" ?\e,A@\e(B) | |
157 | ("`E" ?\e,AH\e(B) | |
158 | ("`O" ?\e,AR\e(B) | |
159 | ("`a" ?\e,A`\e(B) | |
160 | ("`e" ?\e,Ah\e(B) | |
161 | ("`o" ?\e,Ar\e(B) | |
162 | ("` " ?`) | |
163 | ("\"I" ?\e,AO\e(B) | |
164 | ("\"U" ?\e,A\\e(B) | |
165 | ("\"i" ?\e,Ao\e(B) | |
166 | ("\"u" ?\e,A|\e(B) | |
167 | ("\" " ?\") | |
168 | ("~C" ?\e,AG\e(B) | |
169 | ("~N" ?\e,AQ\e(B) | |
170 | ("~c" ?\e,Ag\e(B) | |
171 | ("~n" ?\e,Aq\e(B) | |
172 | ("~>" ?\\e,A;\e(B) | |
173 | ("~<" ?\\e,A+\e(B) | |
174 | ("~!" ?\e,A!\e(B) | |
175 | ("~?" ?\e,A?\e(B) | |
176 | ("~ " ?~) | |
177 | ) | |
178 | ||
179 | (quail-define-package | |
db9dfa94 | 180 | "esperanto-prefix" "Latin-1" "EO>" t |
24b31c88 KH |
181 | "Esperanto input method with prefix modifiers |
182 | Key translation rules are: | |
183 | ^H -> ?\e,A&\e(B, ^J -> ?\e,A,\e(B, ^h -> ?\e,A6\e(B, ^j -> ?\e,A<\e(B, ^C -> ?\e,AF\e(B, ^G -> ?\e,AX\e(B, | |
184 | ^S -> ?\e,A^\e(B, ^c -> ?\e,Af\e(B, ^g -> ?\e,Ax\e(B, ^s -> ?\e,A~\e(B, ~U -> ?\e,A]\e(B, ~u -> ?\e,A}\e(B | |
185 | " nil t) | |
186 | ||
187 | (quail-define-rules | |
188 | ("^H" ?\e,A&\e(B) | |
189 | ("^J" ?\e,A,\e(B) | |
190 | ("^h" ?\e,A6\e(B) | |
191 | ("^j" ?\e,A<\e(B) | |
192 | ("^C" ?\e,AF\e(B) | |
193 | ("^G" ?\e,AX\e(B) | |
194 | ("^S" ?\e,A^\e(B) | |
195 | ("^c" ?\e,Af\e(B) | |
196 | ("^g" ?\e,Ax\e(B) | |
197 | ("^s" ?\e,A~\e(B) | |
198 | ("^^" ?^) | |
199 | ("^ " ?^) | |
200 | ("~U" ?\e,A]\e(B) | |
201 | ("~u" ?\e,A}\e(B) | |
202 | ("~ " ?~) | |
203 | ) | |
204 | ||
205 | (quail-define-package | |
db9dfa94 | 206 | "french-prefix" "Latin-1" "FR>" t |
24b31c88 KH |
207 | "French (Fran\e,Ag\e(Bais) input method with prefix modifiers |
208 | ||
209 | effect | prefix | examples | |
210 | ------------+--------+---------- | |
211 | acute | ' | 'e -> \e,Ai\e(B | |
212 | grave | ` | `a -> \e,A`\e(B | |
213 | circumflex | ^ | ^a -> \e,Ab\e(B | |
214 | diaeresis | \" | \"i -> \e,Ao\e(B | |
215 | cedilla | ~ or , | ~c -> \e,Ag\e(B, ,c -> \e,Ag\e(B | |
216 | symbol | ~ | ~> -> \e,A;\e(B, ~< -> \e,A+\e(B | |
217 | " nil t) | |
218 | ||
219 | (quail-define-rules | |
220 | ("'E" ?\e,AI\e(B) | |
221 | ("'C" ?\e,AG\e(B) | |
222 | ("'e" ?\e,Ai\e(B) | |
223 | ("'c" ?\e,Ag\e(B) | |
224 | ("' " ?') | |
225 | ("`A" ?\e,A@\e(B) | |
226 | ("`E" ?\e,AH\e(B) | |
227 | ("`U" ?\e,AY\e(B) | |
228 | ("`a" ?\e,A`\e(B) | |
229 | ("`e" ?\e,Ah\e(B) | |
230 | ("`u" ?\e,Ay\e(B) | |
231 | ("` " ?`) | |
232 | ("^A" ?\e,AB\e(B) | |
233 | ("^E" ?\e,AJ\e(B) | |
234 | ("^I" ?\e,AN\e(B) | |
235 | ("^O" ?\e,AT\e(B) | |
236 | ("^U" ?\e,A[\e(B) | |
237 | ("^a" ?\e,Ab\e(B) | |
238 | ("^e" ?\e,Aj\e(B) | |
239 | ("^i" ?\e,An\e(B) | |
240 | ("^o" ?\e,At\e(B) | |
241 | ("^u" ?\e,A{\e(B) | |
242 | ("^ " ?^) | |
243 | ("\"E" ?\e,AK\e(B) | |
244 | ("\"I" ?\e,AO\e(B) | |
245 | ("\"e" ?\e,Ak\e(B) | |
246 | ("\"i" ?\e,Ao\e(B) | |
247 | ("\" " ?\") | |
248 | ("~<" ?\\e,A+\e(B) | |
249 | ("~>" ?\\e,A;\e(B) | |
250 | ("~C" ?\e,AG\e(B) | |
251 | ("~c" ?\e,Ag\e(B) | |
252 | ("~," ?,) | |
253 | (",C" ?\e,AG\e(B) | |
254 | (",c" ?\e,Ag\e(B) | |
255 | (", " ?~) | |
256 | ) | |
257 | ||
258 | (quail-define-package | |
db9dfa94 | 259 | "german-prefix" "Latin-1" "DE>" t |
24b31c88 KH |
260 | "German (Deutsch) input method with prefix modifiers |
261 | Key translation rules are: | |
262 | \"A -> \e,AD\e(B -> \"O -> \e,AV\e(B, \"U -> \e,A\\e(B, \"s -> ?\e,A_\e(B | |
263 | " nil t) | |
264 | ||
265 | (quail-define-rules | |
266 | ("\"A" ?\e,AD\e(B) | |
267 | ("\"O" ?\e,AV\e(B) | |
268 | ("\"U" ?\e,A\\e(B) | |
269 | ("\"a" ?\e,Ad\e(B) | |
270 | ("\"o" ?\e,Av\e(B) | |
271 | ("\"u" ?\e,A|\e(B) | |
272 | ("\"s" ?\e,A_\e(B) | |
273 | ("\" " ?\") | |
274 | ) | |
275 | ||
276 | (quail-define-package | |
db9dfa94 | 277 | "irish-prefix" "Latin-1" "GA>" t |
24b31c88 KH |
278 | "Irish input method with prefix modifiers |
279 | Key translation rules are: | |
280 | 'A -> \e,AA\e(B, 'E -> \e,AI\e(B, 'I -> \e,AM\e(B, 'O -> \e,AS\e(B, 'U -> \e,AZ\e(B | |
281 | " nil t) | |
282 | ||
283 | (quail-define-rules | |
284 | ("'A" ?\e,AA\e(B) | |
285 | ("'E" ?\e,AI\e(B) | |
286 | ("'I" ?\e,AM\e(B) | |
287 | ("'O" ?\e,AS\e(B) | |
288 | ("'U" ?\e,AZ\e(B) | |
289 | ("'a" ?\e,Aa\e(B) | |
290 | ("'e" ?\e,Ai\e(B) | |
291 | ("'i" ?\e,Am\e(B) | |
292 | ("'o" ?\e,As\e(B) | |
293 | ("'u" ?\e,Az\e(B) | |
294 | ("' " ?') | |
295 | ) | |
296 | ||
297 | (quail-define-package | |
db9dfa94 | 298 | "portuguese-prefix" "Latin-1" "PT>" t |
24b31c88 KH |
299 | "Portuguese input method with prefix modifiers |
300 | ||
301 | effect | prefix | examples | |
302 | ------------+--------+---------- | |
303 | acute | ' | 'a -> \e,Aa\e(B, '' -> \e,A4\e(B | |
304 | grave | ` | `a -> \e,A`\e(B | |
305 | circumflex | ^ | ^a -> \e,Ab\e(B | |
306 | diaeresis | \" | \"u -> \e,A|\e(B | |
307 | tilde | ~ | ~a -> \e,Ac\e(B | |
308 | cedilla | ' or , | 'c -> \e,Ag\e(B, ,c -> \e,Ag\e(B | |
309 | " nil t) | |
310 | ||
311 | (quail-define-rules | |
312 | ("'A" ?\e,AA\e(B) | |
313 | ("'E" ?\e,AI\e(B) | |
314 | ("'I" ?\e,AM\e(B) | |
315 | ("'O" ?\e,AS\e(B) | |
316 | ("'U" ?\e,AZ\e(B) | |
317 | ("'C" ?\e,AG\e(B) | |
318 | ("'a" ?\e,Aa\e(B) | |
319 | ("'e" ?\e,Ai\e(B) | |
320 | ("'i" ?\e,Am\e(B) | |
321 | ("'o" ?\e,As\e(B) | |
322 | ("'u" ?\e,Az\e(B) | |
323 | ("'c" ?\e,Ag\e(B) | |
324 | ("' " ?') | |
325 | ("`A" ?\e,A@\e(B) | |
326 | ("`a" ?\e,A`\e(B) | |
327 | ("` " ?`) | |
328 | ("^A" ?\e,AB\e(B) | |
329 | ("^E" ?\e,AJ\e(B) | |
330 | ("^O" ?\e,AT\e(B) | |
331 | ("^a" ?\e,Ab\e(B) | |
332 | ("^e" ?\e,Aj\e(B) | |
333 | ("^o" ?\e,At\e(B) | |
334 | ("^ " ?^) | |
335 | ("\"U" ?\e,A\\e(B) | |
336 | ("\"u" ?\e,A|\e(B) | |
337 | ("\" " ?\") | |
338 | ("~A" ?\e,AC\e(B) | |
339 | ("~O" ?\e,AU\e(B) | |
340 | ("~a" ?\e,Ac\e(B) | |
341 | ("~o" ?\e,Au\e(B) | |
342 | ("~ " ?~) | |
343 | (",c" ?\e,Ag\e(B) | |
344 | (",C" ?\e,AG\e(B) | |
345 | (",," ?,) | |
346 | ) | |
347 | ||
348 | (quail-define-package | |
db9dfa94 | 349 | "spanish-prefix" "Latin-1" "ES>" t |
24b31c88 KH |
350 | "Spanish (Espa\e,Aq\e(Bol) input method with prefix modifiers |
351 | ||
352 | effect | prefix | examples | |
353 | ------------+--------+---------- | |
354 | acute | ' | 'a -> \e,Aa\e(B | |
355 | diaeresis | \" | \"u -> \e,A|\e(B | |
356 | tilde | ~ | ~n -> \e,Aq\e(B | |
357 | symbol | ~ | ~> -> \e,A;\e(B, ~< -> \e,A+\e(B, ~! -> \e,A!\e(B, ~? -> \e,A?\e(B | |
358 | " nil t) | |
359 | ||
360 | (quail-define-rules | |
361 | ("'A" ?\e,AA\e(B) | |
362 | ("'E" ?\e,AI\e(B) | |
363 | ("'I" ?\e,AM\e(B) | |
364 | ("'O" ?\e,AS\e(B) | |
365 | ("'U" ?\e,AZ\e(B) | |
366 | ("'a" ?\e,Aa\e(B) | |
367 | ("'e" ?\e,Ai\e(B) | |
368 | ("'i" ?\e,Am\e(B) | |
369 | ("'o" ?\e,As\e(B) | |
370 | ("'u" ?\e,Az\e(B) | |
371 | ("' " ?') | |
372 | ("\"U" ?\e,A\\e(B) | |
373 | ("\"u" ?\e,A|\e(B) | |
374 | ("\" " ?\") | |
375 | ("~N" ?\e,AQ\e(B) | |
376 | ("~n" ?\e,Aq\e(B) | |
377 | ("~>" ?\\e,A;\e(B) | |
378 | ("~<" ?\\e,A+\e(B) | |
379 | ("~!" ?\e,A!\e(B) | |
380 | ("~?" ?\e,A?\e(B) | |
381 | ("~ " ?~) | |
382 | ) | |
383 | ||
384 | (quail-define-package | |
db9dfa94 | 385 | "latin-2-prefix" "Latin-2" "2>" t |
24b31c88 KH |
386 | "Latin-2 characters input method with prefix modifiers |
387 | ||
388 | effect | prefix | examples | |
389 | ------------+--------+---------- | |
390 | acute | ' | 'a -> \e,Ba\e(B, '' -> ?\e,B4\e(B | |
391 | circumflex | ^ | ^a -> \e,Bb\e(B | |
392 | diaeresis | \" | \"a -> \e,Bd\e(B, \"\" -> \e,B(\e(B | |
393 | breve | ~ | ~a -> \e,Bc\e(B | |
394 | caron | ~ | ~c -> \e,Bh\e(B | |
395 | cedilla | ` | `c -> \e,Bg\e(B, `e -> ?\e,Bj\e(B | |
396 | misc | ---- | 'd -> \e,Bp\e(B, `l -> \e,B3\e(B, `z -> \e,B?\e(B, ~o -> \e,Bu\e(B, ~u -> \e,B{\e(B | |
397 | symbol | ~ | `. -> \e,B\7f\e(B, ~~ -> \e,B"\e(B, ~. -> ?\e,B8\e(B | |
398 | " nil t) | |
399 | ||
400 | (quail-define-rules | |
401 | ("'A" ?\e,BA\e(B) | |
402 | ("'C" ?\e,BF\e(B) | |
403 | ("'D" ?\e,BP\e(B) | |
404 | ("'E" ?\e,BI\e(B) | |
405 | ("'I" ?\e,BM\e(B) | |
406 | ("'L" ?\e,BE\e(B) | |
407 | ("'N" ?\e,BQ\e(B) | |
408 | ("'O" ?\e,BS\e(B) | |
409 | ("'R" ?\e,B@\e(B) | |
410 | ("'S" ?\e,B&\e(B) | |
411 | ("'U" ?\e,BZ\e(B) | |
412 | ("'Y" ?\e,B]\e(B) | |
413 | ("'Z" ?\e,B,\e(B) | |
414 | ("'a" ?\e,Ba\e(B) | |
415 | ("'c" ?\e,Bf\e(B) | |
416 | ("'d" ?\e,Bp\e(B) | |
417 | ("'e" ?\e,Bi\e(B) | |
418 | ("'i" ?\e,Bm\e(B) | |
419 | ("'l" ?\e,Be\e(B) | |
420 | ("'n" ?\e,Bq\e(B) | |
421 | ("'o" ?\e,Bs\e(B) | |
422 | ("'r" ?\e,B`\e(B) | |
423 | ("'s" ?\e,B6\e(B) | |
424 | ("'u" ?\e,Bz\e(B) | |
425 | ("'y" ?\e,B}\e(B) | |
426 | ("'z" ?\e,B<\e(B) | |
427 | ("''" ?\e,B4\e(B) | |
428 | ("' " ?') | |
429 | ("`A" ?\e,B!\e(B) | |
430 | ("`C" ?\e,BG\e(B) | |
431 | ("`E" ?\e,BJ\e(B) | |
432 | ("`L" ?\e,B#\e(B) | |
433 | ("`S" ?\e,B*\e(B) | |
434 | ("`T" ?\e,B^\e(B) | |
435 | ("`Z" ?\e,B/\e(B) | |
436 | ("`a" ?\e,B1\e(B) | |
437 | ("`l" ?\e,B3\e(B) | |
438 | ("`c" ?\e,Bg\e(B) | |
439 | ("`e" ?\e,Bj\e(B) | |
440 | ("`s" ?\e,B:\e(B) | |
441 | ("`t" ?\e,B~\e(B) | |
442 | ("`z" ?\e,B?\e(B) | |
443 | ("``" ?\e,B*\e(B) | |
444 | ("`." ?\e,B\7f\e(B) | |
445 | ("` " ?`) | |
446 | ("^A" ?\e,BB\e(B) | |
447 | ("^I" ?\e,BN\e(B) | |
448 | ("^O" ?\e,BT\e(B) | |
449 | ("^a" ?\e,Bb\e(B) | |
450 | ("^i" ?\e,Bn\e(B) | |
451 | ("^o" ?\e,Bt\e(B) | |
452 | ("^^" ?^) | |
453 | ("^ " ?^) | |
454 | ("\"A" ?\e,BD\e(B) | |
455 | ("\"E" ?\e,BK\e(B) | |
456 | ("\"O" ?\e,BV\e(B) | |
457 | ("\"U" ?\e,B\\e(B) | |
458 | ("\"a" ?\e,Bd\e(B) | |
459 | ("\"e" ?\e,Bk\e(B) | |
460 | ("\"o" ?\e,Bv\e(B) | |
461 | ("\"s" ?\e,B_\e(B) | |
462 | ("\"u" ?\e,B|\e(B) | |
463 | ("\"\"" ?\e,B(\e(B) | |
464 | ("\" " ?\") | |
465 | ("~A" ?\e,BC\e(B) | |
466 | ("~C" ?\e,BH\e(B) | |
467 | ("~D" ?\e,BO\e(B) | |
468 | ("~L" ?\e,B%\e(B) | |
469 | ("~N" ?\e,BR\e(B) | |
470 | ("~O" ?\e,BU\e(B) | |
471 | ("~R" ?\e,BX\e(B) | |
472 | ("~S" ?\e,B)\e(B) | |
473 | ("~T" ?\e,B+\e(B) | |
474 | ("~U" ?\e,B[\e(B) | |
475 | ("~Z" ?\e,B.\e(B) | |
476 | ("~a" ?\e,Bc\e(B) | |
477 | ("~c" ?\e,Bh\e(B) | |
478 | ("~d" ?\e,Bo\e(B) | |
479 | ("~l" ?\e,B5\e(B) | |
480 | ("~n" ?\e,Br\e(B) | |
481 | ("~o" ?\e,Bu\e(B) | |
482 | ("~r" ?\e,Bx\e(B) | |
483 | ("~s" ?\e,B9\e(B) | |
484 | ("~t" ?\e,B;\e(B) | |
485 | ("~u" ?\e,B{\e(B) | |
486 | ("~z" ?\e,B>\e(B) | |
487 | ("~v" ?\e,B"\e(B) | |
488 | ("~~" ?\e,B"\e(B) | |
489 | ("~." ?\e,B8\e(B) | |
490 | ("~ " ?~) | |
491 | ) | |
492 | ||
493 | (quail-define-package | |
db9dfa94 | 494 | "latin-3-prefix" "Latin-3" "3>" t |
24b31c88 KH |
495 | "Latin-3 characters input method with prefix modifiers |
496 | ||
497 | effect | prefix | examples | |
498 | ------------+--------+---------- | |
499 | acute | ' | 'a -> \e,Ca\e(B, '' -> ?\e,C4\e(B | |
500 | grave | ` | `a -> \e,C`\e(B | |
501 | circumflex | ^ | ^a -> \e,Cb\e(B | |
502 | diaeresis | \" | \"a -> \e,Cd\e(B, \"\" -> \e,C(\e(B | |
503 | cedilla | ~ | ~c -> \e,Cg\e(B, ~s -> \e,C:\e(B, ~~ -> \e,C8\e(B | |
504 | dot above | ~ / . | ~o -> \e,Cu\e(B, /o -> \e,Cu\e(B, .o -> \e,Cu\e(B | |
505 | misc | ---- | \"s -> \e,C_\e(B, ~g -> \e,C;\e(B, ~u -> \e,C}\e(B, /h -> \e,C1\e(B, /i -> \e,C9\e(B | |
506 | symbol | ~ | ~` -> \e,C"\e(B, /# -> \e,C#\e(B, /$ -> \e,C$\e(B, // -> \e,C0\e(B | |
507 | " nil t) | |
508 | ||
509 | (quail-define-rules | |
510 | ("'A" ?\e,CA\e(B) | |
511 | ("'E" ?\e,CI\e(B) | |
512 | ("'I" ?\e,CM\e(B) | |
513 | ("'O" ?\e,CS\e(B) | |
514 | ("'U" ?\e,CZ\e(B) | |
515 | ("'a" ?\e,Ca\e(B) | |
516 | ("'e" ?\e,Ci\e(B) | |
517 | ("'i" ?\e,Cm\e(B) | |
518 | ("'o" ?\e,Cs\e(B) | |
519 | ("'u" ?\e,Cz\e(B) | |
520 | ("''" ?\e,C4\e(B) | |
521 | ("' " ?') | |
522 | ("`A" ?\e,C@\e(B) | |
523 | ("`E" ?\e,CH\e(B) | |
524 | ("`I" ?\e,CL\e(B) | |
525 | ("`O" ?\e,CR\e(B) | |
526 | ("`U" ?\e,CY\e(B) | |
527 | ("`a" ?\e,C`\e(B) | |
528 | ("`e" ?\e,Ch\e(B) | |
529 | ("`i" ?\e,Cl\e(B) | |
530 | ("`o" ?\e,Cr\e(B) | |
531 | ("`u" ?\e,Cy\e(B) | |
532 | ("``" ?`) | |
533 | ("` " ?`) | |
534 | ("^A" ?\e,CB\e(B) | |
535 | ("^C" ?\e,CF\e(B) | |
536 | ("^E" ?\e,CJ\e(B) | |
537 | ("^G" ?\e,CX\e(B) | |
538 | ("^H" ?\e,C&\e(B) | |
539 | ("^I" ?\e,CN\e(B) | |
540 | ("^J" ?\e,C,\e(B) | |
541 | ("^O" ?\e,CT\e(B) | |
542 | ("^S" ?\e,C^\e(B) | |
543 | ("^U" ?\e,C[\e(B) | |
544 | ("^a" ?\e,Cb\e(B) | |
545 | ("^c" ?\e,Cf\e(B) | |
546 | ("^e" ?\e,Cj\e(B) | |
547 | ("^g" ?\e,Cx\e(B) | |
548 | ("^h" ?\e,C6\e(B) | |
549 | ("^i" ?\e,Cn\e(B) | |
550 | ("^j" ?\e,C<\e(B) | |
551 | ("^o" ?\e,Ct\e(B) | |
552 | ("^s" ?\e,C~\e(B) | |
553 | ("^u" ?\e,C{\e(B) | |
554 | ("^^" ?^) | |
555 | ("^ " ?^) | |
556 | ("\"A" ?\e,CD\e(B) | |
557 | ("\"E" ?\e,CK\e(B) | |
558 | ("\"I" ?\e,CO\e(B) | |
559 | ("\"O" ?\e,CV\e(B) | |
560 | ("\"U" ?\e,C\\e(B) | |
561 | ("\"a" ?\e,Cd\e(B) | |
562 | ("\"e" ?\e,Ck\e(B) | |
563 | ("\"i" ?\e,Co\e(B) | |
564 | ("\"o" ?\e,Cv\e(B) | |
565 | ("\"u" ?\e,C|\e(B) | |
566 | ("\"s" ?\e,C_\e(B) | |
567 | ("\"\"" ?\e,C(\e(B) | |
568 | ("\" " ?\") | |
569 | ("~A" ?\e,CC\e(B) | |
570 | ("~C" ?\e,CG\e(B) | |
571 | ("~D" ?\e,CP\e(B) | |
572 | ("~N" ?\e,CQ\e(B) | |
573 | ("~O" ?\e,CU\e(B) | |
574 | ("~a" ?\e,Cc\e(B) | |
575 | ("~c" ?\e,Cg\e(B) | |
576 | ("~d" ?\e,Cp\e(B) | |
577 | ("~n" ?\e,Cq\e(B) | |
578 | ("~o" ?\e,Cu\e(B) | |
579 | ("~$" ?\e,C%\e(B) | |
580 | ("~S" ?\e,C*\e(B) | |
581 | ("~s" ?\e,C:\e(B) | |
582 | ("~G" ?\e,C+\e(B) | |
583 | ("~g" ?\e,C;\e(B) | |
584 | ("~U" ?\e,C]\e(B) | |
585 | ("~u" ?\e,C}\e(B) | |
586 | ("~`" ?\e,C"\e(B) | |
587 | ("~~" ?\e,C8\e(B) | |
588 | ("~ " ?~) | |
589 | ("/C" ?\e,CE\e(B) | |
590 | ("/G" ?\e,CU\e(B) | |
591 | ("/H" ?\e,C!\e(B) | |
592 | ("/I" ?\e,C)\e(B) | |
593 | ("/Z" ?\e,C/\e(B) | |
594 | ("/c" ?\e,Ce\e(B) | |
595 | ("/g" ?\e,Cu\e(B) | |
596 | ("/h" ?\e,C1\e(B) | |
597 | ("/i" ?\e,C9\e(B) | |
598 | ("/z" ?\e,C?\e(B) | |
599 | ("/r" ?\e,C.\e(B) | |
600 | ("/." ?\e,C\7f\e(B) | |
601 | ("/#" ?\e,C#\e(B) | |
602 | ("/$" ?\e,C$\e(B) | |
603 | ("//" ?\e,C0\e(B) | |
604 | ("/ " ?/) | |
605 | (".C" ?\e,CE\e(B) | |
606 | (".G" ?\e,CU\e(B) | |
607 | (".I" ?\e,C)\e(B) | |
608 | (".Z" ?\e,C/\e(B) | |
609 | (".c" ?\e,Ce\e(B) | |
610 | (".g" ?\e,Cu\e(B) | |
611 | (".z" ?\e,C?\e(B) | |
612 | ) |