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