]> code.delx.au - gnu-emacs/blob - leim/quail/latin-pre.el
23a52656e162c3ce8fadd7f4e2d8b681100d4efb
[gnu-emacs] / leim / quail / latin-pre.el
1 ;;; latin-pre.el --- Quail packages for inputting various European characters -*-coding: utf-8;-*-
2
3 ;; Copyright (C) 1997, 1998, 1999, 2000, 2001, 2002, 2003, 2004, 2005,
4 ;; 2006, 2007, 2008, 2009, 2010, 2011
5 ;; Free Software Foundation, Inc.
6 ;; Copyright (C) 1997, 1998, 1999, 2000, 2001, 2002, 2003, 2004, 2005,
7 ;; 2006, 2007, 2008, 2009, 2010, 2011
8 ;; National Institute of Advanced Industrial Science and Technology (AIST)
9 ;; Registration Number H14PRO021
10
11 ;; Keywords: mule, multilingual, latin, input method
12
13 ;; This file is part of GNU Emacs.
14
15 ;; GNU Emacs is free software: you can redistribute it and/or modify
16 ;; it under the terms of the GNU General Public License as published by
17 ;; the Free Software Foundation, either version 3 of the License, or
18 ;; (at your option) any later version.
19
20 ;; GNU Emacs is distributed in the hope that it will be useful,
21 ;; but WITHOUT ANY WARRANTY; without even the implied warranty of
22 ;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
23 ;; GNU General Public License for more details.
24
25 ;; You should have received a copy of the GNU General Public License
26 ;; along with GNU Emacs. If not, see <http://www.gnu.org/licenses/>.
27
28 ;;; Commentary:
29
30 ;; Key translation maps were originally copied from iso-acc.el.
31 ;; latin-1-prefix: extra special characters added, adapted from the vim
32 ;; digraphs (from J.H.M.Dassen <jdassen@wi.leidenuniv.nl>)
33 ;; by R.F. Smith <rsmith@xs4all.nl>
34 ;;
35 ;; polish-slash:
36 ;; Author: Włodek Bzyl <matwb@univ.gda.pl>
37 ;; Maintainer: Włodek Bzyl <matwb@univ.gda.pl>
38 ;;
39 ;; latin-[89]-prefix: Dave Love <fx@gnu.org>
40
41 ;; You might make extra input sequences on the basis of the X
42 ;; locale/*/Compose files (which have both prefix and postfix
43 ;; sequences), but bear in mind that sequences which are logical in
44 ;; that context may not be sensible when they're not signaled with
45 ;; the Compose key. An example is a double space for NBSP.
46
47 ;;; Code:
48
49 (require 'quail)
50
51 (quail-define-package
52 "latin-1-prefix" "Latin-1" "1>" t
53 "Latin-1 characters input method with prefix modifiers
54
55 effect | prefix | examples
56 ------------+--------+----------
57 acute | ' | 'a -> á, '' -> ´
58 grave | ` | `a -> à
59 circumflex | ^ | ^a -> â
60 diaeresis | \" | \"a -> ä \"\" -> ¨
61 tilde | ~ | ~a -> ã
62 cedilla | ~ | ~c -> ç
63 misc | \" ~ / | \"s -> ß ~d -> ð ~t -> þ /a -> å /e -> æ /o -> ø
64 symbol | ~ | ~> -> » ~< -> « ~! -> ¡ ~? -> ¿ ~~ -> ¸
65 | ~ | ~s -> § ~x -> ¤ ~. -> · ~$ -> £ ~u -> µ
66 | ~ | ~p -> ¶ ~- -> ­ ~= -> ¯ ~| -> ¦
67 symbol | _ / | _o -> º _a -> ª // -> ° /\\ -> × _y -> ¥
68 | _ / | _: -> ÷ /c -> ¢ /2 -> ½ /4 -> ¼ /3 -> ¾
69 | _ / | /= -> ¬
70 symbol | ^ | ^r -> ® ^c -> © ^1 -> ¹ ^2 -> ² ^3 -> ³
71 " nil t nil nil nil nil nil nil nil nil t)
72
73 (quail-define-rules
74 ("'A" ?Á)
75 ("'E" ?É)
76 ("'I" ?Í)
77 ("'O" ?Ó)
78 ("'U" ?Ú)
79 ("'Y" ?Ý)
80 ("'a" ?á)
81 ("'e" ?é)
82 ("'i" ?í)
83 ("'o" ?ó)
84 ("'u" ?ú)
85 ("'y" ?ý)
86 ("''" ?´)
87 ("' " ?')
88 ("`A" ?À)
89 ("`E" ?È)
90 ("`I" ?Ì)
91 ("`O" ?Ò)
92 ("`U" ?Ù)
93 ("`a" ?à)
94 ("`e" ?è)
95 ("`i" ?ì)
96 ("`o" ?ò)
97 ("`u" ?ù)
98 ("``" ?`)
99 ("` " ?`)
100 ("^A" ?Â)
101 ("^E" ?Ê)
102 ("^I" ?Î)
103 ("^O" ?Ô)
104 ("^U" ?Û)
105 ("^a" ?â)
106 ("^e" ?ê)
107 ("^i" ?î)
108 ("^o" ?ô)
109 ("^u" ?û)
110 ("^^" ?^)
111 ("^ " ?^)
112 ("\"A" ?Ä)
113 ("\"E" ?Ë)
114 ("\"I" ?Ï)
115 ("\"O" ?Ö)
116 ("\"U" ?Ü)
117 ("\"a" ?ä)
118 ("\"e" ?ë)
119 ("\"i" ?ï)
120 ("\"o" ?ö)
121 ("\"s" ?ß)
122 ("\"u" ?ü)
123 ("\"y" ?ÿ)
124 ("\"\"" ?¨)
125 ("\" " ?\")
126 ("~A" ?Ã)
127 ("~C" ?Ç)
128 ("~D" ?Ð)
129 ("~N" ?Ñ)
130 ("~O" ?Õ)
131 ("~T" ?Þ)
132 ("~a" ?ã)
133 ("~c" ?ç)
134 ("~d" ?ð)
135 ("~n" ?ñ)
136 ("~o" ?õ)
137 ("~t" ?þ)
138 ("~>" ?\»)
139 ("~<" ?\«)
140 ("~!" ?¡)
141 ("~?" ?¿)
142 ("~~" ?¸)
143 ("~ " ?~)
144 ("/A" ?Å)
145 ("/E" ?Æ)
146 ("/O" ?Ø)
147 ("/a" ?å)
148 ("/e" ?æ)
149 ("/o" ?ø)
150 ("//" ?°)
151 ("/ " ?/)
152 ("_o" ?º)
153 ("_a" ?ª)
154 ("_ " ? )
155 ;; Symbols added by Roland Smith <rsmith@xs4all.nl>
156 ("_+" ?±)
157 ("_y" ?¥)
158 ("_:" ?÷)
159 ("__" ?_)
160 ("/c" ?¢)
161 ("/\\" ?×)
162 ("/2" ?½)
163 ("/4" ?¼)
164 ("/3" ?¾)
165 ("~s" ?§)
166 ("~p" ?¶)
167 ("~x" ?¤)
168 ("~." ?·)
169 ("~$" ?£)
170 ("~u" ?µ)
171 ("^r" ?®)
172 ("^c" ?©)
173 ("^1" ?¹)
174 ("^2" ?²)
175 ("^3" ?³)
176 ("~-" ?­)
177 ("~|" ?¦)
178 ("/=" ?¬)
179 ("~=" ?¯)
180 )
181
182 (quail-define-package
183 "catalan-prefix" "Latin-1" "CA>" t
184 "Catalan and Spanish input method with prefix modifiers
185
186 effect | prefix | examples
187 ------------+--------+----------
188 acute | ' | 'a -> á '' -> ´
189 grave | ` | `a -> à
190 diaeresis | \" | \"i -> ï \"\" -> ¨
191 tilde | ~ | ~n -> ñ
192 cedilla | ~ | ~c -> ç
193 symbol | ~ | ~> -> » ~< -> « ~! -> ¡ ~? -> ¿
194 " nil t nil nil nil nil nil nil nil nil t)
195
196 (quail-define-rules
197 ("'A" ?Á)
198 ("'E" ?É)
199 ("'I" ?Í)
200 ("'O" ?Ó)
201 ("'U" ?Ú)
202 ("'a" ?á)
203 ("'e" ?é)
204 ("'i" ?í)
205 ("'o" ?ó)
206 ("'u" ?ú)
207 ("' " ?')
208 ("`A" ?À)
209 ("`E" ?È)
210 ("`O" ?Ò)
211 ("`a" ?à)
212 ("`e" ?è)
213 ("`o" ?ò)
214 ("` " ?`)
215 ("\"I" ?Ï)
216 ("\"U" ?Ü)
217 ("\"i" ?ï)
218 ("\"u" ?ü)
219 ("\" " ?\")
220 ("~C" ?Ç)
221 ("~N" ?Ñ)
222 ("~c" ?ç)
223 ("~n" ?ñ)
224 ("~>" ?\»)
225 ("~<" ?\«)
226 ("~!" ?¡)
227 ("~?" ?¿)
228 ("~ " ?~)
229 )
230
231 (quail-define-package
232 "esperanto-prefix" "Latin-3" "EO>" t
233 "Esperanto input method with prefix modifiers
234 Key translation rules are:
235 ^H -> ?Ĥ ^J -> ?Ĵ ^h -> ?ĥ ^j -> ?ĵ ^C -> ?Ĉ ^G -> ?Ĝ,
236 ^S -> ?Ŝ ^c -> ?ĉ ^g -> ?ĝ ^s -> ?ŝ ~U -> ?Ŭ ~u -> ?ŭ
237 " nil t nil nil nil nil nil nil nil nil t)
238
239 (quail-define-rules
240 ("^H" ?Ĥ)
241 ("^J" ?Ĵ)
242 ("^h" ?ĥ)
243 ("^j" ?ĵ)
244 ("^C" ?Ĉ)
245 ("^G" ?Ĝ)
246 ("^S" ?Ŝ)
247 ("^c" ?ĉ)
248 ("^g" ?ĝ)
249 ("^s" ?ŝ)
250 ("^^" ?^)
251 ("^ " ?^)
252 ("~U" ?Ŭ)
253 ("~u" ?ŭ)
254 ("~ " ?~)
255 )
256
257 (quail-define-package
258 "french-prefix" "French" "FR>" t
259 "French (Français) input method with prefix modifiers
260
261 effect | prefix | examples
262 ------------+--------+----------
263 acute | ' | 'e -> é
264 grave | ` | `a -> à
265 circumflex | ^ | ^a -> â
266 diaeresis | \" | \"i -> ï
267 cedilla | ~ or , | ~c -> ç ,c -> ç
268 symbol | ~ | ~> -> » ~< -> «
269 " nil t nil nil nil nil nil nil nil nil t)
270
271 (quail-define-rules
272 ("'E" ?É)
273 ("'C" ?Ç)
274 ("'e" ?é)
275 ("'c" ?ç)
276 ("' " ?')
277 ("`A" ?À)
278 ("`E" ?È)
279 ("`U" ?Ù)
280 ("`a" ?à)
281 ("`e" ?è)
282 ("`u" ?ù)
283 ("` " ?`)
284 ("^A" ?Â)
285 ("^E" ?Ê)
286 ("^I" ?Î)
287 ("^O" ?Ô)
288 ("^U" ?Û)
289 ("^a" ?â)
290 ("^e" ?ê)
291 ("^i" ?î)
292 ("^o" ?ô)
293 ("^u" ?û)
294 ("^ " ?^)
295 ("\"E" ?Ë)
296 ("\"I" ?Ï)
297 ("\"e" ?ë)
298 ("\"i" ?ï)
299 ("\" " ?\")
300 ("~<" ?\«)
301 ("~>" ?\»)
302 ("~C" ?Ç)
303 ("~c" ?ç)
304 ("~ " ?~)
305 (",C" ?Ç)
306 (",c" ?ç)
307 (", " ?,)
308 )
309
310 (quail-define-package
311 "romanian-prefix" "Romanian" "RO>" t
312 "Romanian (româneşte) input method with prefix modifiers
313
314 effect | prefix | examples
315 ------------+--------+------------------
316 tilde | ~ | ~a -> ă
317 circumflex | ^ | ^a -> â, ^i -> î
318 cedilla | , | ,s -> ş, ,t -> ţ
319 ~ | ~ | ~~ -> ~
320 ^ | ^ | ^^ -> ^
321 , | , | ,, -> ,
322 " nil t nil nil nil nil nil nil nil nil t)
323
324 (quail-define-rules
325 ("~A" ?Ă) ("~a" ?ă)
326 ("^A" ?Â) ("^a" ?â)
327 ("^I" ?Î) ("^i" ?î)
328 (",S" ?Ş) (",s" ?ş)
329 (",T" ?Ţ) (",t" ?ţ)
330 ("^^" ?^) ("~~" ?~) (",," ?,))
331
332 (quail-define-package
333 "romanian-alt-prefix" "Romanian" "RO>" t
334 "Alternative Romanian (româneşte) input method with prefix modifiers
335
336 effect | prefix | examples
337 ------------+--------+------------------
338 tilde | \" | \"a -> â
339 circumflex | ' | 'a -> â, 'i -> î
340 cedilla | ' | 's -> ş, 't -> ţ
341 ' | ' | '' -> '
342 \" | \" | \"\" -> \"
343 " nil t nil nil nil nil nil nil nil nil t)
344
345 (quail-define-rules
346 ("'A" ?Ă) ("'a" ?ă)
347 ("\"A" ?Â) ("\"a" ?â)
348 ("'I" ?Î) ("'i" ?î)
349 ("'S" ?Ş) ("'s" ?ş)
350 ("'T" ?Ţ) ("'t" ?ţ)
351 ("''" ?') ("\"\"" ?\"))
352
353 (quail-define-package
354 "german-prefix" "German" "DE>" t
355 "German (Deutsch) input method with prefix modifiers
356 Key translation rules are:
357 \"A -> Ä -> \"O -> Ö \"U -> Ü \"s -> ß
358 " nil t nil nil nil nil nil nil nil nil t)
359
360 (quail-define-rules
361 ("\"A" ?Ä)
362 ("\"O" ?Ö)
363 ("\"U" ?Ü)
364 ("\"a" ?ä)
365 ("\"o" ?ö)
366 ("\"u" ?ü)
367 ("\"s" ?ß)
368 ("\" " ?\")
369 )
370
371 (quail-define-package
372 "irish-prefix" "Latin-1" "GA>" t
373 "Irish input method with prefix modifiers
374 Key translation rules are:
375 'A -> Á 'E -> É 'I -> Í 'O -> Ó 'U -> Ú
376 " nil t nil nil nil nil nil nil nil nil t)
377
378 (quail-define-rules
379 ("'A" ?Á)
380 ("'E" ?É)
381 ("'I" ?Í)
382 ("'O" ?Ó)
383 ("'U" ?Ú)
384 ("'a" ?á)
385 ("'e" ?é)
386 ("'i" ?í)
387 ("'o" ?ó)
388 ("'u" ?ú)
389 ("' " ?')
390 )
391
392 (quail-define-package
393 "portuguese-prefix" "Latin-1" "PT>" t
394 "Portuguese input method with prefix modifiers
395
396 effect | prefix | examples
397 ------------+--------+----------
398 acute | ' | 'a -> á '' -> ´
399 grave | ` | `a -> à
400 circumflex | ^ | ^a -> â
401 diaeresis | \" | \"u -> ü
402 tilde | ~ | ~a -> ã
403 cedilla | ' or , | 'c -> ç ,c -> ç
404 " nil t nil nil nil nil nil nil nil nil t)
405
406 (quail-define-rules
407 ("'A" ?Á)
408 ("'E" ?É)
409 ("'I" ?Í)
410 ("'O" ?Ó)
411 ("'U" ?Ú)
412 ("'C" ?Ç)
413 ("'a" ?á)
414 ("'e" ?é)
415 ("'i" ?í)
416 ("'o" ?ó)
417 ("'u" ?ú)
418 ("'c" ?ç)
419 ("' " ?')
420 ("`A" ?À)
421 ("`a" ?à)
422 ("` " ?`)
423 ("^A" ?Â)
424 ("^E" ?Ê)
425 ("^O" ?Ô)
426 ("^a" ?â)
427 ("^e" ?ê)
428 ("^o" ?ô)
429 ("^ " ?^)
430 ("\"U" ?Ü)
431 ("\"u" ?ü)
432 ("\" " ?\")
433 ("~A" ?Ã)
434 ("~O" ?Õ)
435 ("~a" ?ã)
436 ("~o" ?õ)
437 ("~ " ?~)
438 (",c" ?ç)
439 (",C" ?Ç)
440 (",," ?,)
441 )
442
443 (quail-define-package
444 "spanish-prefix" "Spanish" "ES>" t
445 "Spanish (Español) input method with prefix modifiers
446
447 effect | prefix | examples
448 ------------+--------+----------
449 acute | ' | 'a -> á
450 diaeresis | \" | \"u -> ü
451 tilde | ~ | ~n -> ñ
452 symbol | ~ | ~> -> » ~< -> « ~! -> ¡ ~? -> ¿
453 " nil t nil nil nil nil nil nil nil nil t)
454
455 (quail-define-rules
456 ("'A" ?Á)
457 ("'E" ?É)
458 ("'I" ?Í)
459 ("'O" ?Ó)
460 ("'U" ?Ú)
461 ("'a" ?á)
462 ("'e" ?é)
463 ("'i" ?í)
464 ("'o" ?ó)
465 ("'u" ?ú)
466 ("' " ?')
467 ("\"U" ?Ü)
468 ("\"u" ?ü)
469 ("\" " ?\")
470 ("~N" ?Ñ)
471 ("~n" ?ñ)
472 ("~>" ?\»)
473 ("~<" ?\«)
474 ("~!" ?¡)
475 ("~?" ?¿)
476 ("~ " ?~)
477 )
478
479 (quail-define-package
480 "latin-2-prefix" "Latin-2" "2>" t
481 "Latin-2 characters input method with prefix modifiers
482
483 effect | prefix | examples
484 ------------+--------+----------
485 acute | ' | 'a -> á '' -> ?´
486 circumflex | ^ | ^a -> â
487 diaeresis | \" | \"a -> ä \"\" -> ¨
488 breve | ~ | ~a -> ă
489 caron | ~ | ~c -> č
490 cedilla | ` | `c -> ç `e -> ?ę
491 misc | ' ` ~ | 'd -> đ `l -> ł `z -> ż ~o -> ő ~u -> ű
492 symbol | ~ | `. -> ˙ ~~ -> ˘ ~. -> ?¸
493 " nil t nil nil nil nil nil nil nil nil t)
494
495 (quail-define-rules
496 ("'A" ?Á)
497 ("'C" ?Ć)
498 ("'D" ?Đ)
499 ("'E" ?É)
500 ("'I" ?Í)
501 ("'L" ?Ĺ)
502 ("'N" ?Ń)
503 ("'O" ?Ó)
504 ("'R" ?Ŕ)
505 ("'S" ?Ś)
506 ("'U" ?Ú)
507 ("'Y" ?Ý)
508 ("'Z" ?Ź)
509 ("'a" ?á)
510 ("'c" ?ć)
511 ("'d" ?đ)
512 ("'e" ?é)
513 ("'i" ?í)
514 ("'l" ?ĺ)
515 ("'n" ?ń)
516 ("'o" ?ó)
517 ("'r" ?ŕ)
518 ("'s" ?ś)
519 ("'u" ?ú)
520 ("'y" ?ý)
521 ("'z" ?ź)
522 ("''" ?´)
523 ("' " ?')
524 ("`A" ?Ą)
525 ("`C" ?Ç)
526 ("`E" ?Ę)
527 ("`L" ?Ł)
528 ("`S" ?Ş)
529 ("`T" ?Ţ)
530 ("`Z" ?Ż)
531 ("`a" ?ą)
532 ("`l" ?ł)
533 ("`c" ?ç)
534 ("`e" ?ę)
535 ("`s" ?ş)
536 ("`t" ?ţ)
537 ("`z" ?ż)
538 ("``" ?Ş)
539 ("`." ?˙)
540 ("` " ?`)
541 ("^A" ?Â)
542 ("^I" ?Î)
543 ("^O" ?Ô)
544 ("^a" ?â)
545 ("^i" ?î)
546 ("^o" ?ô)
547 ("^^" ?^)
548 ("^ " ?^)
549 ("\"A" ?Ä)
550 ("\"E" ?Ë)
551 ("\"O" ?Ö)
552 ("\"U" ?Ü)
553 ("\"a" ?ä)
554 ("\"e" ?ë)
555 ("\"o" ?ö)
556 ("\"s" ?ß)
557 ("\"u" ?ü)
558 ("\"\"" ?¨)
559 ("\" " ?\")
560 ("~A" ?Ă)
561 ("~C" ?Č)
562 ("~D" ?Ď)
563 ("~E" ?Ě)
564 ("~L" ?Ľ)
565 ("~N" ?Ň)
566 ("~O" ?Ő)
567 ("~R" ?Ř)
568 ("~S" ?Š)
569 ("~T" ?Ť)
570 ("~U" ?Ű)
571 ("~Z" ?Ž)
572 ("~a" ?ă)
573 ("~c" ?č)
574 ("~d" ?ď)
575 ("~e" ?ě)
576 ("~l" ?ľ)
577 ("~n" ?ň)
578 ("~o" ?ő)
579 ("~r" ?ř)
580 ("~s" ?š)
581 ("~t" ?ť)
582 ("~u" ?ű)
583 ("~z" ?ž)
584 ("~v" ?˘)
585 ("~~" ?˘)
586 ("~." ?¸)
587 ("~ " ?~)
588 )
589
590 (quail-define-package
591 "latin-3-prefix" "Latin-3" "3>" t
592 "Latin-3 characters input method with prefix modifiers
593
594 effect | prefix | examples
595 ------------+--------+----------
596 acute | ' | 'a -> á '' -> ?´
597 grave | ` | `a -> à
598 circumflex | ^ | ^a -> â
599 diaeresis | \" | \"a -> ä \"\" -> ¨
600 cedilla | ~ | ~c -> ç ~s -> ş ~~ -> ¸
601 dot above | / . | /g -> ġ .o -> ġ
602 misc | \" ~ / | \"s -> ß ~g -> ğ ~u -> ŭ /h -> ħ /i -> ı
603 symbol | ~ | ~` -> ˘ /# -> £ /$ -> ¤ // -> °
604 " nil t nil nil nil nil nil nil nil nil t)
605
606 (quail-define-rules
607 ("'A" ?Á)
608 ("'E" ?É)
609 ("'I" ?Í)
610 ("'O" ?Ó)
611 ("'U" ?Ú)
612 ("'a" ?á)
613 ("'e" ?é)
614 ("'i" ?í)
615 ("'o" ?ó)
616 ("'u" ?ú)
617 ("''" ?´)
618 ("' " ?')
619 ("`A" ?À)
620 ("`E" ?È)
621 ("`I" ?Ì)
622 ("`O" ?Ò)
623 ("`U" ?Ù)
624 ("`a" ?à)
625 ("`e" ?è)
626 ("`i" ?ì)
627 ("`o" ?ò)
628 ("`u" ?ù)
629 ("``" ?`)
630 ("` " ?`)
631 ("^A" ?Â)
632 ("^C" ?Ĉ)
633 ("^E" ?Ê)
634 ("^G" ?Ĝ)
635 ("^H" ?Ĥ)
636 ("^I" ?Î)
637 ("^J" ?Ĵ)
638 ("^O" ?Ô)
639 ("^S" ?Ŝ)
640 ("^U" ?Û)
641 ("^a" ?â)
642 ("^c" ?ĉ)
643 ("^e" ?ê)
644 ("^g" ?ĝ)
645 ("^h" ?ĥ)
646 ("^i" ?î)
647 ("^j" ?ĵ)
648 ("^o" ?ô)
649 ("^s" ?ŝ)
650 ("^u" ?û)
651 ("^^" ?^)
652 ("^ " ?^)
653 ("\"A" ?Ä)
654 ("\"E" ?Ë)
655 ("\"I" ?Ï)
656 ("\"O" ?Ö)
657 ("\"U" ?Ü)
658 ("\"a" ?ä)
659 ("\"e" ?ë)
660 ("\"i" ?ï)
661 ("\"o" ?ö)
662 ("\"u" ?ü)
663 ("\"s" ?ß)
664 ("\"\"" ?¨)
665 ("\" " ?\")
666 ("~C" ?Ç)
667 ("~N" ?Ñ)
668 ("~c" ?ç)
669 ("~n" ?ñ)
670 ("~S" ?Ş)
671 ("~s" ?ş)
672 ("~G" ?Ğ)
673 ("~g" ?ğ)
674 ("~U" ?Ŭ)
675 ("~u" ?ŭ)
676 ("~`" ?˘)
677 ("~~" ?¸)
678 ("~ " ?~)
679 ("/C" ?Ċ)
680 ("/G" ?Ġ)
681 ("/H" ?Ħ)
682 ("/I" ?İ)
683 ("/Z" ?Ż)
684 ("/c" ?ċ)
685 ("/g" ?ġ)
686 ("/h" ?ħ)
687 ("/i" ?ı)
688 ("/z" ?ż)
689 ("/." ?˙)
690 ("/#" ?£)
691 ("/$" ?¤)
692 ("//" ?°)
693 ("/ " ?/)
694 (".C" ?Ċ)
695 (".G" ?Ġ)
696 (".I" ?İ)
697 (".Z" ?Ż)
698 (".c" ?ċ)
699 (".g" ?ġ)
700 (".z" ?ż)
701 )
702
703
704 (quail-define-package
705 "polish-slash" "Polish" "PL>" nil
706 "Polish diacritics and slash character are input as `/[acelnosxzACELNOSXZ/]'.
707 For example, the character named `aogonek' is obtained by `/a'."
708 nil t t t nil nil nil nil nil nil t)
709
710 (quail-define-rules
711 ("//" ?/)
712 ("/a" ?ą)
713 ("/c" ?ć)
714 ("/e" ?ę)
715 ("/l" ?ł)
716 ("/n" ?ń)
717 ("/o" ?ó)
718 ("/s" ?ś)
719 ("/x" ?ź)
720 ("/z" ?ż)
721 ("/A" ?Ą)
722 ("/C" ?Ć)
723 ("/E" ?Ę)
724 ("/L" ?Ł)
725 ("/N" ?Ń)
726 ("/O" ?Ó)
727 ("/S" ?Ś)
728 ("/X" ?Ź)
729 ("/Z" ?Ż))
730
731 (quail-define-package
732 "latin-9-prefix" "Latin-9" "0>" t
733 "Latin-9 characters input method with prefix modifiers
734
735 effect | prefix | examples
736 ------------+--------+----------
737 acute | ' | 'a -> á
738 grave | ` | `a -> à
739 circumflex | ^ | ^a -> â
740 diaeresis | \" | \"a -> ä, \"Y -> Ÿ
741 tilde | ~ | ~a -> ã
742 caron | ~ | ~z -> ž
743 cedilla | ~ | ~c -> ç
744 misc | \" ~ / | \"s -> ß ~d -> ð ~t -> þ /a -> å /e -> æ /o -> ø
745 | \" ~ / | /o -> œ
746 symbol | ~ | ~> -> » ~< -> « ~! -> ¡ ~? -> ¿ ~~ -> ž
747 | ~ | ~s -> § ~e -> € ~. -> · ~$ -> £ ~u -> µ
748 | ~ | ~- -> ­ ~= -> ¯
749 symbol | _ / | _o -> º _a -> ª // -> ° /\\ -> × _y -> ¥
750 | _ / | _: -> ÷ /c -> ¢ ~p -> ¶
751 | _ / | /= -> ¬
752 symbol | ^ | ^r -> ® ^c -> © ^1 -> ¹ ^2 -> ² ^3 -> ³ _a -> ª
753 " nil t nil nil nil nil nil nil nil nil t)
754
755 (quail-define-rules
756 ("'A" ?Á)
757 ("'E" ?É)
758 ("'I" ?Í)
759 ("'O" ?Ó)
760 ("'U" ?Ú)
761 ("'Y" ?Ý)
762 ("'a" ?á)
763 ("'e" ?é)
764 ("'i" ?í)
765 ("'o" ?ó)
766 ("'u" ?ú)
767 ("'y" ?ý)
768 ("' " ?')
769 ("`A" ?À)
770 ("`E" ?È)
771 ("`I" ?Ì)
772 ("`O" ?Ò)
773 ("`U" ?Ù)
774 ("`a" ?à)
775 ("`e" ?è)
776 ("`i" ?ì)
777 ("`o" ?ò)
778 ("`u" ?ù)
779 ("``" ?`)
780 ("` " ?`)
781 ("^A" ?Â)
782 ("^E" ?Ê)
783 ("^I" ?Î)
784 ("^O" ?Ô)
785 ("^U" ?Û)
786 ("^a" ?â)
787 ("^e" ?ê)
788 ("^i" ?î)
789 ("^o" ?ô)
790 ("^u" ?û)
791 ("^^" ?^)
792 ("^ " ?^)
793 ("\"A" ?Ä)
794 ("\"E" ?Ë)
795 ("\"I" ?Ï)
796 ("\"O" ?Ö)
797 ("\"U" ?Ü)
798 ("\"a" ?ä)
799 ("\"e" ?ë)
800 ("\"i" ?ï)
801 ("\"o" ?ö)
802 ("\"s" ?ß)
803 ("\"u" ?ü)
804 ("\"y" ?ÿ)
805 ("\" " ?\")
806 ("~A" ?Ã)
807 ("~C" ?Ç)
808 ("~D" ?Ð)
809 ("~N" ?Ñ)
810 ("~O" ?Õ)
811 ("~S" ?Š)
812 ("~T" ?Þ)
813 ("~Z" ?Ž)
814 ("~a" ?ã)
815 ("~c" ?ç)
816 ("~d" ?ð)
817 ("~n" ?ñ)
818 ("~o" ?õ)
819 ("~s" ?š)
820 ("~t" ?þ)
821 ("~z" ?ž)
822 ("~>" ?\»)
823 ("~<" ?\«)
824 ("~!" ?¡)
825 ("~?" ?¿)
826 ("~ " ?~)
827 ("/A" ?Å)
828 ("/E" ?Æ)
829 ("/O" ?Ø)
830 ("/a" ?å)
831 ("/e" ?æ)
832 ("/o" ?ø)
833 ("//" ?°)
834 ("/ " ?/)
835 ("_o" ?º)
836 ("_a" ?ª)
837 ("_+" ?±)
838 ("_y" ?¥)
839 ("_:" ?÷)
840 ("_ " ? )
841 ("__" ?_)
842 ("/c" ?¢)
843 ("/\\" ?×)
844 ("/o" ?œ) ; clash with ø, but æ uses /
845 ("/O" ?Œ)
846 ("\"Y" ?Ÿ)
847 ("~s" ?§)
848 ("~p" ?¶)
849 ;; Is this the best option for Euro entry?
850 ("~e" ?€)
851 ("~." ?·)
852 ("~$" ?£)
853 ("~u" ?µ)
854 ("^r" ?®)
855 ("^c" ?©)
856 ("^1" ?¹)
857 ("^2" ?²)
858 ("^3" ?³)
859 ("~-" ?­)
860 ("~=" ?¯)
861 ("/=" ?¬))
862
863 ;; Latin-8 was done by an Englishman -- Johnny Celt should take a
864 ;; squint at it.
865
866 (quail-define-package
867 "latin-8-prefix" "Latin-8" "8>" t
868 "Latin-8 characters input method with prefix modifiers
869
870 effect | prefix | examples
871 ------------+--------+----------
872 acute | ' | 'a -> á
873 grave | ` | `a -> à
874 circumflex | ^ | ^w -> ŵ
875 diaeresis | \" | \"a -> ä
876 dot above | . | .b -> ḃ
877 tilde | ~ | ~a -> ã
878 cedilla | ~ | ~c -> ç
879 misc | \" ~ / | \"s -> ß /a -> å /e -> æ /o -> ø
880 | ~ | ~s -> § ~$ -> £ ~p -> ¶
881 symbol | ^ | ^r -> ® ^c -> ©
882 " nil t nil nil nil nil nil nil nil nil t)
883
884 ;; Basically following Latin-1, plus dottiness from Latin-3.
885 (quail-define-rules
886 (".B" ?Ḃ)
887 (".b" ?ḃ)
888 (".c" ?ċ)
889 (".C" ?Ċ)
890 (".D" ?Ḋ)
891 (".d" ?ḋ)
892 (".f" ?ḟ)
893 (".F" ?Ḟ)
894 (".g" ?ġ)
895 (".G" ?Ġ)
896 (".m" ?ṁ)
897 (".M" ?Ṁ)
898 (".p" ?ṗ)
899 (".P" ?Ṗ)
900 (".s" ?ṡ)
901 (".S" ?Ṡ)
902 (".t" ?ṫ)
903 (".T" ?Ṫ)
904 ("'A" ?Á)
905 ("'E" ?É)
906 ("'I" ?Í)
907 ("'O" ?Ó)
908 ("'U" ?Ú)
909 ("'Y" ?Ý)
910 ("'W" ?Ẃ)
911 ("'a" ?á)
912 ("'e" ?é)
913 ("'i" ?í)
914 ("'o" ?ó)
915 ("'u" ?ú)
916 ("'w" ?ẃ)
917 ("'y" ?ý)
918 ("' " ?')
919 ("`A" ?À)
920 ("`E" ?È)
921 ("`I" ?Ì)
922 ("`O" ?Ò)
923 ("`U" ?Ù)
924 ("`W" ?Ẁ)
925 ("`Y" ?Ỳ)
926 ("`a" ?à)
927 ("`e" ?è)
928 ("`i" ?ì)
929 ("`o" ?ò)
930 ("`u" ?ù)
931 ("`w" ?ẁ)
932 ("`y" ?ỳ)
933 ("``" ?`)
934 ("` " ?`)
935 ("^A" ?Â)
936 ("^E" ?Ê)
937 ("^I" ?Î)
938 ("^O" ?Ô)
939 ("^U" ?Û)
940 ("^a" ?â)
941 ("^e" ?ê)
942 ("^i" ?î)
943 ("^o" ?ô)
944 ("^u" ?û)
945 ("^w" ?ŵ)
946 ("^W" ?Ŵ)
947 ("^y" ?ŷ)
948 ("^Y" ?Ŷ)
949 ("^^" ?^)
950 ("^ " ?^)
951 ("\"A" ?Ä)
952 ("\"E" ?Ë)
953 ("\"I" ?Ï)
954 ("\"O" ?Ö)
955 ("\"U" ?Ü)
956 ("\"a" ?ä)
957 ("\"e" ?ë)
958 ("\"i" ?ï)
959 ("\"o" ?ö)
960 ("\"s" ?ß)
961 ("\"u" ?ü)
962 ("\"w" ?ẅ)
963 ("\"W" ?Ẅ)
964 ("\"y" ?ÿ)
965 ("\"Y" ?Ÿ)
966 ("\" " ?\")
967 ("~A" ?Ã)
968 ("~C" ?Ç)
969 ("~N" ?Ñ)
970 ("~O" ?Õ)
971 ("~a" ?ã)
972 ("~c" ?ç)
973 ("~n" ?ñ)
974 ("~o" ?õ)
975 ("~ " ?~)
976 ("/A" ?Å)
977 ("/E" ?Æ)
978 ("/O" ?Ø)
979 ("/a" ?å)
980 ("/e" ?æ)
981 ("/o" ?ø)
982 ("/ " ?/)
983 ("~p" ?¶)
984 ("~s" ?§)
985 ("~$" ?£)
986 ("^r" ?®)
987 ("^c" ?©))
988
989 (quail-define-package
990 "latin-prefix" "Latin" "L>" t
991 "Latin characters input method with prefix modifiers.
992 This is the union of various input methods originally made for input
993 of characters from a single Latin-N charset.
994
995 effect | prefix | examples
996 ------------+--------+----------
997 acute | ' | 'a -> á, '' -> ´
998 grave | ` | `a -> à
999 circumflex | ^ | ^a -> â
1000 diaeresis | \" | \"a -> ä \"\" -> ¨
1001 tilde | ~ | ~a -> ã
1002 cedilla | ~ | ~c -> ç
1003 breve | ~ | ~a -> ă
1004 caron | ~ | ~c -> č
1005 dot above | ~ / . | ~o -> ġ /o -> ġ .o -> ġ
1006 misc | \" ~ / | \"s -> ß ~d -> ð ~t -> þ /a -> å /e -> æ /o -> ø
1007 symbol | ~ | ~> -> » ~< -> « ~! -> ¡ ~? -> ¿ ~~ -> ¸
1008 symbol | _ / | _o -> º _a -> ª // -> ° /\\ -> × _y -> ¥
1009 symbol | ^ | ^r -> ® ^c -> © ^1 -> ¹ ^2 -> ² ^3 -> ³
1010 " nil t nil nil nil nil nil nil nil nil t)
1011
1012 (quail-define-rules
1013 ("' " ?')
1014 ("''" ?´)
1015 ("'A" ?Á)
1016 ("'E" ?É)
1017 ("'I" ?Í)
1018 ("'O" ?Ó)
1019 ("'U" ?Ú)
1020 ("'W" ?Ẃ)
1021 ("'Y" ?Ý)
1022 ("'a" ?á)
1023 ("'e" ?é)
1024 ("'i" ?í)
1025 ("'o" ?ó)
1026 ("'u" ?ú)
1027 ("'w" ?ẃ)
1028 ("'y" ?ý)
1029 (".B" ?Ḃ)
1030 (".C" ?Ċ)
1031 (".D" ?Ḋ)
1032 (".F" ?Ḟ)
1033 (".G" ?Ġ)
1034 (".I" ?İ)
1035 (".M" ?Ṁ)
1036 (".P" ?Ṗ)
1037 (".S" ?Ṡ)
1038 (".T" ?Ṫ)
1039 (".Z" ?Ż)
1040 (".b" ?ḃ)
1041 (".c" ?ċ)
1042 (".d" ?ḋ)
1043 (".f" ?ḟ)
1044 (".g" ?ġ)
1045 (".m" ?ṁ)
1046 (".p" ?ṗ)
1047 (".s" ?ṡ)
1048 (".t" ?ṫ)
1049 (".z" ?ż)
1050 ("/ " ?/)
1051 ("/#" ?£)
1052 ("/$" ?¤)
1053 ("/." ?˙)
1054 ("//" ?°)
1055 ("/2" ?½)
1056 ("/3" ?¾)
1057 ("/4" ?¼)
1058 ("/=" ?¬)
1059 ("/A" ?Å)
1060 ("/C" ?Ċ)
1061 ("/E" ?Æ)
1062 ("/G" ?Ġ)
1063 ("/H" ?Ħ)
1064 ("/I" ?İ)
1065 ("/O" ?Ø)
1066 ("/O" ?Œ)
1067 ("/Z" ?Ż)
1068 ("/\\" ?×)
1069 ("/a" ?å)
1070 ("/c" ?¢)
1071 ("/c" ?ċ)
1072 ("/e" ?æ)
1073 ("/g" ?ġ)
1074 ("/h" ?ħ)
1075 ("/i" ?ı)
1076 ("/o" ?ø)
1077 ("/o" ?œ)
1078 ("/z" ?ż)
1079 ("\" " ?\")
1080 ("\"A" ?Ä)
1081 ("\"E" ?Ë)
1082 ("\"I" ?Ï)
1083 ("\"O" ?Ö)
1084 ("\"U" ?Ü)
1085 ("\"W" ?Ẅ)
1086 ("\"Y" ?Ÿ)
1087 ("\"\"" ?¨)
1088 ("\"a" ?ä)
1089 ("\"e" ?ë)
1090 ("\"i" ?ï)
1091 ("\"o" ?ö)
1092 ("\"s" ?ß)
1093 ("\"u" ?ü)
1094 ("\"w" ?ẅ)
1095 ("\"y" ?ÿ)
1096 ("^ " ?^)
1097 ("^1" ?¹)
1098 ("^2" ?²)
1099 ("^3" ?³)
1100 ("^A" ?Â)
1101 ("^C" ?Ĉ)
1102 ("^E" ?Ê)
1103 ("^G" ?Ĝ)
1104 ("^H" ?Ĥ)
1105 ("^I" ?Î)
1106 ("^J" ?Ĵ)
1107 ("^O" ?Ô)
1108 ("^S" ?Ŝ)
1109 ("^U" ?Û)
1110 ("^W" ?Ŵ)
1111 ("^Y" ?Ŷ)
1112 ("^^" ?^)
1113 ("^a" ?â)
1114 ("^c" ?©)
1115 ("^c" ?ĉ)
1116 ("^e" ?ê)
1117 ("^g" ?ĝ)
1118 ("^h" ?ĥ)
1119 ("^i" ?î)
1120 ("^j" ?ĵ)
1121 ("^o" ?ô)
1122 ("^r" ?®)
1123 ("^s" ?ŝ)
1124 ("^u" ?û)
1125 ("^w" ?ŵ)
1126 ("^y" ?ŷ)
1127 ("_+" ?±)
1128 ("_:" ?÷)
1129 ("_a" ?ª)
1130 ("_o" ?º)
1131 ("_y" ?¥)
1132 ("_ " ? )
1133 ("` " ?`)
1134 ("`A" ?À)
1135 ("`E" ?È)
1136 ("`I" ?Ì)
1137 ("`O" ?Ò)
1138 ("`U" ?Ù)
1139 ("`W" ?Ẁ)
1140 ("`Y" ?Ỳ)
1141 ("``" ?`)
1142 ("`a" ?à)
1143 ("`e" ?è)
1144 ("`i" ?ì)
1145 ("`o" ?ò)
1146 ("`u" ?ù)
1147 ("`w" ?ẁ)
1148 ("`y" ?ỳ)
1149 ("~ " ?~)
1150 ("~!" ?¡)
1151 ("~$" ?£)
1152 ("~-" ?­)
1153 ("~." ?·)
1154 ("~<" ?\«)
1155 ("~=" ?¯)
1156 ("~>" ?\»)
1157 ("~?" ?¿)
1158 ("~A" ?Ã)
1159 ("~C" ?Ç)
1160 ("~D" ?Ð)
1161 ("~G" ?Ğ)
1162 ("~N" ?Ñ)
1163 ("~O" ?Õ)
1164 ("~O" ?Ġ)
1165 ("~S" ?Ş)
1166 ("~S" ?Š)
1167 ("~T" ?Þ)
1168 ("~U" ?Ŭ)
1169 ("~Z" ?Ž)
1170 ("~`" ?˘)
1171 ("~a" ?ã)
1172 ("~c" ?ç)
1173 ("~d" ?ð)
1174 ("~e" ?€)
1175 ("~g" ?ğ)
1176 ("~n" ?ñ)
1177 ("~o" ?õ)
1178 ("~o" ?ġ)
1179 ("~p" ?¶)
1180 ("~s" ?§)
1181 ("~s" ?ş)
1182 ("~s" ?š)
1183 ("~t" ?þ)
1184 ("~u" ?µ)
1185 ("~u" ?ŭ)
1186 ("~x" ?¤)
1187 ("~z" ?ž)
1188 ("~|" ?¦)
1189 ("~~" ?¸)
1190 )
1191
1192 ;; arch-tag: 83017837-6b84-4366-b183-e0577e3ed838
1193 ;;; latin-pre.el ends here