]> code.delx.au - gnu-emacs/blob - leim/quail/latin-alt.el
Revision: emacs@sv.gnu.org/emacs--devo--0--patch-238
[gnu-emacs] / leim / quail / latin-alt.el
1 ;;; latin-alt.el --- Quail package for inputting various European characters -*-coding: iso-2022-7bit;-*-
2
3 ;; Copyright (C) 1997, 1998, 2001, 2002, 2006 Free Software Foundation, Inc.
4 ;; Copyright (C) 1999
5 ;; National Institute of Advanced Industrial Science and Technology (AIST)
6 ;; Registration Number H14PRO021
7
8 ;; Keywords: multilingual, input method, latin
9
10 ;; This file is part of GNU Emacs.
11
12 ;; GNU Emacs is free software; you can redistribute it and/or modify
13 ;; it under the terms of the GNU General Public License as published by
14 ;; the Free Software Foundation; either version 2, or (at your option)
15 ;; any later version.
16
17 ;; GNU Emacs is distributed in the hope that it will be useful,
18 ;; but WITHOUT ANY WARRANTY; without even the implied warranty of
19 ;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
20 ;; GNU General Public License for more details.
21
22 ;; You should have received a copy of the GNU General Public License
23 ;; along with GNU Emacs; see the file COPYING. If not, write to the
24 ;; Free Software Foundation, Inc., 51 Franklin Street, Fifth Floor,
25 ;; Boston, MA 02110-1301, USA.
26
27 ;; Author: TAKAHASHI Naoto <ntakahas@etl.go.jp>
28
29 ;;; Commentary:
30
31 ;;; Code:
32
33 (require 'quail)
34
35 (quail-define-package
36 "latin-1-alt-postfix" "Latin-1" "1<" t
37 "Latin-1 character input method with postfix modifiers
38
39 | postfix | examples
40 ------------+---------+----------
41 acute | ' | a' -> \e,Aa\e(B
42 grave | ` | a` -> \e,A`\e(B
43 circumflex | ^ | a^ -> \e,Ab\e(B
44 diaeresis | \" | a\" -> \e,Ad\e(B
45 tilde | ~ | a~ -> \e,Ac\e(B
46 cedilla | / | c/ -> \e,Ag\e(B
47 nordic | / | 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
48 others | /<> | s/ -> \e,A_\e(B ?/ -> \e,A?\e(B !/ -> \e,A!\e(B
49 | various | << -> \e,A+\e(B >> -> \e,A;\e(B o_ -> \e,A:\e(B a_ -> \e,A*\e(B
50
51 It would be natural to use comma for cedillas, but that would be
52 inconvenient in practice because commas are needed very often after a
53 letter.
54
55 Doubling the postfix separates the letter and postfix: e.g. a'' -> a'
56 " nil t nil nil nil nil nil nil nil nil t)
57
58 (quail-define-rules
59 ("A`" ?\e,A@\e(B)
60 ("A'" ?\e,AA\e(B)
61 ("A^" ?\e,AB\e(B)
62 ("A~" ?\e,AC\e(B)
63 ("A\"" ?\e,AD\e(B)
64 ("A/" ?\e,AE\e(B)
65 ("a`" ?\e,A`\e(B)
66 ("a'" ?\e,Aa\e(B)
67 ("a^" ?\e,Ab\e(B)
68 ("a~" ?\e,Ac\e(B)
69 ("a\"" ?\e,Ad\e(B)
70 ("a/" ?\e,Ae\e(B)
71 ("E`" ?\e,AH\e(B)
72 ("E'" ?\e,AI\e(B)
73 ("E^" ?\e,AJ\e(B)
74 ("E\"" ?\e,AK\e(B)
75 ("E/" ?\e,AF\e(B)
76 ("e`" ?\e,Ah\e(B)
77 ("e'" ?\e,Ai\e(B)
78 ("e^" ?\e,Aj\e(B)
79 ("e\"" ?\e,Ak\e(B)
80 ("e/" ?\e,Af\e(B)
81 ("I`" ?\e,AL\e(B)
82 ("i`" ?\e,Al\e(B)
83 ("I'" ?\e,AM\e(B)
84 ("i'" ?\e,Am\e(B)
85 ("I^" ?\e,AN\e(B)
86 ("i^" ?\e,An\e(B)
87 ("I\"" ?\e,AO\e(B)
88 ("i\"" ?\e,Ao\e(B)
89 ("O`" ?\e,AR\e(B)
90 ("o`" ?\e,Ar\e(B)
91 ("O'" ?\e,AS\e(B)
92 ("o'" ?\e,As\e(B)
93 ("O^" ?\e,AT\e(B)
94 ("o^" ?\e,At\e(B)
95 ("O~" ?\e,AU\e(B)
96 ("o~" ?\e,Au\e(B)
97 ("O\"" ?\e,AV\e(B)
98 ("o\"" ?\e,Av\e(B)
99 ("O/" ?\e,AX\e(B)
100 ("o/" ?\e,Ax\e(B)
101 ("U`" ?\e,AY\e(B)
102 ("u`" ?\e,Ay\e(B)
103 ("U'" ?\e,AZ\e(B)
104 ("u'" ?\e,Az\e(B)
105 ("U^" ?\e,A[\e(B)
106 ("u^" ?\e,A{\e(B)
107 ("U\"" ?\e,A\\e(B)
108 ("u\"" ?\e,A|\e(B)
109 ("Y'" ?\e,A]\e(B)
110 ("y'" ?\e,A}\e(B)
111 ("y\"" ?\e,A\7f\e(B)
112 ("D/" ?\e,AP\e(B)
113 ("d/" ?\e,Ap\e(B)
114 ("T/" ?\e,A^\e(B)
115 ("t/" ?\e,A~\e(B)
116 ("s/" ?\e,A_\e(B)
117 ("C/" ?\e,AG\e(B)
118 ("c/" ?\e,Ag\e(B)
119 ("N~" ?\e,AQ\e(B)
120 ("n~" ?\e,Aq\e(B)
121 ("?/" ?\e,A?\e(B)
122 ("!/" ?\e,A!\e(B)
123 ("<<" ?\e,A+\e(B)
124 (">>" ?\e,A;\e(B)
125 ("o_" ?\e,A:\e(B)
126 ("a_" ?\e,A*\e(B)
127
128 ("A``" ["A`"])
129 ("A''" ["A'"])
130 ("A^^" ["A^"])
131 ("A~~" ["A~"])
132 ("A\"\"" ["A\""])
133 ("A//" ["A/"])
134 ("a``" ["a`"])
135 ("a''" ["a'"])
136 ("a^^" ["a^"])
137 ("a~~" ["a~"])
138 ("a\"\"" ["a\""])
139 ("a//" ["a/"])
140 ("E``" ["E`"])
141 ("E''" ["E'"])
142 ("E^^" ["E^"])
143 ("E\"\"" ["E\""])
144 ("E//" ["E/"])
145 ("e``" ["e`"])
146 ("e''" ["e'"])
147 ("e^^" ["e^"])
148 ("e\"\"" ["e\""])
149 ("e//" ["e/"])
150 ("I``" ["I`"])
151 ("i``" ["i`"])
152 ("I''" ["I'"])
153 ("i''" ["i'"])
154 ("I^^" ["I^"])
155 ("i^^" ["i^"])
156 ("I\"\"" ["I\""])
157 ("i\"\"" ["i\""])
158 ("O``" ["O`"])
159 ("o``" ["o`"])
160 ("O''" ["O'"])
161 ("o''" ["o'"])
162 ("O^^" ["O^"])
163 ("o^^" ["o^"])
164 ("O~~" ["O~"])
165 ("o~~" ["o~"])
166 ("O\"\"" ["O\""])
167 ("o\"\"" ["o\""])
168 ("O//" ["O/"])
169 ("o//" ["o/"])
170 ("U``" ["U`"])
171 ("u``" ["u`"])
172 ("U''" ["U'"])
173 ("u''" ["u'"])
174 ("U^^" ["U^"])
175 ("u^^" ["u^"])
176 ("U\"\"" ["U\""])
177 ("u\"\"" ["u\""])
178 ("Y''" ["Y'"])
179 ("y''" ["y'"])
180 ("y\"\"" ["y\""])
181 ("D//" ["D/"])
182 ("d//" ["d/"])
183 ("T//" ["T/"])
184 ("t//" ["t/"])
185 ("s//" ["s/"])
186 ("C//" ["C/"])
187 ("c//" ["c/"])
188 ("N~~" ["N~"])
189 ("n~~" ["n~"])
190 ("?//" ["?/"])
191 ("!//" ["!/"])
192 ("<<<" ["<<"])
193 (">>>" [">>"])
194 ("o__" ["o_"])
195 ("a__" ["a_"])
196 )
197
198 (quail-define-package
199 "latin-2-alt-postfix" "Latin-2" "2<" t
200 "Latin-2 character input method with postfix modifiers
201
202 | postfix | examples
203 ------------+---------+----------
204 acute | ' | a' -> \e,Ba\e(B
205 ogonek | ` | a` -> \e,B1\e(B
206 diaeresis | \" | a\" -> \e,Bd\e(B
207 circumflex | ^ | a^ -> \e,Bb\e(B
208 breve | ~ | a~ -> \e,Bc\e(B
209 cedilla | ` | c` -> \e,Bg\e(B
210 caron | ~ | c~ -> \e,Bh\e(B
211 dbl. acute | : | o: -> \e,Bu\e(B
212 ring | ` | u` -> \e,By\e(B
213 dot | ` | z` -> \e,B?\e(B
214 stroke | / | d/ -> \e,Bp\e(B
215 others | / | s/ -> \e,B_\e(B
216
217 It would be natural to use period and comma for dots/rings and
218 cedillas/ogoneks, but that would inconvenient in practice, because
219 periods and commas are needed very often after a letter.
220
221 Doubling the postfix separates the letter and postfix: e.g. a'' -> a'
222 " nil t nil nil nil nil nil nil nil nil t)
223
224 (quail-define-rules
225 ("A'" ?\e,BA\e(B)
226 ("A`" ?\e,B!\e(B)
227 ("A\"" ?\e,BD\e(B)
228 ("A^" ?\e,BB\e(B)
229 ("A~" ?\e,BC\e(B)
230 ("C'" ?\e,BF\e(B)
231 ("C`" ?\e,BG\e(B)
232 ("C~" ?\e,BH\e(B)
233 ("D/" ?\e,BP\e(B)
234 ("D~" ?\e,BO\e(B)
235 ("E'" ?\e,BI\e(B)
236 ("E`" ?\e,BJ\e(B)
237 ("E\"" ?\e,BK\e(B)
238 ("E~" ?\e,BL\e(B)
239 ("I'" ?\e,BM\e(B)
240 ("I^" ?\e,BN\e(B)
241 ("L'" ?\e,BE\e(B)
242 ("L/" ?\e,B#\e(B)
243 ("L~" ?\e,B%\e(B)
244 ("N'" ?\e,BQ\e(B)
245 ("N~" ?\e,BR\e(B)
246 ("O'" ?\e,BS\e(B)
247 ("O:" ?\e,BU\e(B)
248 ("O\"" ?\e,BV\e(B)
249 ("O^" ?\e,BT\e(B)
250 ("R'" ?\e,B@\e(B)
251 ("R~" ?\e,BX\e(B)
252 ("S'" ?\e,B&\e(B)
253 ("S`" ?\e,B*\e(B)
254 ("S~" ?\e,B)\e(B)
255 ("T`" ?\e,B^\e(B)
256 ("T~" ?\e,B+\e(B)
257 ("U'" ?\e,BZ\e(B)
258 ("U:" ?\e,B[\e(B)
259 ("U\"" ?\e,B\\e(B)
260 ("U`" ?\e,BY\e(B)
261 ("Y'" ?\e,B]\e(B)
262 ("Z'" ?\e,B,\e(B)
263 ("Z`" ?\e,B/\e(B)
264 ("Z~" ?\e,B.\e(B)
265 ("a'" ?\e,Ba\e(B)
266 ("a`" ?\e,B1\e(B)
267 ("a\"" ?\e,Bd\e(B)
268 ("a^" ?\e,Bb\e(B)
269 ("a~" ?\e,Bc\e(B)
270 ("c'" ?\e,Bf\e(B)
271 ("c`" ?\e,Bg\e(B)
272 ("c~" ?\e,Bh\e(B)
273 ("d/" ?\e,Bp\e(B)
274 ("d~" ?\e,Bo\e(B)
275 ("e'" ?\e,Bi\e(B)
276 ("e`" ?\e,Bj\e(B)
277 ("e\"" ?\e,Bk\e(B)
278 ("e~" ?\e,Bl\e(B)
279 ("i'" ?\e,Bm\e(B)
280 ("i^" ?\e,Bn\e(B)
281 ("l'" ?\e,Be\e(B)
282 ("l/" ?\e,B3\e(B)
283 ("l~" ?\e,B5\e(B)
284 ("n'" ?\e,Bq\e(B)
285 ("n~" ?\e,Br\e(B)
286 ("o'" ?\e,Bs\e(B)
287 ("o:" ?\e,Bu\e(B)
288 ("o\"" ?\e,Bv\e(B)
289 ("o^" ?\e,Bt\e(B)
290 ("r'" ?\e,B`\e(B)
291 ("r~" ?\e,Bx\e(B)
292 ("s'" ?\e,B6\e(B)
293 ("s`" ?\e,B:\e(B)
294 ("s/" ?\e,B_\e(B)
295 ("s~" ?\e,B9\e(B)
296 ("t`" ?\e,B~\e(B)
297 ("t~" ?\e,B;\e(B)
298 ("u'" ?\e,Bz\e(B)
299 ("u:" ?\e,B{\e(B)
300 ("u\"" ?\e,B|\e(B)
301 ("u`" ?\e,By\e(B)
302 ("y'" ?\e,B}\e(B)
303 ("z'" ?\e,B<\e(B)
304 ("z`" ?\e,B?\e(B)
305 ("z~" ?\e,B>\e(B)
306
307 ("A''" ["A'"])
308 ("A``" ["A`"])
309 ("A\"\"" ["A\""])
310 ("A^^" ["A^"])
311 ("A~~" ["A~"])
312 ("C''" ["C'"])
313 ("C``" ["C`"])
314 ("C~~" ["C~"])
315 ("D//" ["D/"])
316 ("D~~" ["D~"])
317 ("E''" ["E'"])
318 ("E``" ["E`"])
319 ("E\"\"" ["E\""])
320 ("E~~" ["E~"])
321 ("I''" ["I'"])
322 ("I^^" ["I^"])
323 ("L''" ["L'"])
324 ("L//" ["L/"])
325 ("L~~" ["L~"])
326 ("N''" ["N'"])
327 ("N~~" ["N~"])
328 ("O''" ["O'"])
329 ("O::" ["O:"])
330 ("O\"\"" ["O\""])
331 ("O^^" ["O^"])
332 ("R''" ["R'"])
333 ("R~~" ["R~"])
334 ("S''" ["S'"])
335 ("S``" ["S`"])
336 ("S~~" ["S~"])
337 ("T``" ["T`"])
338 ("T~~" ["T~"])
339 ("U''" ["U'"])
340 ("U::" ["U:"])
341 ("U\"\"" ["U\""])
342 ("U``" ["U`"])
343 ("Y''" ["Y'"])
344 ("Z''" ["Z'"])
345 ("Z``" ["Z`"])
346 ("Z~~" ["Z~"])
347 ("a''" ["a'"])
348 ("a``" ["a`"])
349 ("a\"\"" ["a\""])
350 ("a^^" ["a^"])
351 ("a~~" ["a~"])
352 ("c''" ["c'"])
353 ("c``" ["c`"])
354 ("c~~" ["c~"])
355 ("d//" ["d/"])
356 ("d~~" ["d~"])
357 ("e''" ["e'"])
358 ("e``" ["e`"])
359 ("e\"\"" ["e\""])
360 ("e~~" ["e~"])
361 ("i''" ["i'"])
362 ("i^^" ["i^"])
363 ("l''" ["l'"])
364 ("l//" ["l/"])
365 ("l~~" ["l~"])
366 ("n''" ["n'"])
367 ("n~~" ["n~"])
368 ("o''" ["o'"])
369 ("o::" ["o:"])
370 ("o\"\"" ["o\""])
371 ("o^^" ["o^"])
372 ("r''" ["r'"])
373 ("r~~" ["r~"])
374 ("s''" ["s'"])
375 ("s``" ["s`"])
376 ("s//" ["s/"])
377 ("s~~" ["s~"])
378 ("t``" ["t`"])
379 ("t~~" ["t~"])
380 ("u''" ["u'"])
381 ("u::" ["u:"])
382 ("u\"\"" ["u\""])
383 ("u``" ["u`"])
384 ("y''" ["y'"])
385 ("z''" ["z'"])
386 ("z``" ["z`"])
387 ("z~~" ["z~"])
388 )
389
390 (quail-define-package
391 "latin-3-alt-postfix" "Latin-3" "3<" t
392 "Latin-3 character input method with postfix modifiers
393
394 | postfix | examples
395 ------------+---------+----------
396 acute | ' | a' -> \e,Ca\e(B
397 grave | ` | a` -> \e,C`\e(B
398 circumflex | ^ | a^ -> \e,Cb\e(B
399 diaeresis | \" | a\" -> \e,Cd\e(B
400 dot | / | c/ -> \e,Ce\e(B i/ -> \e,C9\e(B I/ -> \e,C)\e(B
401 cedilla | ` | c` -> \e,Cg\e(B
402 breve | ~ | g~ -> \e,C;\e(B
403 tilde | ~ | n~ -> \e,Cq\e(B
404 stroke | / | h/ -> \e,C1\e(B
405 others | / | s/ -> \e,C_\e(B
406
407 It would be natural to use period and comma for dots and cedillas, but
408 that would inconvenient in practice, because periods and commas are
409 needed very often after a letter.
410
411 Doubling the postfix separates the letter and postfix: e.g. a'' -> a'
412 " nil t nil nil nil nil nil nil nil nil t)
413
414 (quail-define-rules
415 ("A`" ?\e,C@\e(B)
416 ("A'" ?\e,CA\e(B)
417 ("A^" ?\e,CB\e(B)
418 ("A\"" ?\e,CD\e(B)
419 ("C/" ?\e,CE\e(B)
420 ("C^" ?\e,CF\e(B)
421 ("C`" ?\e,CG\e(B)
422 ("E`" ?\e,CH\e(B)
423 ("E'" ?\e,CI\e(B)
424 ("E^" ?\e,CJ\e(B)
425 ("E\"" ?\e,CK\e(B)
426 ("G~" ?\e,C+\e(B)
427 ("G/" ?\e,CU\e(B)
428 ("G^" ?\e,CX\e(B)
429 ("H/" ?\e,C!\e(B)
430 ("H^" ?\e,C&\e(B)
431 ("I/" ?\e,C)\e(B)
432 ("I`" ?\e,CL\e(B)
433 ("I'" ?\e,CM\e(B)
434 ("I^" ?\e,CN\e(B)
435 ("I\"" ?\e,CO\e(B)
436 ("J^" ?\e,C,\e(B)
437 ("N~" ?\e,CQ\e(B)
438 ("O`" ?\e,CR\e(B)
439 ("O'" ?\e,CS\e(B)
440 ("O^" ?\e,CT\e(B)
441 ("O\"" ?\e,CV\e(B)
442 ("S`" ?\e,C*\e(B)
443 ("S^" ?\e,C^\e(B)
444 ("U`" ?\e,CY\e(B)
445 ("U'" ?\e,CZ\e(B)
446 ("U^" ?\e,C[\e(B)
447 ("U\"" ?\e,C\\e(B)
448 ("U~" ?\e,C]\e(B)
449 ("Z/" ?\e,C/\e(B)
450 ("a`" ?\e,C`\e(B)
451 ("a'" ?\e,Ca\e(B)
452 ("a^" ?\e,Cb\e(B)
453 ("a\"" ?\e,Cd\e(B)
454 ("c/" ?\e,Ce\e(B)
455 ("c^" ?\e,Cf\e(B)
456 ("c`" ?\e,Cg\e(B)
457 ("e`" ?\e,Ch\e(B)
458 ("e'" ?\e,Ci\e(B)
459 ("e^" ?\e,Cj\e(B)
460 ("e\"" ?\e,Ck\e(B)
461 ("g~" ?\e,C;\e(B)
462 ("g/" ?\e,Cu\e(B)
463 ("g^" ?\e,Cx\e(B)
464 ("h/" ?\e,C1\e(B)
465 ("h^" ?\e,C6\e(B)
466 ("i/" ?\e,C9\e(B)
467 ("i`" ?\e,Cl\e(B)
468 ("i'" ?\e,Cm\e(B)
469 ("i^" ?\e,Cn\e(B)
470 ("i\"" ?\e,Co\e(B)
471 ("j^" ?\e,C<\e(B)
472 ("n~" ?\e,Cq\e(B)
473 ("o`" ?\e,Cr\e(B)
474 ("o'" ?\e,Cs\e(B)
475 ("o^" ?\e,Ct\e(B)
476 ("o\"" ?\e,Cv\e(B)
477 ("s`" ?\e,C:\e(B)
478 ("s/" ?\e,C_\e(B)
479 ("s^" ?\e,C~\e(B)
480 ("u`" ?\e,Cy\e(B)
481 ("u'" ?\e,Cz\e(B)
482 ("u^" ?\e,C{\e(B)
483 ("u\"" ?\e,C|\e(B)
484 ("u~" ?\e,C}\e(B)
485 ("z/" ?\e,C?\e(B)
486
487 ("A``" ["A`"])
488 ("A''" ["A'"])
489 ("A^^" ["A^"])
490 ("A\"\"" ["A\""])
491 ("C//" ["C/"])
492 ("C^^" ["C^"])
493 ("C``" ["C`"])
494 ("E``" ["E`"])
495 ("E''" ["E'"])
496 ("E^^" ["E^"])
497 ("E\"\"" ["E\""])
498 ("G~~" ["G~"])
499 ("G//" ["G/"])
500 ("G^^" ["G^"])
501 ("H//" ["H/"])
502 ("H^^" ["H^"])
503 ("I//" ["I/"])
504 ("I``" ["I`"])
505 ("I''" ["I'"])
506 ("I^^" ["I^"])
507 ("I\"\"" ["I\""])
508 ("J^^" ["J^"])
509 ("N~~" ["N~"])
510 ("O``" ["O`"])
511 ("O''" ["O'"])
512 ("O^^" ["O^"])
513 ("O\"\"" ["O\""])
514 ("S``" ["S`"])
515 ("S^^" ["S^"])
516 ("U``" ["U`"])
517 ("U''" ["U'"])
518 ("U^^" ["U^"])
519 ("U\"\"" ["U\""])
520 ("U~~" ["U~"])
521 ("Z//" ["Z/"])
522 ("a``" ["a`"])
523 ("a''" ["a'"])
524 ("a^^" ["a^"])
525 ("a\"\"" ["a\""])
526 ("c//" ["c/"])
527 ("c^^" ["c^"])
528 ("c``" ["c`"])
529 ("e``" ["e`"])
530 ("e''" ["e'"])
531 ("e^^" ["e^"])
532 ("e\"\"" ["e\""])
533 ("g~~" ["g~"])
534 ("g//" ["g/"])
535 ("g^^" ["g^"])
536 ("h//" ["h/"])
537 ("h^^" ["h^"])
538 ("i//" ["i/"])
539 ("i``" ["i`"])
540 ("i''" ["i'"])
541 ("i^^" ["i^"])
542 ("i\"\"" ["i\""])
543 ("j^^" ["j^"])
544 ("n~~" ["n~"])
545 ("o``" ["o`"])
546 ("o''" ["o'"])
547 ("o^^" ["o^"])
548 ("o\"\"" ["o\""])
549 ("s``" ["s`"])
550 ("s//" ["s/"])
551 ("s^^" ["s^"])
552 ("u``" ["u`"])
553 ("u''" ["u'"])
554 ("u^^" ["u^"])
555 ("u\"\"" ["u\""])
556 ("u~~" ["u~"])
557 ("z//" ["z/"])
558 )
559
560 (quail-define-package
561 "latin-4-alt-postfix" "Latin-4" "4<" t
562 "Latin-4 characters input method with postfix modifiers
563
564 | postfix | examples
565 ------------+---------+----------
566 acute | ' | a' -> \e,Da\e(B
567 circumflex | ^ | a^ -> \e,Db\e(B
568 diaeresis | \" | a\" -> \e,Dd\e(B
569 ogonek | ` | a` -> \e,D1\e(B
570 macron | - | a- -> \e,D`\e(B
571 tilde | ~ | a~ -> \e,Dc\e(B
572 caron | ~ | c~ -> \e,Dh\e(B
573 dot | ~ | e~ -> \e,Dl\e(B
574 cedilla | ` | k` -> \e,Ds\e(B g` -> \e,D;\e(B
575 stroke | / | d/ -> \e,Dp\e(B
576 nordic | / | a/ -> \e,De\e(B e/ -> \e,Df\e(B o/ -> \e,Dx\e(B
577 others | / | s/ -> \e,D_\e(B n/ -> \e,D?\e(B k/ -> \e,D"\e(B
578
579 It would be natural to use period and comma for dots and
580 cedillas/ogoneks, but that would inconvenient in practice, because
581 periods and commas are needed very often after a letter.
582
583 Doubling the postfix separates the letter and postfix: e.g. a'' -> a'
584 " nil t nil nil nil nil nil nil nil nil t)
585
586 (quail-define-rules
587 ("A`" ?\e,D!\e(B)
588 ("A-" ?\e,D@\e(B)
589 ("A'" ?\e,DA\e(B)
590 ("A^" ?\e,DB\e(B)
591 ("A~" ?\e,DC\e(B)
592 ("A\"" ?\e,DD\e(B)
593 ("A/" ?\e,DE\e(B)
594 ("C~" ?\e,DH\e(B)
595 ("D/" ?\e,DP\e(B)
596 ("E/" ?\e,DF\e(B)
597 ("E-" ?\e,D*\e(B)
598 ("E'" ?\e,DI\e(B)
599 ("E`" ?\e,DJ\e(B)
600 ("E\"" ?\e,DK\e(B)
601 ("E~" ?\e,DL\e(B)
602 ("G`" ?\e,D+\e(B)
603 ("I~" ?\e,D%\e(B)
604 ("I`" ?\e,DG\e(B)
605 ("I'" ?\e,DM\e(B)
606 ("I^" ?\e,DN\e(B)
607 ("I-" ?\e,DO\e(B)
608 ("K`" ?\e,DS\e(B)
609 ("L`" ?\e,D&\e(B)
610 ("N/" ?\e,D=\e(B)
611 ("N`" ?\e,DQ\e(B)
612 ("O-" ?\e,DR\e(B)
613 ("O^" ?\e,DT\e(B)
614 ("O~" ?\e,DU\e(B)
615 ("O\"" ?\e,DV\e(B)
616 ("O/" ?\e,DX\e(B)
617 ("R`" ?\e,D#\e(B)
618 ("S~" ?\e,D)\e(B)
619 ("T/" ?\e,D,\e(B)
620 ("U`" ?\e,DY\e(B)
621 ("U'" ?\e,DZ\e(B)
622 ("U^" ?\e,D[\e(B)
623 ("U\"" ?\e,D\\e(B)
624 ("U~" ?\e,D]\e(B)
625 ("U-" ?\e,D^\e(B)
626 ("Z~" ?\e,D.\e(B)
627 ("a`" ?\e,D1\e(B)
628 ("a-" ?\e,D`\e(B)
629 ("a'" ?\e,Da\e(B)
630 ("a^" ?\e,Db\e(B)
631 ("a~" ?\e,Dc\e(B)
632 ("a\"" ?\e,Dd\e(B)
633 ("a/" ?\e,De\e(B)
634 ("c~" ?\e,Dh\e(B)
635 ("d/" ?\e,Dp\e(B)
636 ("e/" ?\e,Df\e(B)
637 ("e-" ?\e,D:\e(B)
638 ("e'" ?\e,Di\e(B)
639 ("e`" ?\e,Dj\e(B)
640 ("e\"" ?\e,Dk\e(B)
641 ("e~" ?\e,Dl\e(B)
642 ("g`" ?\e,D;\e(B)
643 ("i~" ?\e,D5\e(B)
644 ("i`" ?\e,Dg\e(B)
645 ("i'" ?\e,Dm\e(B)
646 ("i^" ?\e,Dn\e(B)
647 ("i-" ?\e,Do\e(B)
648 ("k/" ?\e,D"\e(B)
649 ("k`" ?\e,Ds\e(B)
650 ("l`" ?\e,D6\e(B)
651 ("n/" ?\e,D?\e(B)
652 ("n`" ?\e,Dq\e(B)
653 ("o-" ?\e,Dr\e(B)
654 ("o^" ?\e,Dt\e(B)
655 ("o~" ?\e,Du\e(B)
656 ("o\"" ?\e,Dv\e(B)
657 ("o/" ?\e,Dx\e(B)
658 ("r`" ?\e,D3\e(B)
659 ("s/" ?\e,D_\e(B)
660 ("s~" ?\e,D9\e(B)
661 ("t/" ?\e,D<\e(B)
662 ("u`" ?\e,Dy\e(B)
663 ("u'" ?\e,Dz\e(B)
664 ("u^" ?\e,D{\e(B)
665 ("u\"" ?\e,D|\e(B)
666 ("u~" ?\e,D}\e(B)
667 ("u-" ?\e,D~\e(B)
668 ("z~" ?\e,D>\e(B)
669
670 ("A``" ["A`"])
671 ("A--" ["A-"])
672 ("A''" ["A'"])
673 ("A^^" ["A^"])
674 ("A~~" ["A~"])
675 ("A\"\"" ["A\""])
676 ("A//" ["A/"])
677 ("C~~" ["C~"])
678 ("D//" ["D/"])
679 ("E//" ["E/"])
680 ("E--" ["E-"])
681 ("E''" ["E'"])
682 ("E``" ["E`"])
683 ("E\"\"" ["E\""])
684 ("E~~" ["E~"])
685 ("G``" ["G`"])
686 ("I~~" ["I~"])
687 ("I``" ["I`"])
688 ("I''" ["I'"])
689 ("I^^" ["I^"])
690 ("I--" ["I-"])
691 ("K``" ["K`"])
692 ("L``" ["L`"])
693 ("N//" ["N/"])
694 ("N``" ["N`"])
695 ("O--" ["O-"])
696 ("O^^" ["O^"])
697 ("O~~" ["O~"])
698 ("O\"\"" ["O\""])
699 ("O//" ["O/"])
700 ("R``" ["R`"])
701 ("S~~" ["S~"])
702 ("T//" ["T/"])
703 ("U``" ["U`"])
704 ("U''" ["U'"])
705 ("U^^" ["U^"])
706 ("U\"\"" ["U\""])
707 ("U~~" ["U~"])
708 ("U--" ["U-"])
709 ("Z~~" ["Z~"])
710 ("a``" ["a`"])
711 ("a--" ["a-"])
712 ("a''" ["a'"])
713 ("a^^" ["a^"])
714 ("a~~" ["a~"])
715 ("a\"\"" ["a\""])
716 ("a//" ["a/"])
717 ("c~~" ["c~"])
718 ("d//" ["d/"])
719 ("e//" ["e/"])
720 ("e--" ["e-"])
721 ("e''" ["e'"])
722 ("e``" ["e`"])
723 ("e\"\"" ["e\""])
724 ("e~~" ["e~"])
725 ("g``" ["g`"])
726 ("i~~" ["i~"])
727 ("i``" ["i`"])
728 ("i''" ["i'"])
729 ("i^^" ["i^"])
730 ("i--" ["i-"])
731 ("k//" ["k/"])
732 ("k``" ["k`"])
733 ("l``" ["l`"])
734 ("n//" ["n/"])
735 ("n``" ["n`"])
736 ("o--" ["o-"])
737 ("o^^" ["o^"])
738 ("o~~" ["o~"])
739 ("o\"\"" ["o\""])
740 ("o//" ["o/"])
741 ("r``" ["r`"])
742 ("s//" ["s/"])
743 ("s~~" ["s~"])
744 ("t//" ["t/"])
745 ("u``" ["u`"])
746 ("u''" ["u'"])
747 ("u^^" ["u^"])
748 ("u\"\"" ["u\""])
749 ("u~~" ["u~"])
750 ("u--" ["u-"])
751 ("z~~" ["z~"])
752 )
753
754 (quail-define-package
755 "latin-5-alt-postfix" "Latin-5" "5<" t
756 "Latin-5 characters input method with postfix modifiers
757
758 | postfix | examples
759 ------------+---------+----------
760 acute | ' | a' -> \e,Ma\e(B
761 grave | ` | a` -> \e,M`\e(B
762 circumflex | ^ | a^ -> \e,Mb\e(B
763 diaeresis | \" | a\" -> \e,Md\e(B
764 tilde | ~ | a~ -> \e,Mc\e(B
765 breve | ~ | g~ -> \e,Mp\e(B
766 cedilla | ` | c` -> \e,Mg\e(B
767 dot | / | i/ -> \e,M}\e(B I/ -> \e,M]\e(B
768 nordic | / | a/ -> \e,Me\e(B e/ -> \e,Mf\e(B o/ -> \e,Mx\e(B
769 others | / | s/ -> \e,M_\e(B
770
771 It would be natural to use period and comma for dots and cedillas, but
772 that would inconvenient in practice, because periods and commas are
773 needed very often after a letter.
774
775 Doubling the postfix separates the letter and postfix: e.g. a'' -> a'
776 " nil t nil nil nil nil nil nil nil nil t)
777
778 (quail-define-rules
779 ("A'" ?\e,MA\e(B)
780 ("A/" ?\e,ME\e(B)
781 ("A\"" ?\e,MD\e(B)
782 ("A^" ?\e,MB\e(B)
783 ("A`" ?\e,M@\e(B)
784 ("A~" ?\e,MC\e(B)
785 ("C`" ?\e,MG\e(B)
786 ("E'" ?\e,MI\e(B)
787 ("E/" ?\e,MF\e(B)
788 ("E\"" ?\e,MK\e(B)
789 ("E^" ?\e,MJ\e(B)
790 ("E`" ?\e,MH\e(B)
791 ("G~" ?\e,MP\e(B)
792 ("I'" ?\e,MM\e(B)
793 ("I/" ?\e,M]\e(B)
794 ("I\"" ?\e,MO\e(B)
795 ("I^" ?\e,MN\e(B)
796 ("I`" ?\e,ML\e(B)
797 ("N~" ?\e,MQ\e(B)
798 ("O'" ?\e,MS\e(B)
799 ("O/" ?\e,MX\e(B)
800 ("O\"" ?\e,MV\e(B)
801 ("O^" ?\e,MT\e(B)
802 ("O`" ?\e,MR\e(B)
803 ("O~" ?\e,MU\e(B)
804 ("S`" ?\e,M^\e(B)
805 ("U'" ?\e,MZ\e(B)
806 ("U\"" ?\e,M\\e(B)
807 ("U^" ?\e,M[\e(B)
808 ("U`" ?\e,MY\e(B)
809 ("a'" ?\e,Ma\e(B)
810 ("a/" ?\e,Me\e(B)
811 ("a\"" ?\e,Md\e(B)
812 ("a^" ?\e,Mb\e(B)
813 ("a`" ?\e,M`\e(B)
814 ("a~" ?\e,Mc\e(B)
815 ("c`" ?\e,Mg\e(B)
816 ("e'" ?\e,Mi\e(B)
817 ("e/" ?\e,Mf\e(B)
818 ("e\"" ?\e,Mk\e(B)
819 ("e^" ?\e,Mj\e(B)
820 ("e`" ?\e,Mh\e(B)
821 ("g~" ?\e,Mp\e(B)
822 ("i'" ?\e,Mm\e(B)
823 ("i/" ?\e,M}\e(B)
824 ("i\"" ?\e,Mo\e(B)
825 ("i^" ?\e,Mn\e(B)
826 ("i`" ?\e,Ml\e(B)
827 ("n~" ?\e,Mq\e(B)
828 ("o'" ?\e,Ms\e(B)
829 ("o/" ?\e,Mx\e(B)
830 ("o\"" ?\e,Mv\e(B)
831 ("o^" ?\e,Mt\e(B)
832 ("o`" ?\e,Mr\e(B)
833 ("o~" ?\e,Mu\e(B)
834 ("s`" ?\e,M~\e(B)
835 ("s/" ?\e,M_\e(B)
836 ("u'" ?\e,Mz\e(B)
837 ("u\"" ?\e,M|\e(B)
838 ("u^" ?\e,M{\e(B)
839 ("u`" ?\e,My\e(B)
840 ("y\"" ?\e,M\7f\e(B)
841
842 ("A''" ["A'"])
843 ("A//" ["A/"])
844 ("A\"\"" ["A\""])
845 ("A^^" ["A^"])
846 ("A``" ["A`"])
847 ("A~~" ["A~"])
848 ("C``" ["C`"])
849 ("E''" ["E'"])
850 ("E//" ["E/"])
851 ("E\"\"" ["E\""])
852 ("E^^" ["E^"])
853 ("E``" ["E`"])
854 ("G~~" ["G~"])
855 ("I''" ["I'"])
856 ("I//" ["I/"])
857 ("I\"\"" ["I\""])
858 ("I^^" ["I^"])
859 ("I``" ["I`"])
860 ("N~~" ["N~"])
861 ("O''" ["O'"])
862 ("O//" ["O/"])
863 ("O\"\"" ["O\""])
864 ("O^^" ["O^"])
865 ("O``" ["O`"])
866 ("O~~" ["O~"])
867 ("S``" ["S`"])
868 ("U''" ["U'"])
869 ("U\"\"" ["U\""])
870 ("U^^" ["U^"])
871 ("U``" ["U`"])
872 ("a''" ["a'"])
873 ("a//" ["a/"])
874 ("a\"\"" ["a\""])
875 ("a^^" ["a^"])
876 ("a``" ["a`"])
877 ("a~~" ["a~"])
878 ("c``" ["c`"])
879 ("e''" ["e'"])
880 ("e//" ["e/"])
881 ("e\"\"" ["e\""])
882 ("e^^" ["e^"])
883 ("e``" ["e`"])
884 ("g~~" ["g~"])
885 ("i''" ["i'"])
886 ("i//" ["i/"])
887 ("i\"\"" ["i\""])
888 ("i^^" ["i^"])
889 ("i``" ["i`"])
890 ("n~~" ["n~"])
891 ("o''" ["o'"])
892 ("o//" ["o/"])
893 ("o\"\"" ["o\""])
894 ("o^^" ["o^"])
895 ("o``" ["o`"])
896 ("o~~" ["o~"])
897 ("s``" ["s`"])
898 ("s//" ["s/"])
899 ("u''" ["u'"])
900 ("u\"\"" ["u\""])
901 ("u^^" ["u^"])
902 ("u``" ["u`"])
903 ("y\"\"" ["y\""])
904 )
905
906 (quail-define-package
907 "danish-alt-postfix" "Latin-1" "DA<" t
908 "Danish input method (rule: AE -> \e,AF\e(B, OE -> \e,AX\e(B, AA -> \e,AE\e(B, E' -> \e,AI\e(B)
909
910 Doubling the postfix separates the letter and postfix: e.g. aee -> ae
911 "
912 nil t nil nil nil nil nil nil nil nil t)
913
914 (quail-define-rules
915 ("AE" ?\e,AF\e(B)
916 ("ae" ?\e,Af\e(B)
917 ("OE" ?\e,AX\e(B)
918 ("oe" ?\e,Ax\e(B)
919 ("AA" ?\e,AE\e(B)
920 ("aa" ?\e,Ae\e(B)
921 ("E'" ?\e,AI\e(B)
922 ("e'" ?\e,Ai\e(B)
923
924 ("AEE" ["AE"])
925 ("aee" ["ae"])
926 ("OEE" ["OE"])
927 ("oee" ["oe"])
928 ("AAA" ["AA"])
929 ("aaa" ["aa"])
930 ("E''" ["E'"])
931 ("e''" ["e'"])
932 )
933
934 (quail-define-package
935 "esperanto-alt-postfix" "Latin-3" "EO<" t
936 "Esperanto input method with postfix modifiers
937
938 A following ^ or x will produce an accented character,
939 e.g. c^ -> \e,Cf\e(B gx -> \e,Cx\e(B u^ -> \e,C}\e(B.
940
941 Doubling the postfix separates the letter and postfix,
942 e.g. a'' -> a'.
943 " nil t nil nil nil nil nil nil nil nil t)
944
945 (quail-define-rules
946 ("Cx" ?\e,CF\e(B)
947 ("C^" ?\e,CF\e(B)
948 ("cx" ?\e,Cf\e(B)
949 ("c^" ?\e,Cf\e(B)
950 ("Gx" ?\e,CX\e(B)
951 ("G^" ?\e,CX\e(B)
952 ("gx" ?\e,Cx\e(B)
953 ("g^" ?\e,Cx\e(B)
954 ("Hx" ?\e,C&\e(B)
955 ("H^" ?\e,C&\e(B)
956 ("hx" ?\e,C6\e(B)
957 ("h^" ?\e,C6\e(B)
958 ("Jx" ?\e,C,\e(B)
959 ("J^" ?\e,C,\e(B)
960 ("jx" ?\e,C<\e(B)
961 ("j^" ?\e,C<\e(B)
962 ("Sx" ?\e,C^\e(B)
963 ("S^" ?\e,C^\e(B)
964 ("sx" ?\e,C~\e(B)
965 ("s^" ?\e,C~\e(B)
966 ("Ux" ?\e,C]\e(B)
967 ("U^" ?\e,C]\e(B)
968 ("ux" ?\e,C}\e(B)
969 ("u^" ?\e,C}\e(B)
970
971 ("Cxx" ["Cx"])
972 ("C^^" ["C^"])
973 ("cxx" ["cx"])
974 ("c^^" ["c^"])
975 ("Gxx" ["Gx"])
976 ("G^^" ["G^"])
977 ("gxx" ["gx"])
978 ("g^^" ["g^"])
979 ("Hxx" ["Hx"])
980 ("H^^" ["H^"])
981 ("hxx" ["hx"])
982 ("h^^" ["h^"])
983 ("Jxx" ["Jx"])
984 ("J^^" ["J^"])
985 ("jxx" ["jx"])
986 ("j^^" ["j^"])
987 ("Sxx" ["Sx"])
988 ("S^^" ["S^"])
989 ("sxx" ["sx"])
990 ("s^^" ["s^"])
991 ("Uxx" ["Ux"])
992 ("U^^" ["U^"])
993 ("uxx" ["ux"])
994 ("u^^" ["u^"])
995 )
996
997 (quail-define-package
998 "finnish-alt-postfix" "Latin-1" "FI<" t
999 "Finnish (Suomi) input method
1000
1001 AE -> \e,AD\e(B
1002 AEE -> AE
1003 OE -> \e,AV\e(B
1004 OEE -> OE
1005 "
1006 nil t nil nil nil nil nil nil nil nil t)
1007
1008 (quail-define-rules
1009 ("AE" ?\e,AD\e(B)
1010 ("ae" ?\e,Ad\e(B)
1011 ("OE" ?\e,AV\e(B)
1012 ("oe" ?\e,Av\e(B)
1013
1014 ("AEE" ["AE"])
1015 ("aee" ["ae"])
1016 ("OEE" ["OE"])
1017 ("oee" ["oe"])
1018 )
1019
1020 (quail-define-package
1021 "french-alt-postfix" "French" "FR<" t
1022 "French (Fran\e,Ag\e(Bais) input method with postfix modifiers
1023
1024 ` pour grave, ' pour aigu, ^ pour circonflexe, et \" pour tr\e,Ai\e(Bma.
1025 Par exemple: a` -> \e,A`\e(B e' -> \e,Ai\e(B.
1026
1027 \e,AG\e(B, \e,A+\e(B, et \e,A;\e(B sont produits par C/, <<, et >>.
1028
1029 En doublant la frappe des diacritiques, ils s'isoleront de la lettre.
1030 Par exemple: e'' -> e'
1031
1032 <e dans l'o> n'est pas disponible."
1033 nil t nil nil nil nil nil nil nil nil t)
1034
1035 (quail-define-rules
1036 ("A`" ?\e,A@\e(B)
1037 ("A^" ?\e,AB\e(B)
1038 ("a`" ?\e,A`\e(B)
1039 ("a^" ?\e,Ab\e(B)
1040 ("E`" ?\e,AH\e(B)
1041 ("E'" ?\e,AI\e(B)
1042 ("E^" ?\e,AJ\e(B)
1043 ("E\"" ?\e,AK\e(B)
1044 ("e`" ?\e,Ah\e(B)
1045 ("e'" ?\e,Ai\e(B)
1046 ("e^" ?\e,Aj\e(B)
1047 ("e\"" ?\e,Ak\e(B)
1048 ("I^" ?\e,AN\e(B)
1049 ("I\"" ?\e,AO\e(B)
1050 ("i^" ?\e,An\e(B)
1051 ("i\"" ?\e,Ao\e(B)
1052 ("O^" ?\e,AT\e(B)
1053 ("o^" ?\e,At\e(B)
1054 ("U`" ?\e,AY\e(B)
1055 ("U^" ?\e,A[\e(B)
1056 ("U\"" ?\e,A\\e(B)
1057 ("u`" ?\e,Ay\e(B)
1058 ("u^" ?\e,A{\e(B)
1059 ("u\"" ?\e,A|\e(B)
1060 ("C/" ?\e,AG\e(B)
1061 ("c/" ?\e,Ag\e(B)
1062 ("<<" ?\e,A+\e(B)
1063 (">>" ?\e,A;\e(B)
1064
1065 ("A``" ["A`"])
1066 ("A^^" ["A^"])
1067 ("a``" ["a`"])
1068 ("a^^" ["a^"])
1069 ("E``" ["E`"])
1070 ("E''" ["E'"])
1071 ("E^^" ["E^"])
1072 ("E\"\"" ["E\""])
1073 ("e``" ["e`"])
1074 ("e''" ["e'"])
1075 ("e^^" ["e^"])
1076 ("e\"\"" ["e\""])
1077 ("I^^" ["I^"])
1078 ("I\"\"" ["I\""])
1079 ("i^^" ["i^"])
1080 ("i\"\"" ["i\""])
1081 ("O^^" ["O^"])
1082 ("o^^" ["o^"])
1083 ("U``" ["U`"])
1084 ("U^^" ["U^"])
1085 ("U\"\"" ["U\""])
1086 ("u``" ["u`"])
1087 ("u^^" ["u^"])
1088 ("u\"\"" ["u\""])
1089 ("C//" ["C/"])
1090 ("c//" ["c/"])
1091 ("<<<" ["<<"])
1092 (">>>" [">>"])
1093 )
1094
1095 (quail-define-package
1096 "german-alt-postfix" "German" "DE<" t
1097 "German (Deutsch) input method
1098
1099 ae -> \e,Ad\e(B
1100 aee -> ae
1101 oe -> \e,Av\e(B
1102 oee -> oe
1103 ue -> \e,A|\e(B
1104 uee -> ue
1105 sz -> \e,A_\e(B
1106 szz -> sz
1107 "
1108 nil t nil nil nil nil nil nil nil nil t)
1109
1110 (quail-define-rules
1111 ("AE" ?\e,AD\e(B)
1112 ("ae" ?\e,Ad\e(B)
1113 ("OE" ?\e,AV\e(B)
1114 ("oe" ?\e,Av\e(B)
1115 ("UE" ?\e,A\\e(B)
1116 ("ue" ?\e,A|\e(B)
1117 ("sz" ?\e,A_\e(B)
1118
1119 ("AEE" ["AE"])
1120 ("aee" ["ae"])
1121 ("OEE" ["OE"])
1122 ("oee" ["oe"])
1123 ("UEE" ["UE"])
1124 ("uee" ["ue"])
1125 ("szz" ["sz"])
1126 )
1127
1128 (quail-define-package
1129 "icelandic-alt-postfix" "Latin-1" "IS<" t
1130 "Icelandic (\e,AM\e(Bslenska) input method with postfix modifiers
1131
1132 A' -> \e,AA\e(B
1133 E' -> \e,AI\e(B
1134 I' -> \e,AM\e(B
1135 O' -> \e,AS\e(B
1136 U' -> \e,AZ\e(B
1137 Y' -> \e,A]\e(B
1138 AE -> \e,AF\e(B
1139 OE -> \e,AV\e(B
1140 D/ -> \e,AP\e(B (eth)
1141 T/ -> \e,A^\e(B (thorn)
1142
1143 Doubling the postfix separates the letter and postfix: e.g. a'' -> a'
1144 " nil t nil nil nil nil nil nil nil nil t)
1145
1146 (quail-define-rules
1147 ("A'" ?\e,AA\e(B)
1148 ("a'" ?\e,Aa\e(B)
1149 ("E'" ?\e,AI\e(B)
1150 ("e'" ?\e,Ai\e(B)
1151 ("I'" ?\e,AM\e(B)
1152 ("i'" ?\e,Am\e(B)
1153 ("O'" ?\e,AS\e(B)
1154 ("o'" ?\e,As\e(B)
1155 ("U'" ?\e,AZ\e(B)
1156 ("u'" ?\e,Az\e(B)
1157 ("Y'" ?\e,A]\e(B)
1158 ("y'" ?\e,A}\e(B)
1159 ("AE" ?\e,AF\e(B)
1160 ("ae" ?\e,Af\e(B)
1161 ("OE" ?\e,AV\e(B)
1162 ("oe" ?\e,Av\e(B)
1163 ("D/" ?\e,AP\e(B)
1164 ("d/" ?\e,Ap\e(B)
1165 ("T/" ?\e,A^\e(B)
1166 ("t/" ?\e,A~\e(B)
1167
1168 ("A''" ["A'"])
1169 ("a''" ["a'"])
1170 ("E''" ["E'"])
1171 ("e''" ["e'"])
1172 ("I''" ["I'"])
1173 ("i''" ["i'"])
1174 ("O''" ["O'"])
1175 ("o''" ["o'"])
1176 ("U''" ["U'"])
1177 ("u''" ["u'"])
1178 ("Y''" ["Y'"])
1179 ("y''" ["y'"])
1180 ("AEE" ["AE"])
1181 ("aee" ["ae"])
1182 ("OEE" ["OE"])
1183 ("oee" ["oe"])
1184 ("D//" ["D/"])
1185 ("d//" ["d/"])
1186 ("T//" ["T/"])
1187 ("t//" ["t/"])
1188 )
1189
1190 (quail-define-package
1191 "italian-alt-postfix" "Latin-1" "IT<" t
1192 "Italian (Italiano) input method with postfix modifiers
1193
1194 a' -> \e,Aa\e(B A' -> \e,AA\e(B a` -> \e,A`\e(B A` -> \e,A@\e(B i^ -> \e,An\e(B << -> \e,A+\e(B
1195 e' -> \e,Ai\e(B E' -> \e,AI\e(B e` -> \e,Ah\e(B E` -> \e,AH\e(B I^ -> \e,AN\e(B >> -> \e,A;\e(B
1196 i' -> \e,Am\e(B I' -> \e,AM\e(B i` -> \e,Al\e(B I` -> \e,AL\e(B o_ -> \e,A:\e(B
1197 o' -> \e,As\e(B O' -> \e,AS\e(B o` -> \e,Ar\e(B O` -> \e,AR\e(B a_ -> \e,A*\e(B
1198 u' -> \e,Az\e(B U' -> \e,AZ\e(B u` -> \e,Ay\e(B U` -> \e,AY\e(B
1199
1200 This method is for purists who like accents the old way.
1201
1202 Doubling the postfix separates the letter and postfix: e.g. a`` -> a`
1203 " nil t nil nil nil nil nil nil nil nil t)
1204
1205 (quail-define-rules
1206 ("A`" ?\e,A@\e(B)
1207 ("A'" ?\e,AA\e(B)
1208 ("a`" ?\e,A`\e(B)
1209 ("a'" ?\e,Aa\e(B)
1210 ("E`" ?\e,AH\e(B)
1211 ("E'" ?\e,AI\e(B)
1212 ("e`" ?\e,Ah\e(B)
1213 ("e'" ?\e,Ai\e(B)
1214 ("I`" ?\e,AL\e(B)
1215 ("i`" ?\e,Al\e(B)
1216 ("I'" ?\e,AM\e(B)
1217 ("i'" ?\e,Am\e(B)
1218 ("I^" ?\e,AN\e(B)
1219 ("i^" ?\e,An\e(B)
1220 ("O`" ?\e,AR\e(B)
1221 ("o`" ?\e,Ar\e(B)
1222 ("O'" ?\e,AS\e(B)
1223 ("o'" ?\e,As\e(B)
1224 ("U`" ?\e,AY\e(B)
1225 ("u`" ?\e,Ay\e(B)
1226 ("U'" ?\e,AZ\e(B)
1227 ("u'" ?\e,Az\e(B)
1228 ("<<" ?\e,A+\e(B)
1229 (">>" ?\e,A;\e(B)
1230 ("o_" ?\e,A:\e(B)
1231 ("a_" ?\e,A*\e(B)
1232
1233 ("A``" ["A`"])
1234 ("A''" ["A'"])
1235 ("a``" ["a`"])
1236 ("a''" ["a'"])
1237 ("E``" ["E`"])
1238 ("E''" ["E'"])
1239 ("e``" ["e`"])
1240 ("e''" ["e'"])
1241 ("I``" ["I`"])
1242 ("i``" ["i`"])
1243 ("I''" ["I'"])
1244 ("i''" ["i'"])
1245 ("I^^" ["I^"])
1246 ("i^^" ["i^"])
1247 ("O``" ["O`"])
1248 ("o``" ["o`"])
1249 ("O''" ["O'"])
1250 ("o''" ["o'"])
1251 ("U``" ["U`"])
1252 ("u``" ["u`"])
1253 ("U''" ["U'"])
1254 ("u''" ["u'"])
1255 ("<<<" ["<<"])
1256 (">>>" [">>"])
1257 ("o__" ["o_"])
1258 ("a__" ["a_"])
1259 )
1260
1261 (quail-define-package
1262 "norwegian-alt-postfix" "Latin-1" "NO<" t
1263 "Norwegian (Norsk) input method (rule: AE->\e,AF\e(B, OE->\e,AX\e(B, AA->\e,AE\e(B, E'->\e,AI\e(B)
1264
1265 Doubling the postfix separates the letter and postfix: e.g. aee -> ae
1266 "
1267 nil t nil nil nil nil nil nil nil nil t)
1268
1269 (quail-define-rules
1270 ("AE" ?\e,AF\e(B)
1271 ("ae" ?\e,Af\e(B)
1272 ("OE" ?\e,AX\e(B)
1273 ("oe" ?\e,Ax\e(B)
1274 ("AA" ?\e,AE\e(B)
1275 ("aa" ?\e,Ae\e(B)
1276 ("E'" ?\e,AI\e(B)
1277 ("e'" ?\e,Ai\e(B)
1278
1279 ("AEE" ["AE"])
1280 ("aee" ["ae"])
1281 ("OEE" ["OE"])
1282 ("oee" ["oe"])
1283 ("AAA" ["AA"])
1284 ("aaa" ["aa"])
1285 ("E''" ["E'"])
1286 ("e''" ["e'"])
1287 )
1288
1289 (quail-define-package
1290 "scandinavian-alt-postfix" "Latin-1" "SC<" t
1291 "Scandinavian input method with postfix modifiers
1292 Supported languages are Swidish, Norwegian, Danish, and Finnish.
1293
1294 ae -> \e,Af\e(B
1295 oe -> \e,Ax\e(B
1296 aa -> \e,Ae\e(B
1297 a\" -> \e,Ad\e(B
1298 o\" -> \e,Av\e(B
1299 e' -> \e,Ai\e(B
1300
1301 Doubling the postfix separates the letter and postfix:
1302 aee -> ae o\"\" -> o\" etc.
1303 " nil t nil nil nil nil nil nil nil nil t)
1304
1305 (quail-define-rules
1306 ("AE" ?\e,AF\e(B)
1307 ("ae" ?\e,Af\e(B)
1308 ("OE" ?\e,AX\e(B)
1309 ("oe" ?\e,Ax\e(B)
1310 ("AA" ?\e,AE\e(B)
1311 ("aa" ?\e,Ae\e(B)
1312 ("A\"" ?\e,AD\e(B)
1313 ("a\"" ?\e,Ad\e(B)
1314 ("O\"" ?\e,AV\e(B)
1315 ("o\"" ?\e,Av\e(B)
1316 ("E'" ?\e,AI\e(B)
1317 ("e'" ?\e,Ai\e(B)
1318
1319 ("AEE" ["AE"])
1320 ("aee" ["ae"])
1321 ("OEE" ["OE"])
1322 ("oee" ["oe"])
1323 ("AAA" ["AA"])
1324 ("aaa" ["aa"])
1325 ("A\"\"" ["A\""])
1326 ("a\"\"" ["a\""])
1327 ("O\"\"" ["O\""])
1328 ("o\"\"" ["o\""])
1329 ("E''" ["E'"])
1330 ("e''" ["e'"])
1331 )
1332
1333 (quail-define-package
1334 "spanish-alt-postfix" "Spanish" "ES<" t
1335 "Spanish (Espa\e,Aq\e(Bol) input method with postfix modifiers
1336
1337 A' -> \e,AA\e(B
1338 E' -> \e,AI\e(B
1339 I' -> \e,AM\e(B
1340 O' -> \e,AS\e(B
1341 U' -> \e,AZ\e(B
1342 N~ -> \e,AQ\e(B
1343 !/ -> \e,A!\e(B
1344 ?/ -> \e,A?\e(B
1345
1346 Doubling the postfix separates the letter and postfix:
1347 a'' -> a' n~~ -> n~, etc.
1348 " nil t nil nil nil nil nil nil nil nil t)
1349
1350 (quail-define-rules
1351 ("A'" ?\e,AA\e(B)
1352 ("a'" ?\e,Aa\e(B)
1353 ("E'" ?\e,AI\e(B)
1354 ("e'" ?\e,Ai\e(B)
1355 ("I'" ?\e,AM\e(B)
1356 ("i'" ?\e,Am\e(B)
1357 ("O'" ?\e,AS\e(B)
1358 ("o'" ?\e,As\e(B)
1359 ("U'" ?\e,AZ\e(B)
1360 ("u'" ?\e,Az\e(B)
1361 ("N~" ?\e,AQ\e(B)
1362 ("n~" ?\e,Aq\e(B)
1363 ("?/" ?\e,A?\e(B)
1364 ("!/" ?\e,A!\e(B)
1365
1366 ("A''" ["A'"])
1367 ("a''" ["a'"])
1368 ("E''" ["E'"])
1369 ("e''" ["e'"])
1370 ("I''" ["I'"])
1371 ("i''" ["i'"])
1372 ("O''" ["O'"])
1373 ("o''" ["o'"])
1374 ("U''" ["U'"])
1375 ("u''" ["u'"])
1376 ("N~~" ["N~"])
1377 ("n~~" ["n~"])
1378 ("?//" ["?/"])
1379 ("!//" ["!/"])
1380 )
1381
1382 (quail-define-package
1383 "swedish-alt-postfix" "Latin-1" "SV<" t
1384 "Swedish (Svenska) input method (rule: AA -> \e,AE\e(B, AE -> \e,AD\e(B, OE -> \e,AV\e(B, E' -> \e,AI\e(B)
1385
1386 Doubling the postfix separates the letter and postfix: e.g. aee -> ae
1387 " nil t nil nil nil nil nil nil nil nil t)
1388
1389 (quail-define-rules
1390 ("AA" ?\e,AE\e(B)
1391 ("aa" ?\e,Ae\e(B)
1392 ("AE" ?\e,AD\e(B)
1393 ("ae" ?\e,Ad\e(B)
1394 ("OE" ?\e,AV\e(B)
1395 ("oe" ?\e,Av\e(B)
1396 ("E'" ?\e,AI\e(B)
1397 ("e'" ?\e,Ai\e(B)
1398
1399 ("AAA" ["AA"])
1400 ("aaa" ["aa"])
1401 ("AEE" ["AE"])
1402 ("aee" ["ae"])
1403 ("OEE" ["OE"])
1404 ("oee" ["oe"])
1405 ("E''" ["E'"])
1406 ("e''" ["e'"])
1407 )
1408
1409 (quail-define-package
1410 "turkish-latin-3-alt-postfix" "Turkish" "TR3<<" t
1411 "Turkish (T\e,A|\e(Brk\e,Ag\e(Be) input method with postfix modifiers.
1412
1413 This is for those who use Latin-3 (ISO-8859-3) for Turkish. If you
1414 use Latin-5 (ISO-8859-9), you should use \"turkish-alt-postfix\" instead.
1415
1416 Note for I, \e,C9\e(B, \e,C)\e(B, i.
1417
1418 A^ -> \e,CB\e(B
1419 C` -> \e,CG\e(B
1420 G^ -> \e,C+\e(B
1421 I -> I
1422 i -> \e,C9\e(B
1423 I/ -> \e,C)\e(B
1424 i/ -> i
1425 O\" -> \e,CV\e(B
1426 S` -> \e,C*\e(B
1427 U\" -> \e,C\\e(B
1428 U^ -> \e,C[\e(B
1429
1430 Doubling the postfix separates the letter and postfix: e.g. a^^ -> a^
1431 " nil t nil nil nil nil nil nil nil nil t)
1432
1433 (quail-define-rules
1434 ("A^" ?\e,CB\e(B)
1435 ("a^" ?\e,Cb\e(B)
1436 ("C`" ?\e,CG\e(B)
1437 ("c`" ?\e,Cg\e(B)
1438 ("G^" ?\e,C+\e(B)
1439 ("g^" ?\e,C;\e(B)
1440 ("I/" ?\e,C)\e(B)
1441 ("i" ?\e,C9\e(B)
1442 ("i/" ?i)
1443 ("O\"" ?\e,CV\e(B)
1444 ("o\"" ?\e,Cv\e(B)
1445 ("S`" ?\e,C*\e(B)
1446 ("s`" ?\e,C:\e(B)
1447 ("U\"" ?\e,C\\e(B)
1448 ("u\"" ?\e,C|\e(B)
1449 ("U^" ?\e,C[\e(B)
1450 ("u^" ?\e,C{\e(B)
1451
1452 ("A^^" ["A^"])
1453 ("a^^" ["a^"])
1454 ("C``" ["C`"])
1455 ("c``" ["c`"])
1456 ("G^^" ["G^"])
1457 ("g^^" ["g^"])
1458 ("I//" ["I/"])
1459 ("i" ["i"])
1460 ("i//" ["i/"])
1461 ("O\"\"" ["O\""])
1462 ("o\"\"" ["o\""])
1463 ("S``" ["S`"])
1464 ("s``" ["s`"])
1465 ("U\"\"" ["U\""])
1466 ("u\"\"" ["u\""])
1467 ("U^^" ["U^"])
1468 ("u^^" ["u^"])
1469 )
1470
1471 (quail-define-package
1472 "turkish-alt-postfix" "Turkish" "TR\e,A+\e(B" t
1473 "Turkish (T\e,A|\e(Brk\e,Ag\e(Be) input method with postfix modifiers.
1474
1475 This is for those who use Latin-5 (ISO-8859-9) for Turkish. If you
1476 use Latin-3 (ISO-8859-3), you should use
1477 \"turkish-latin-3-alt-postfix\" instead.
1478
1479 Note for I, \e,M}\e(B, \e,M]\e(B, i.
1480
1481 A^ -> \e,MB\e(B
1482 C` -> \e,MG\e(B
1483 G^ -> \e,MP\e(B
1484 I -> I
1485 i -> \e,M}\e(B
1486 I/ -> \e,M]\e(B
1487 i/ -> i
1488 O\" -> \e,MV\e(B
1489 S` -> \e,M^\e(B
1490 U\" -> \e,M\\e(B
1491 U^ -> \e,M[\e(B
1492
1493 Doubling the postfix separates the letter and postfix: e.g. a^^ -> a^
1494 " nil t nil nil nil nil nil nil nil nil t)
1495
1496 (quail-define-rules
1497 ("A^" ?\e,MB\e(B)
1498 ("a^" ?\e,Mb\e(B)
1499 ("C`" ?\e,MG\e(B)
1500 ("c`" ?\e,Mg\e(B)
1501 ("G^" ?\e,MP\e(B)
1502 ("g^" ?\e,Mp\e(B)
1503 ("I/" ?\e,M]\e(B)
1504 ("i" ?\e,M}\e(B)
1505 ("i/" ?i)
1506 ("O\"" ?\e,MV\e(B)
1507 ("o\"" ?\e,Cv\e(B)
1508 ("S`" ?\e,M^\e(B)
1509 ("s`" ?\e,M~\e(B)
1510 ("U\"" ?\e,M\\e(B)
1511 ("u\"" ?\e,M|\e(B)
1512 ("U^" ?\e,M[\e(B)
1513 ("u^" ?\e,M{\e(B)
1514
1515 ("A^^" ["A^"])
1516 ("a^^" ["a^"])
1517 ("C``" ["C`"])
1518 ("c``" ["c`"])
1519 ("G^^" ["G^"])
1520 ("g^^" ["g^"])
1521 ("I//" ["I/"])
1522 ("i" ["i"])
1523 ("i//" ["i/"])
1524 ("O\"\"" ["O\""])
1525 ("o\"\"" ["o\""])
1526 ("S``" ["S`"])
1527 ("s``" ["s`"])
1528 ("U\"\"" ["U\""])
1529 ("u\"\"" ["u\""])
1530 ("U^^" ["U^"])
1531 ("u^^" ["u^"])
1532 )
1533
1534 ;; Dutch Quail input method derived from the one in Yudit by Roman
1535 ;; Czyborra.
1536 (quail-define-package
1537 "dutch" "Dutch" "NL" t
1538 "Dutch character mixfix input method.
1539 Uses the `mule-unicode-0100-24ff' charset to supplement Latin-1.
1540
1541 | | examples
1542 ------------+---------+----------
1543 others | | fl. -> \e$,1!R\e(B eur. -> \e$,1tL\e(B ij -> \e$,1 S\e(B IJ -> \e$,1 R\e(B
1544 ------------+---------+----------
1545 | postfix |
1546 ------------+---------+----------
1547 acute | ' | a' -> \e,Aa\e(B
1548 grave | ` | a` -> \e,A`\e(B
1549 circumflex | ^ | a^ -> \e,Ab\e(B
1550 Turkish | various | i/ -> \e$,1 Q\e(B s, -> \e$,1 \7f\e(B g^ -> \e$,1 ?\e(B I/ -> \e$,1 P\e(B
1551 | | S, -> \e$,1 ~\e(B G^ -> \e$,1 >\e(B
1552 ------------+---------+----------
1553 | prefix |
1554 ------------+---------+----------
1555 diaeresis | \" | \"a -> \e,Ad\e(B
1556
1557 Doubling the postfix separates the letter and postfix: e.g. a'' -> a'
1558 " nil t nil nil nil nil nil nil nil nil t)
1559
1560 (quail-define-rules
1561 ("fl." ?\e$,1!R\e(B) ;; LATIN SMALL LETTER F WITH HOOK (florin currency symbol)
1562 ("eur." ?\e$,1tL\e(B) ;; EURO SIGN
1563 ;; \e$,1r|\e(BThe 25th letter of the Dutch alphabet.\e$,1r}\e(B
1564 ("ij" ?\e$,1 S\e(B) ;; LATIN SMALL LIGATURE IJ
1565 ("IJ" ?\e$,1 R\e(B) ;; LATIN CAPITAL LIGATURE IJ
1566 ;; \e$,1r|\e(BTrema on the second letter of vowel pair.\e$,1r}\e(B Yudit uses `:', not `"'.
1567 ("\"a" ?\e,Ad\e(B) ;; LATIN SMALL LETTER A WITH DIAERESIS
1568 ("\"e" ?\e,Ak\e(B) ;; LATIN SMALL LETTER E WITH DIAERESIS
1569 ("\"i" ?\e,Ao\e(B) ;; LATIN SMALL LETTER I WITH DIAERESIS
1570 ("\"o" ?\e,Av\e(B) ;; LATIN SMALL LETTER O WITH DIAERESIS
1571 ("\"u" ?\e,A|\e(B) ;; LATIN SMALL LETTER U WITH DIAERESIS
1572 ("\"A" ?\e,AD\e(B) ;; LATIN CAPITAL LETTER A WITH DIAERESIS
1573 ("\"E" ?\e,AK\e(B) ;; LATIN CAPITAL LETTER E WITH DIAERESIS
1574 ("\"I" ?\e,AO\e(B) ;; LATIN CAPITAL LETTER I WITH DIAERESIS
1575 ("\"O" ?\e,AV\e(B) ;; LATIN CAPITAL LETTER O WITH DIAERESIS
1576 ("\"U" ?\e,A\\e(B) ;; LATIN CAPITAL LETTER U WITH DIAERESIS
1577 ;; \e$,1r|\e(BAcute, marking emphasis on long vowels\e$,1r}\e(B:
1578 ("a'" ?\e,Aa\e(B) ;; LATIN SMALL LETTER A WITH ACUTE
1579 ("e'" ?\e,Ai\e(B) ;; LATIN SMALL LETTER E WITH ACUTE
1580 ("i'" ?\e,Am\e(B) ;; LATIN SMALL LETTER I WITH ACUTE
1581 ("o'" ?\e,As\e(B) ;; LATIN SMALL LETTER O WITH ACUTE
1582 ("u'" ?\e,Az\e(B) ;; LATIN SMALL LETTER U WITH ACUTE
1583 ("A'" ?\e,AA\e(B) ;; LATIN CAPITAL LETTER A WITH ACUTE
1584 ("E'" ?\e,AI\e(B) ;; LATIN CAPITAL LETTER E WITH ACUTE
1585 ("I'" ?\e,AM\e(B) ;; LATIN CAPITAL LETTER I WITH ACUTE
1586 ("O'" ?\e,AS\e(B) ;; LATIN CAPITAL LETTER O WITH ACUTE
1587 ("U'" ?\e,AZ\e(B) ;; LATIN CAPITAL LETTER U WITH ACUTE
1588 ;; \e$,1r|\e(BGrave, marking emphasis on short vowels\e$,1r}\e(B:
1589 ("a`" ?\e,A`\e(B) ;; LATIN SMALL LETTER A WITH GRAVE
1590 ("e`" ?\e,Ah\e(B) ;; LATIN SMALL LETTER E WITH GRAVE
1591 ("i`" ?\e,Al\e(B) ;; LATIN SMALL LETTER I WITH GRAVE
1592 ("o`" ?\e,Ar\e(B) ;; LATIN SMALL LETTER O WITH GRAVE
1593 ("u`" ?\e,Ay\e(B) ;; LATIN SMALL LETTER U WITH GRAVE
1594 ("A`" ?\e,A@\e(B) ;; LATIN CAPITAL LETTER A WITH GRAVE
1595 ("E`" ?\e,AH\e(B) ;; LATIN CAPITAL LETTER E WITH GRAVE
1596 ("I`" ?\e,AL\e(B) ;; LATIN CAPITAL LETTER I WITH GRAVE
1597 ("O`" ?\e,AR\e(B) ;; LATIN CAPITAL LETTER O WITH GRAVE
1598 ("U`" ?\e,AY\e(B) ;; LATIN CAPITAL LETTER U WITH GRAVE
1599 ;; \e$,1r|\e(BCater for the use of many French words and use of the circumflex
1600 ;; in Frisian.\e$,1r}\e(B Yudit used `;' for cedilla.
1601 ("c," ?\e,Ag\e(B) ;; LATIN SMALL LETTER C WITH CEDILLA
1602 ("C," ?\e,AG\e(B) ;; LATIN CAPITAL LETTER C WITH CEDILLA
1603 ("a^" ?\e,Ab\e(B) ;; LATIN SMALL LETTER A WITH CIRCUMFLEX
1604 ("e^" ?\e,Aj\e(B) ;; LATIN SMALL LETTER E WITH CIRCUMFLEX
1605 ("i^" ?\e,An\e(B) ;; LATIN SMALL LETTER I WITH CIRCUMFLEX
1606 ("o^" ?\e,At\e(B) ;; LATIN SMALL LETTER O WITH CIRCUMFLEX
1607 ("u^" ?\e,A{\e(B) ;; LATIN SMALL LETTER U WITH CIRCUMFLEX
1608 ("A^" ?\e,AB\e(B) ;; LATIN CAPITAL LETTER A WITH CIRCUMFLEX
1609 ("E^" ?\e,AJ\e(B) ;; LATIN CAPITAL LETTER E WITH CIRCUMFLEX
1610 ("I^" ?\e,AN\e(B) ;; LATIN CAPITAL LETTER I WITH CIRCUMFLEX
1611 ("O^" ?\e,AT\e(B) ;; LATIN CAPITAL LETTER O WITH CIRCUMFLEX
1612 ("U^" ?\e,A[\e(B) ;; LATIN CAPITAL LETTER U WITH CIRCUMFLEX
1613 ;; \e$,1r|\e(BFollow the example of the Dutch POSIX locale, using ISO-8859-9 to
1614 ;; cater to the many Turks in Dutch society.\e$,1r}\e(B Perhaps German methods
1615 ;; should do so too. Follow turkish-alt-postfix here.
1616 ("i/" ?\e$,1 Q\e(B) ;; LATIN SMALL LETTER I WITH NO DOT
1617 ("s," ?\e$,1 \7f\e(B) ;; LATIN SMALL LETTER S WITH CEDILLA
1618 ("g^" ?\e$,1 ?\e(B) ;; LATIN SMALL LETTER G WITH BREVE
1619 ("I/" ?\e$,1 P\e(B) ;; LATIN CAPITAL LETTER I WITH DOT ABOVE
1620 ("S," ?\e$,1 ~\e(B) ;; LATIN CAPITAL LETTER S WITH CEDILLA
1621 ("G^" ?\e$,1 >\e(B) ;; LATIN CAPITAL LETTER G WITH BREVE
1622 )
1623
1624 ;; Originally from Yudit, discussed with Albertas Agejevas
1625 ;; <alga@uosis.mif.vu.lt>
1626 (quail-define-package
1627 "lithuanian-numeric" "Lithuanian" "LtN" t
1628 "Lithuanian numeric input method.
1629 " nil t t t t nil nil nil nil nil t)
1630
1631 (quail-define-rules
1632 ("1" ?\e$,1 %\e(B)
1633 ("2" ?\e$,1 -\e(B)
1634 ("3" ?\e$,1 9\e(B)
1635 ("4" ?\e$,1 7\e(B)
1636 ("5" ?\e$,1 O\e(B)
1637 ("6" ?\e$,1!!\e(B)
1638 ("7" ?\e$,1!3\e(B)
1639 ("8" ?\e$,1!+\e(B)
1640 ("9" ?\e$,1r~\e(B)
1641 ("0" ?\e$,1r|\e(B)
1642 ("=" ?\e$,1!>\e(B)
1643 ("!" ?\e$,1 $\e(B)
1644 ("@" ?\e$,1 ,\e(B)
1645 ("#" ?\e$,1 8\e(B)
1646 ("$" ?\e$,1 6\e(B)
1647 ("%" ?\e$,1 N\e(B)
1648 ("^" ?\e$,1! \e(B)
1649 ("&" ?\e$,1!2\e(B)
1650 ("*" ?\e$,1!*\e(B)
1651 ("+" ?\e$,1!=\e(B))
1652
1653 ;; From XFree 4.1 /usr/X11R6/lib/X11/xkb/symbols/lt, suggested by
1654 ;; Albertas Agejevas <alga@uosis.mif.vu.lt>
1655 (quail-define-package
1656 "lithuanian-keyboard" "Lithuanian" "Lt" t
1657 "Lithuanian standard keyboard input method.
1658 " nil t t t t nil nil nil nil nil t)
1659
1660 (quail-define-rules
1661 ("1" ?\e$,1 %\e(B)
1662 ("!" ?\e$,1 $\e(B)
1663 ("2" ?\e$,1 -\e(B)
1664 ("@" ?\e$,1 ,\e(B)
1665 ("#" ?\e$,1 8\e(B)
1666 ("4" ?\e$,1 7\e(B)
1667 ("$" ?\e$,1 6\e(B)
1668 ("5" ?\e$,1 O\e(B)
1669 ("%" ?\e$,1 N\e(B)
1670 ("6" ?\e$,1!!\e(B)
1671 ("^" ?\e$,1! \e(B)
1672 ("7" ?\e$,1!3\e(B)
1673 ("&" ?\e$,1!2\e(B)
1674 ("9" ?\e$,1r~\e(B)
1675 ("0" ?\e$,1r|\e(B)
1676 ("=" ?\e$,1!>\e(B)
1677 ("+" ?\e$,1!=\e(B))
1678
1679 ;; From XFree 4.1 /usr/X11R6/lib/X11/xkb/symbols/lv
1680 (quail-define-package
1681 "latvian-keyboard" "Latvian" "Lv" t
1682 "Latvian standard keyboard input method.
1683 " nil t t t t nil nil nil nil nil t)
1684
1685 (quail-define-rules
1686 ("4" ?\e$,1tL\e(B)
1687 ("$" ?\e,A"\e(B)
1688 ("e" ?\e$,1 3\e(B)
1689 ("E" ?\e$,1 2\e(B)
1690 ("r" ?\e$,1 w\e(B)
1691 ("R" ?\e$,1 v\e(B)
1692 ("u" ?\e$,1!+\e(B)
1693 ("U" ?\e$,1!*\e(B)
1694 ("i" ?\e$,1 K\e(B)
1695 ("I" ?\e$,1 J\e(B)
1696 ("o" ?\e$,1 m\e(B)
1697 ("O" ?\e$,1 l\e(B)
1698 ("a" ?\e$,1 !\e(B)
1699 ("A" ?\e$,1 \e(B)
1700 ("s" ?\e$,1!!\e(B)
1701 ("S" ?\e$,1! \e(B)
1702 ("g" ?\e$,1 C\e(B)
1703 ("G" ?\e$,1 B\e(B)
1704 ("k" ?\e$,1 W\e(B)
1705 ("K" ?\e$,1 V\e(B)
1706 ("l" ?\e$,1 \\e(B)
1707 ("L" ?\e$,1 [\e(B)
1708 ("\'" ?\e$,1r|\e(B)
1709 ("\"" ?\e$,1r~\e(B)
1710 ("z" ?\e$,1!>\e(B)
1711 ("Z" ?\e$,1!=\e(B)
1712 ("c" ?\e$,1 -\e(B)
1713 ("C" ?\e$,1 ,\e(B)
1714 ("n" ?\e$,1 f\e(B)
1715 ("N" ?\e$,1 e\e(B))
1716
1717 (quail-define-package
1718 "latin-alt-postfix" "Latin" "L<" t
1719 "Latin character input method with postfix modifiers.
1720 This is the union of various input methods originally made for input
1721 of characters from a single Latin-N charset.
1722
1723 | postfix | examples
1724 ------------+---------+----------
1725 acute | ' | a' -> \e,Aa\e(B
1726 grave | ` | a` -> \e,A`\e(B
1727 circumflex | ^ | a^ -> \e,Ab\e(B
1728 diaeresis | \" | a\" -> \e,Ad\e(B
1729 tilde | ~ | a~ -> \e,Ac\e(B
1730 cedilla | /` | c/ -> \e,Ag\e(B c` -> \e,Ag\e(B
1731 ogonek | ` | a` -> \e$,1 %\e(B
1732 breve | ~ | a~ -> \e$,1 #\e(B
1733 caron | ~ | c~ -> \e$,1 -\e(B
1734 dbl. acute | : | o: -> \e$,1 q\e(B
1735 ring | ` | u` -> \e$,1!/\e(B
1736 dot | ` | z` -> \e$,1!<\e(B
1737 stroke | / | d/ -> \e$,1 1\e(B
1738 nordic | / | 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
1739 others | /<> | s/ -> \e,A_\e(B ?/ -> \e,A?\e(B !/ -> \e,A!\e(B
1740 | various | << -> \e,A+\e(B >> -> \e,A;\e(B o_ -> \e,A:\e(B a_ -> \e,A*\e(B
1741
1742 It would be natural to use comma for cedillas, but that would be
1743 inconvenient in practice because commas are needed very often after a
1744 letter.
1745
1746 Doubling the postfix separates the letter and postfix: e.g. a'' -> a'
1747 " nil t nil nil nil nil nil nil nil nil t)
1748
1749 ;; Fixme: \e,A&\e(B \e,A'\e(B \e,A(\e(B \e,A)\e(B \e,A,\e(B \e,A-\e(B \e,A.\e(B \e,A/\e(B \e,A0\e(B \e,A1\e(B \e,A2\e(B \e,A3\e(B \e,A4\e(B \e,A5\e(B \e,A6\e(B \e,A7\e(B \e,A8\e(B \e,A9\e(B \e,A<\e(B \e,A=\e(B \e,A>\e(B \e,AW\e(B \e,Aw\e(B
1750 (quail-define-rules
1751 (" _" ?\e,A \e(B)
1752 ("!/" ?\e,A!\e(B)
1753 ("//" ?\e,A0\e(B)
1754 ("<<" ?\e,A+\e(B)
1755 (">>" ?\e,A;\e(B)
1756 ("?/" ?\e,A?\e(B)
1757 ("$/" ?\e,A#\e(B)
1758 ("$/" ?\e,A$\e(B)
1759 ("A'" ?\e,AA\e(B)
1760 ("A-" ?\e$,1 \e(B)
1761 ("A/" ?\e,AE\e(B)
1762 ("A\"" ?\e,AD\e(B)
1763 ("A^" ?\e,AB\e(B)
1764 ("A`" ?\e,A@\e(B)
1765 ("A`" ?\e$,1 $\e(B)
1766 ("A~" ?\e,AC\e(B)
1767 ("A~" ?\e$,1 "\e(B)
1768 ("C'" ?\e$,1 &\e(B)
1769 ("C/" ?\e,AG\e(B)
1770 ("C/" ?\e$,1 *\e(B)
1771 ("C^" ?\e$,1 (\e(B)
1772 ("C`" ?\e,AG\e(B)
1773 ("C~" ?\e$,1 ,\e(B)
1774 ("D/" ?\e,AP\e(B)
1775 ("D/" ?\e$,1 0\e(B)
1776 ("D~" ?\e$,1 .\e(B)
1777 ("E'" ?\e,AI\e(B)
1778 ("E-" ?\e$,1 2\e(B)
1779 ("E/" ?\e,AF\e(B)
1780 ("E\"" ?\e,AK\e(B)
1781 ("E^" ?\e,AJ\e(B)
1782 ("E`" ?\e,AH\e(B)
1783 ("E`" ?\e$,1 8\e(B)
1784 ("E~" ?\e$,1 6\e(B)
1785 ("E~" ?\e$,1 :\e(B)
1786 ("G/" ?\e$,1 @\e(B)
1787 ("G^" ?\e$,1 <\e(B)
1788 ("G`" ?\e$,1 B\e(B)
1789 ("G~" ?\e$,1 >\e(B)
1790 ("H/" ?\e$,1 F\e(B)
1791 ("H^" ?\e$,1 D\e(B)
1792 ("I'" ?\e,AM\e(B)
1793 ("I-" ?\e$,1 J\e(B)
1794 ("I/" ?\e$,1 P\e(B)
1795 ("I\"" ?\e,AO\e(B)
1796 ("I^" ?\e,AN\e(B)
1797 ("I`" ?\e,AL\e(B)
1798 ("I`" ?\e$,1 N\e(B)
1799 ("I~" ?\e$,1 H\e(B)
1800 ("J^" ?\e$,1 T\e(B)
1801 ("K`" ?\e$,1 V\e(B)
1802 ("L'" ?\e$,1 Y\e(B)
1803 ("L/" ?\e$,1 a\e(B)
1804 ("L`" ?\e$,1 [\e(B)
1805 ("L~" ?\e$,1 ]\e(B)
1806 ("N'" ?\e$,1 c\e(B)
1807 ("N/" ?\e$,1 j\e(B)
1808 ("N`" ?\e$,1 e\e(B)
1809 ("N~" ?\e,AQ\e(B)
1810 ("N~" ?\e$,1 g\e(B)
1811 ("O'" ?\e,AS\e(B)
1812 ("O-" ?\e$,1 l\e(B)
1813 ("O/" ?\e,AX\e(B)
1814 ("O:" ?\e$,1 p\e(B)
1815 ("O\"" ?\e,AV\e(B)
1816 ("O^" ?\e,AT\e(B)
1817 ("O`" ?\e,AR\e(B)
1818 ("O~" ?\e,AU\e(B)
1819 ("R'" ?\e$,1 t\e(B)
1820 ("R`" ?\e$,1 v\e(B)
1821 ("R~" ?\e$,1 x\e(B)
1822 ("S'" ?\e$,1 z\e(B)
1823 ("S^" ?\e$,1 |\e(B)
1824 ("S`" ?\e$,1 ~\e(B)
1825 ("S~" ?\e$,1! \e(B)
1826 ("T/" ?\e,A^\e(B)
1827 ("T/" ?\e$,1!&\e(B)
1828 ("T`" ?\e$,1!"\e(B)
1829 ("T~" ?\e$,1!$\e(B)
1830 ("U'" ?\e,AZ\e(B)
1831 ("U-" ?\e$,1!*\e(B)
1832 ("U:" ?\e$,1!0\e(B)
1833 ("U\"" ?\e,A\\e(B)
1834 ("U^" ?\e,A[\e(B)
1835 ("U`" ?\e,AY\e(B)
1836 ("U`" ?\e$,1!.\e(B)
1837 ("U`" ?\e$,1!2\e(B)
1838 ("U~" ?\e$,1!(\e(B)
1839 ("U~" ?\e$,1!,\e(B)
1840 ("Y'" ?\e,A]\e(B)
1841 ("Y\"" ?\e$,1!8\e(B)
1842 ("Y=" ?\e,A%\e(B)
1843 ("Z'" ?\e$,1!9\e(B)
1844 ("Z/" ?\e$,1!;\e(B)
1845 ("Z`" ?\e$,1!;\e(B)
1846 ("Z~" ?\e$,1!=\e(B)
1847 ("a'" ?\e,Aa\e(B)
1848 ("a-" ?\e$,1 !\e(B)
1849 ("a/" ?\e,Ae\e(B)
1850 ("a\"" ?\e,Ad\e(B)
1851 ("a^" ?\e,Ab\e(B)
1852 ("a_" ?\e,A*\e(B)
1853 ("a`" ?\e,A`\e(B)
1854 ("a`" ?\e$,1 %\e(B)
1855 ("a~" ?\e,Ac\e(B)
1856 ("a~" ?\e$,1 #\e(B)
1857 ("c'" ?\e$,1 '\e(B)
1858 ("c/" ?\e,Ag\e(B)
1859 ("c/" ?\e$,1 +\e(B)
1860 ("c/" ?\e,A"\e(B)
1861 ("c^" ?\e$,1 )\e(B)
1862 ("c`" ?\e,Ag\e(B)
1863 ("c~" ?\e$,1 -\e(B)
1864 ("d/" ?\e,Ap\e(B)
1865 ("d/" ?\e$,1 1\e(B)
1866 ("d~" ?\e$,1 /\e(B)
1867 ("e'" ?\e,Ai\e(B)
1868 ("e-" ?\e$,1 3\e(B)
1869 ("e/" ?\e,Af\e(B)
1870 ("e\"" ?\e,Ak\e(B)
1871 ("e^" ?\e,Aj\e(B)
1872 ("e`" ?\e,Ah\e(B)
1873 ("e`" ?\e$,1 9\e(B)
1874 ("e~" ?\e$,1 7\e(B)
1875 ("e~" ?\e$,1 ;\e(B)
1876 ("e=" ?\e$,1tL\e(B)
1877 ("g/" ?\e$,1 A\e(B)
1878 ("g^" ?\e$,1 =\e(B)
1879 ("g`" ?\e$,1 C\e(B)
1880 ("g~" ?\e$,1 ?\e(B)
1881 ("h/" ?\e$,1 G\e(B)
1882 ("h^" ?\e$,1 E\e(B)
1883 ("i'" ?\e,Am\e(B)
1884 ("i-" ?\e$,1 K\e(B)
1885 ("i/" ?\e$,1 Q\e(B)
1886 ("i\"" ?\e,Ao\e(B)
1887 ("i^" ?\e,An\e(B)
1888 ("i`" ?\e,Al\e(B)
1889 ("i`" ?\e$,1 O\e(B)
1890 ("i~" ?\e$,1 I\e(B)
1891 ("j^" ?\e$,1 U\e(B)
1892 ("k/" ?\e$,1 X\e(B)
1893 ("k`" ?\e$,1 W\e(B)
1894 ("l'" ?\e$,1 Z\e(B)
1895 ("l/" ?\e$,1 b\e(B)
1896 ("l`" ?\e$,1 \\e(B)
1897 ("l~" ?\e$,1 ^\e(B)
1898 ("n'" ?\e$,1 d\e(B)
1899 ("n/" ?\e$,1 k\e(B)
1900 ("n`" ?\e$,1 f\e(B)
1901 ("n~" ?\e,Aq\e(B)
1902 ("n~" ?\e$,1 h\e(B)
1903 ("o'" ?\e,As\e(B)
1904 ("o-" ?\e$,1 m\e(B)
1905 ("o/" ?\e,Ax\e(B)
1906 ("o:" ?\e$,1 q\e(B)
1907 ("o\"" ?\e,Av\e(B)
1908 ("o^" ?\e,At\e(B)
1909 ("o_" ?\e,A:\e(B)
1910 ("o`" ?\e,Ar\e(B)
1911 ("o~" ?\e,Au\e(B)
1912 ("r'" ?\e$,1 u\e(B)
1913 ("r`" ?\e$,1 w\e(B)
1914 ("r~" ?\e$,1 y\e(B)
1915 ("s'" ?\e$,1 {\e(B)
1916 ("s/" ?\e,A_\e(B)
1917 ("s^" ?\e$,1 }\e(B)
1918 ("s`" ?\e$,1 \7f\e(B)
1919 ("s~" ?\e$,1!!\e(B)
1920 ("t/" ?\e,A~\e(B)
1921 ("t/" ?\e$,1!'\e(B)
1922 ("t`" ?\e$,1!#\e(B)
1923 ("t~" ?\e$,1!%\e(B)
1924 ("u'" ?\e,Az\e(B)
1925 ("u-" ?\e$,1!+\e(B)
1926 ("u:" ?\e$,1!1\e(B)
1927 ("u\"" ?\e,A|\e(B)
1928 ("u^" ?\e,A{\e(B)
1929 ("u`" ?\e,Ay\e(B)
1930 ("u`" ?\e$,1!/\e(B)
1931 ("u`" ?\e$,1!3\e(B)
1932 ("u~" ?\e$,1!)\e(B)
1933 ("u~" ?\e$,1!-\e(B)
1934 ("y'" ?\e,A}\e(B)
1935 ("y\"" ?\e,A\7f\e(B)
1936 ("z'" ?\e$,1!:\e(B)
1937 ("z/" ?\e$,1!<\e(B)
1938 ("z`" ?\e$,1!<\e(B)
1939 ("z~" ?\e$,1!>\e(B)
1940
1941 (" __" [" _"])
1942 ("!//" ["!/"])
1943 ("<<<" ["<<"])
1944 (">>>" [">>"])
1945 ("?//" ["?/"])
1946 ("///" ["//"])
1947 ("$//" ["$/"])
1948 ("A''" ["A'"])
1949 ("A--" ["A-"])
1950 ("A//" ["A/"])
1951 ("A\"\"" ["A\""])
1952 ("A^^" ["A^"])
1953 ("A``" ["A`"])
1954 ("A~~" ["A~"])
1955 ("C''" ["C'"])
1956 ("C//" ["C/"])
1957 ("C^^" ["C^"])
1958 ("C``" ["C`"])
1959 ("C~~" ["C~"])
1960 ("D//" ["D/"])
1961 ("D~~" ["D~"])
1962 ("E''" ["E'"])
1963 ("E--" ["E-"])
1964 ("E//" ["E/"])
1965 ("E\"\"" ["E\""])
1966 ("E^^" ["E^"])
1967 ("E``" ["E`"])
1968 ("E~~" ["E~"])
1969 ("G//" ["G/"])
1970 ("G^^" ["G^"])
1971 ("G``" ["G`"])
1972 ("G~~" ["G~"])
1973 ("H//" ["H/"])
1974 ("H^^" ["H^"])
1975 ("I''" ["I'"])
1976 ("I--" ["I-"])
1977 ("I//" ["I/"])
1978 ("I\"\"" ["I\""])
1979 ("I^^" ["I^"])
1980 ("I``" ["I`"])
1981 ("I~~" ["I~"])
1982 ("J^^" ["J^"])
1983 ("K``" ["K`"])
1984 ("L''" ["L'"])
1985 ("L//" ["L/"])
1986 ("L``" ["L`"])
1987 ("L~~" ["L~"])
1988 ("N''" ["N'"])
1989 ("N//" ["N/"])
1990 ("N``" ["N`"])
1991 ("N~~" ["N~"])
1992 ("O''" ["O'"])
1993 ("O--" ["O-"])
1994 ("O//" ["O/"])
1995 ("O::" ["O:"])
1996 ("O\"\"" ["O\""])
1997 ("O^^" ["O^"])
1998 ("O``" ["O`"])
1999 ("O~~" ["O~"])
2000 ("R''" ["R'"])
2001 ("R``" ["R`"])
2002 ("R~~" ["R~"])
2003 ("S''" ["S'"])
2004 ("S^^" ["S^"])
2005 ("S``" ["S`"])
2006 ("S~~" ["S~"])
2007 ("T//" ["T/"])
2008 ("T``" ["T`"])
2009 ("T~~" ["T~"])
2010 ("U''" ["U'"])
2011 ("U--" ["U-"])
2012 ("U::" ["U:"])
2013 ("U\"\"" ["U\""])
2014 ("U^^" ["U^"])
2015 ("U``" ["U`"])
2016 ("U~~" ["U~"])
2017 ("Y''" ["Y'"])
2018 ("Z''" ["Z'"])
2019 ("Z//" ["Z/"])
2020 ("Z``" ["Z`"])
2021 ("Z~~" ["Z~"])
2022 ("a''" ["a'"])
2023 ("a--" ["a-"])
2024 ("a//" ["a/"])
2025 ("a\"\"" ["a\""])
2026 ("a^^" ["a^"])
2027 ("a__" ["a_"])
2028 ("a``" ["a`"])
2029 ("a~~" ["a~"])
2030 ("c''" ["c'"])
2031 ("c//" ["c/"])
2032 ("c^^" ["c^"])
2033 ("c``" ["c`"])
2034 ("c~~" ["c~"])
2035 ("d//" ["d/"])
2036 ("d~~" ["d~"])
2037 ("e''" ["e'"])
2038 ("e--" ["e-"])
2039 ("e//" ["e/"])
2040 ("e\"\"" ["e\""])
2041 ("e^^" ["e^"])
2042 ("e``" ["e`"])
2043 ("e~~" ["e~"])
2044 ("e==" ["e="])
2045 ("g//" ["g/"])
2046 ("g^^" ["g^"])
2047 ("g``" ["g`"])
2048 ("g~~" ["g~"])
2049 ("h//" ["h/"])
2050 ("h^^" ["h^"])
2051 ("i''" ["i'"])
2052 ("i--" ["i-"])
2053 ("i//" ["i/"])
2054 ("i\"\"" ["i\""])
2055 ("i^^" ["i^"])
2056 ("i``" ["i`"])
2057 ("i~~" ["i~"])
2058 ("j^^" ["j^"])
2059 ("k//" ["k/"])
2060 ("k``" ["k`"])
2061 ("l''" ["l'"])
2062 ("l//" ["l/"])
2063 ("l``" ["l`"])
2064 ("l~~" ["l~"])
2065 ("n''" ["n'"])
2066 ("n//" ["n/"])
2067 ("n``" ["n`"])
2068 ("n~~" ["n~"])
2069 ("o''" ["o'"])
2070 ("o--" ["o-"])
2071 ("o//" ["o/"])
2072 ("o::" ["o:"])
2073 ("o\"\"" ["o\""])
2074 ("o^^" ["o^"])
2075 ("o__" ["o_"])
2076 ("o``" ["o`"])
2077 ("o~~" ["o~"])
2078 ("r''" ["r'"])
2079 ("r``" ["r`"])
2080 ("r~~" ["r~"])
2081 ("s''" ["s'"])
2082 ("s//" ["s/"])
2083 ("s^^" ["s^"])
2084 ("s``" ["s`"])
2085 ("s~~" ["s~"])
2086 ("t//" ["t/"])
2087 ("t``" ["t`"])
2088 ("t~~" ["t~"])
2089 ("u''" ["u'"])
2090 ("u--" ["u-"])
2091 ("u::" ["u:"])
2092 ("u\"\"" ["u\""])
2093 ("u^^" ["u^"])
2094 ("u``" ["u`"])
2095 ("u~~" ["u~"])
2096 ("y''" ["y'"])
2097 ("y\"\"" ["y\""])
2098 ("z''" ["z'"])
2099 ("z//" ["z/"])
2100 ("z``" ["z`"])
2101 ("z~~" ["z~"])
2102 )
2103
2104 ;;; arch-tag: 722466a6-363d-431c-9161-879e16e2da5d
2105 ;;; latin-alt.el ends here