Move runtime leim lisp files to lisp/leim directory
[bpt/emacs.git] / lisp / leim / quail / latin-pre.el
1 ;;; latin-pre.el --- Quail packages for inputting various European characters -*-coding: utf-8;-*-
2
3 ;; Copyright (C) 1997-2013 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 misc | / | /o -> œ
268 " nil t nil nil nil nil nil nil nil nil t)
269
270 (quail-define-rules
271 ("'E")
272 ("'C")
273 ("'e")
274 ("'c")
275 ("' " ?')
276 ("`A")
277 ("`E")
278 ("`U")
279 ("`a")
280 ("`e")
281 ("`u")
282 ("` " ?`)
283 ("^A")
284 ("^E")
285 ("^I")
286 ("^O")
287 ("^U")
288 ("^a")
289 ("^e")
290 ("^i")
291 ("^o")
292 ("^u")
293 ("^ " ?^)
294 ("\"E")
295 ("\"I")
296 ("\"e")
297 ("\"i")
298 ("\" " ?\")
299 ("/o")
300 ("/O")
301 ("/ " ?/)
302 ("~<" ?\«)
303 ("~>" ?\»)
304 ("~C")
305 ("~c")
306 ("~ " ?~)
307 (",C")
308 (",c")
309 (", " ?,)
310 )
311
312 (quail-define-package
313 "romanian-prefix" "Romanian" "RO>" t
314 "Romanian (româneşte) input method with prefix modifiers
315
316 effect | prefix | examples
317 ------------+--------+------------------
318 tilde | ~ | ~a -> ă
319 circumflex | ^ | ^a -> â, ^i -> î
320 cedilla | , | ,s -> ş, ,t -> ţ
321 ~ | ~ | ~~ -> ~
322 ^ | ^ | ^^ -> ^
323 , | , | ,, -> ,
324 " nil t nil nil nil nil nil nil nil nil t)
325
326 (quail-define-rules
327 ("~A") ("~a")
328 ("^A") ("^a")
329 ("^I") ("^i")
330 (",S") (",s")
331 (",T") (",t")
332 ("^^" ?^) ("~~" ?~) (",," ?,))
333
334 (quail-define-package
335 "romanian-alt-prefix" "Romanian" "RO>" t
336 "Alternative Romanian (româneşte) input method with prefix modifiers
337
338 effect | prefix | examples
339 ------------+--------+------------------
340 tilde | \" | \"a -> â
341 circumflex | ' | 'a -> â, 'i -> î
342 cedilla | ' | 's -> ş, 't -> ţ
343 ' | ' | '' -> '
344 \" | \" | \"\" -> \"
345 " nil t nil nil nil nil nil nil nil nil t)
346
347 (quail-define-rules
348 ("'A") ("'a")
349 ("\"A") ("\"a")
350 ("'I") ("'i")
351 ("'S") ("'s")
352 ("'T") ("'t")
353 ("''" ?') ("\"\"" ?\"))
354
355 (quail-define-package
356 "german-prefix" "German" "DE>" t
357 "German (Deutsch) input method with prefix modifiers
358 Key translation rules are:
359 \"A -> Ä -> \"O -> Ö \"U -> Ü \"s -> ß
360 " nil t nil nil nil nil nil nil nil nil t)
361
362 (quail-define-rules
363 ("\"A")
364 ("\"O")
365 ("\"U")
366 ("\"a")
367 ("\"o")
368 ("\"u")
369 ("\"s")
370 ("\" " ?\")
371 )
372
373 (quail-define-package
374 "irish-prefix" "Latin-1" "GA>" t
375 "Irish input method with prefix modifiers
376 Key translation rules are:
377 'A -> Á 'E -> É 'I -> Í 'O -> Ó 'U -> Ú
378 " nil t nil nil nil nil nil nil nil nil t)
379
380 (quail-define-rules
381 ("'A")
382 ("'E")
383 ("'I")
384 ("'O")
385 ("'U")
386 ("'a")
387 ("'e")
388 ("'i")
389 ("'o")
390 ("'u")
391 ("' " ?')
392 )
393
394 (quail-define-package
395 "portuguese-prefix" "Latin-1" "PT>" t
396 "Portuguese input method with prefix modifiers
397
398 effect | prefix | examples
399 ------------+--------+----------
400 acute | ' | 'a -> á '' -> ´
401 grave | ` | `a -> à
402 circumflex | ^ | ^a -> â
403 diaeresis | \" | \"u -> ü
404 tilde | ~ | ~a -> ã
405 cedilla | ' or , | 'c -> ç ,c -> ç
406 " nil t nil nil nil nil nil nil nil nil t)
407
408 (quail-define-rules
409 ("'A")
410 ("'E")
411 ("'I")
412 ("'O")
413 ("'U")
414 ("'C")
415 ("'a")
416 ("'e")
417 ("'i")
418 ("'o")
419 ("'u")
420 ("'c")
421 ("' " ?')
422 ("`A")
423 ("`a")
424 ("` " ?`)
425 ("^A")
426 ("^E")
427 ("^O")
428 ("^a")
429 ("^e")
430 ("^o")
431 ("^ " ?^)
432 ("\"U")
433 ("\"u")
434 ("\" " ?\")
435 ("~A")
436 ("~O")
437 ("~a")
438 ("~o")
439 ("~ " ?~)
440 (",c")
441 (",C")
442 (",," ?,)
443 )
444
445 (quail-define-package
446 "spanish-prefix" "Spanish" "ES>" t
447 "Spanish (Español) input method with prefix modifiers
448
449 effect | prefix | examples
450 ------------+--------+----------
451 acute | ' | 'a -> á
452 diaeresis | \" | \"u -> ü
453 tilde | ~ | ~n -> ñ
454 symbol | ~ | ~> -> » ~< -> « ~! -> ¡ ~? -> ¿
455 " nil t nil nil nil nil nil nil nil nil t)
456
457 (quail-define-rules
458 ("'A")
459 ("'E")
460 ("'I")
461 ("'O")
462 ("'U")
463 ("'a")
464 ("'e")
465 ("'i")
466 ("'o")
467 ("'u")
468 ("' " ?')
469 ("\"U")
470 ("\"u")
471 ("\" " ?\")
472 ("~N")
473 ("~n")
474 ("~>" ?\»)
475 ("~<" ?\«)
476 ("~!")
477 ("~?" ?¿)
478 ("~ " ?~)
479 )
480
481 (quail-define-package
482 "latin-2-prefix" "Latin-2" "2>" t
483 "Latin-2 characters input method with prefix modifiers
484
485 effect | prefix | examples
486 ------------+--------+----------
487 acute | ' | 'a -> á '' -> ?´
488 circumflex | ^ | ^a -> â
489 diaeresis | \" | \"a -> ä \"\" -> ¨
490 breve | ~ | ~a -> ă
491 caron | ~ | ~c -> č
492 cedilla | ` | `c -> ç `e -> ?ę
493 misc | ' ` ~ | 'd -> đ `l -> ł `z -> ż ~o -> ő ~u -> ű
494 symbol | ~ | `. -> ˙ ~~ -> ˘ ~. -> ?¸
495 " nil t nil nil nil nil nil nil nil nil t)
496
497 (quail-define-rules
498 ("'A")
499 ("'C")
500 ("'D")
501 ("'E")
502 ("'I")
503 ("'L")
504 ("'N")
505 ("'O")
506 ("'R")
507 ("'S")
508 ("'U")
509 ("'Y")
510 ("'Z")
511 ("'a")
512 ("'c")
513 ("'d")
514 ("'e")
515 ("'i")
516 ("'l")
517 ("'n")
518 ("'o")
519 ("'r")
520 ("'s")
521 ("'u")
522 ("'y")
523 ("'z")
524 ("''")
525 ("' " ?')
526 ("`A")
527 ("`C")
528 ("`E")
529 ("`L")
530 ("`S")
531 ("`T")
532 ("`Z")
533 ("`a")
534 ("`l")
535 ("`c")
536 ("`e")
537 ("`s")
538 ("`t")
539 ("`z")
540 ("``")
541 ("`.")
542 ("` " ?`)
543 ("^A")
544 ("^I")
545 ("^O")
546 ("^a")
547 ("^i")
548 ("^o")
549 ("^^" ?^)
550 ("^ " ?^)
551 ("\"A")
552 ("\"E")
553 ("\"O")
554 ("\"U")
555 ("\"a")
556 ("\"e")
557 ("\"o")
558 ("\"s")
559 ("\"u")
560 ("\"\"")
561 ("\" " ?\")
562 ("~A")
563 ("~C")
564 ("~D")
565 ("~E")
566 ("~L")
567 ("~N")
568 ("~O")
569 ("~R")
570 ("~S")
571 ("~T")
572 ("~U")
573 ("~Z")
574 ("~a")
575 ("~c")
576 ("~d")
577 ("~e")
578 ("~l")
579 ("~n")
580 ("~o")
581 ("~r")
582 ("~s")
583 ("~t")
584 ("~u")
585 ("~z")
586 ("~v")
587 ("~~")
588 ("~.")
589 ("~ " ?~)
590 )
591
592 (quail-define-package
593 "latin-3-prefix" "Latin-3" "3>" t
594 "Latin-3 characters input method with prefix modifiers
595
596 effect | prefix | examples
597 ------------+--------+----------
598 acute | ' | 'a -> á '' -> ?´
599 grave | ` | `a -> à
600 circumflex | ^ | ^a -> â
601 diaeresis | \" | \"a -> ä \"\" -> ¨
602 cedilla | ~ | ~c -> ç ~s -> ş ~~ -> ¸
603 dot above | / . | /g -> ġ .o -> ġ
604 misc | \" ~ / | \"s -> ß ~g -> ğ ~u -> ŭ /h -> ħ /i -> ı
605 symbol | ~ | ~` -> ˘ /# -> £ /$ -> ¤ // -> °
606 " nil t nil nil nil nil nil nil nil nil t)
607
608 (quail-define-rules
609 ("'A")
610 ("'E")
611 ("'I")
612 ("'O")
613 ("'U")
614 ("'a")
615 ("'e")
616 ("'i")
617 ("'o")
618 ("'u")
619 ("''")
620 ("' " ?')
621 ("`A")
622 ("`E")
623 ("`I")
624 ("`O")
625 ("`U")
626 ("`a")
627 ("`e")
628 ("`i")
629 ("`o")
630 ("`u")
631 ("``" ?`)
632 ("` " ?`)
633 ("^A")
634 ("^C")
635 ("^E")
636 ("^G")
637 ("^H")
638 ("^I")
639 ("^J")
640 ("^O")
641 ("^S")
642 ("^U")
643 ("^a")
644 ("^c")
645 ("^e")
646 ("^g")
647 ("^h")
648 ("^i")
649 ("^j")
650 ("^o")
651 ("^s")
652 ("^u")
653 ("^^" ?^)
654 ("^ " ?^)
655 ("\"A")
656 ("\"E")
657 ("\"I")
658 ("\"O")
659 ("\"U")
660 ("\"a")
661 ("\"e")
662 ("\"i")
663 ("\"o")
664 ("\"u")
665 ("\"s")
666 ("\"\"")
667 ("\" " ?\")
668 ("~C")
669 ("~N")
670 ("~c")
671 ("~n")
672 ("~S")
673 ("~s")
674 ("~G")
675 ("~g")
676 ("~U")
677 ("~u")
678 ("~`")
679 ("~~")
680 ("~ " ?~)
681 ("/C")
682 ("/G")
683 ("/H")
684 ("/I")
685 ("/Z")
686 ("/c")
687 ("/g")
688 ("/h")
689 ("/i")
690 ("/z")
691 ("/.")
692 ("/#")
693 ("/$")
694 ("//")
695 ("/ " ?/)
696 (".C")
697 (".G")
698 (".I")
699 (".Z")
700 (".c")
701 (".g")
702 (".z")
703 )
704
705
706 (quail-define-package
707 "polish-slash" "Polish" "PL>" nil
708 "Polish diacritics and slash character are input as `/[acelnosxzACELNOSXZ/]'.
709 For example, the character named `aogonek' is obtained by `/a'."
710 nil t t t nil nil nil nil nil nil t)
711
712 (quail-define-rules
713 ("//" ?/)
714 ("/a")
715 ("/c")
716 ("/e")
717 ("/l")
718 ("/n")
719 ("/o")
720 ("/s")
721 ("/x")
722 ("/z")
723 ("/A")
724 ("/C")
725 ("/E")
726 ("/L")
727 ("/N")
728 ("/O")
729 ("/S")
730 ("/X")
731 ("/Z"))
732
733 (quail-define-package
734 "latin-9-prefix" "Latin-9" "0>" t
735 "Latin-9 characters input method with prefix modifiers
736
737 effect | prefix | examples
738 ------------+--------+----------
739 acute | ' | 'a -> á
740 grave | ` | `a -> à
741 circumflex | ^ | ^a -> â
742 diaeresis | \" | \"a -> ä, \"Y -> Ÿ
743 tilde | ~ | ~a -> ã
744 caron | ~ | ~z -> ž
745 cedilla | ~ | ~c -> ç
746 misc | \" ~ / | \"s -> ß ~d -> ð ~t -> þ /a -> å /e -> æ /o -> ø
747 | \" ~ / | /o -> œ
748 symbol | ~ | ~> -> » ~< -> « ~! -> ¡ ~? -> ¿ ~~ -> ž
749 | ~ | ~s -> § ~e -> € ~. -> · ~$ -> £ ~u -> µ
750 | ~ | ~- -> ­ ~= -> ¯
751 symbol | _ / | _o -> º _a -> ª // -> ° /\\ -> × _y -> ¥
752 | _ / | _: -> ÷ /c -> ¢ ~p -> ¶
753 | _ / | /= -> ¬
754 symbol | ^ | ^r -> ® ^c -> © ^1 -> ¹ ^2 -> ² ^3 -> ³ _a -> ª
755 " nil t nil nil nil nil nil nil nil nil t)
756
757 (quail-define-rules
758 ("'A")
759 ("'E")
760 ("'I")
761 ("'O")
762 ("'U")
763 ("'Y")
764 ("'a")
765 ("'e")
766 ("'i")
767 ("'o")
768 ("'u")
769 ("'y")
770 ("' " ?')
771 ("`A")
772 ("`E")
773 ("`I")
774 ("`O")
775 ("`U")
776 ("`a")
777 ("`e")
778 ("`i")
779 ("`o")
780 ("`u")
781 ("``" ?`)
782 ("` " ?`)
783 ("^A")
784 ("^E")
785 ("^I")
786 ("^O")
787 ("^U")
788 ("^a")
789 ("^e")
790 ("^i")
791 ("^o")
792 ("^u")
793 ("^^" ?^)
794 ("^ " ?^)
795 ("\"A")
796 ("\"E")
797 ("\"I")
798 ("\"O")
799 ("\"U")
800 ("\"a")
801 ("\"e")
802 ("\"i")
803 ("\"o")
804 ("\"s")
805 ("\"u")
806 ("\"y" ?ÿ)
807 ("\" " ?\")
808 ("~A")
809 ("~C")
810 ("~D")
811 ("~N")
812 ("~O")
813 ("~S")
814 ("~T")
815 ("~Z")
816 ("~a")
817 ("~c")
818 ("~d")
819 ("~n")
820 ("~o")
821 ("~s")
822 ("~t")
823 ("~z")
824 ("~>" ?\»)
825 ("~<" ?\«)
826 ("~!")
827 ("~?" ?¿)
828 ("~ " ?~)
829 ("/A")
830 ("/E")
831 ("/O")
832 ("/a")
833 ("/e")
834 ("/o")
835 ("//")
836 ("/ " ?/)
837 ("_o")
838 ("_a")
839 ("_+")
840 ("_y")
841 ("_:")
842 ("_ ")
843 ("__" ?_)
844 ("/c")
845 ("/\\")
846 ("/o") ; clash with ø, but æ uses /
847 ("/O")
848 ("\"Y")
849 ("~s")
850 ("~p")
851 ;; Is this the best option for Euro entry?
852 ("~e" ?€)
853 ("~.")
854 ("~$")
855 ("~u")
856 ("^r")
857 ("^c")
858 ("^1")
859 ("^2")
860 ("^3")
861 ("~-")
862 ("~=")
863 ("/="))
864
865 ;; Latin-8 was done by an Englishman -- Johnny Celt should take a
866 ;; squint at it.
867
868 (quail-define-package
869 "latin-8-prefix" "Latin-8" "8>" t
870 "Latin-8 characters input method with prefix modifiers
871
872 effect | prefix | examples
873 ------------+--------+----------
874 acute | ' | 'a -> á
875 grave | ` | `a -> à
876 circumflex | ^ | ^w -> ŵ
877 diaeresis | \" | \"a -> ä
878 dot above | . | .b -> ḃ
879 tilde | ~ | ~a -> ã
880 cedilla | ~ | ~c -> ç
881 misc | \" ~ / | \"s -> ß /a -> å /e -> æ /o -> ø
882 | ~ | ~s -> § ~$ -> £ ~p -> ¶
883 symbol | ^ | ^r -> ® ^c -> ©
884 " nil t nil nil nil nil nil nil nil nil t)
885
886 ;; Basically following Latin-1, plus dottiness from Latin-3.
887 (quail-define-rules
888 (".B" ?Ḃ)
889 (".b" ?ḃ)
890 (".c")
891 (".C")
892 (".D" ?Ḋ)
893 (".d" ?ḋ)
894 (".f" ?ḟ)
895 (".F" ?Ḟ)
896 (".g")
897 (".G")
898 (".m" ?ṁ)
899 (".M" ?Ṁ)
900 (".p" ?ṗ)
901 (".P" ?Ṗ)
902 (".s" ?ṡ)
903 (".S" ?Ṡ)
904 (".t" ?ṫ)
905 (".T" ?Ṫ)
906 ("'A")
907 ("'E")
908 ("'I")
909 ("'O")
910 ("'U")
911 ("'Y")
912 ("'W" ?Ẃ)
913 ("'a")
914 ("'e")
915 ("'i")
916 ("'o")
917 ("'u")
918 ("'w" ?ẃ)
919 ("'y")
920 ("' " ?')
921 ("`A")
922 ("`E")
923 ("`I")
924 ("`O")
925 ("`U")
926 ("`W" ?Ẁ)
927 ("`Y" ?Ỳ)
928 ("`a")
929 ("`e")
930 ("`i")
931 ("`o")
932 ("`u")
933 ("`w" ?ẁ)
934 ("`y" ?ỳ)
935 ("``" ?`)
936 ("` " ?`)
937 ("^A")
938 ("^E")
939 ("^I")
940 ("^O")
941 ("^U")
942 ("^a")
943 ("^e")
944 ("^i")
945 ("^o")
946 ("^u")
947 ("^w")
948 ("^W")
949 ("^y")
950 ("^Y")
951 ("^^" ?^)
952 ("^ " ?^)
953 ("\"A")
954 ("\"E")
955 ("\"I")
956 ("\"O")
957 ("\"U")
958 ("\"a")
959 ("\"e")
960 ("\"i")
961 ("\"o")
962 ("\"s")
963 ("\"u")
964 ("\"w" ?ẅ)
965 ("\"W" ?Ẅ)
966 ("\"y" ?ÿ)
967 ("\"Y")
968 ("\" " ?\")
969 ("~A")
970 ("~C")
971 ("~N")
972 ("~O")
973 ("~a")
974 ("~c")
975 ("~n")
976 ("~o")
977 ("~ " ?~)
978 ("/A")
979 ("/E")
980 ("/O")
981 ("/a")
982 ("/e")
983 ("/o")
984 ("/ " ?/)
985 ("~p")
986 ("~s")
987 ("~$")
988 ("^r")
989 ("^c"))
990
991 (quail-define-package
992 "latin-prefix" "Latin" "L>" t
993 "Latin characters input method with prefix modifiers.
994 This is the union of various input methods originally made for input
995 of characters from a single Latin-N charset.
996
997 effect | prefix | examples
998 ------------+--------+----------
999 acute | ' | 'a -> á, '' -> ´
1000 grave | ` | `a -> à
1001 circumflex | ^ | ^a -> â
1002 diaeresis | \" | \"a -> ä \"\" -> ¨
1003 tilde | ~ | ~a -> ã
1004 cedilla | ~ | ~c -> ç
1005 breve | ~ | ~a -> ă
1006 caron | ~ | ~c -> č
1007 dot above | ~ / . | ~o -> ġ /o -> ġ .o -> ġ
1008 misc | \" ~ / | \"s -> ß ~d -> ð ~t -> þ /a -> å /e -> æ /o -> ø
1009 symbol | ~ | ~> -> » ~< -> « ~! -> ¡ ~? -> ¿ ~~ -> ¸
1010 symbol | _ / | _o -> º _a -> ª // -> ° /\\ -> × _y -> ¥
1011 symbol | ^ | ^r -> ® ^c -> © ^1 -> ¹ ^2 -> ² ^3 -> ³
1012 " nil t nil nil nil nil nil nil nil nil t)
1013
1014 (quail-define-rules
1015 ("' " ?')
1016 ("''")
1017 ("'A")
1018 ("'E")
1019 ("'I")
1020 ("'O")
1021 ("'U")
1022 ("'W" ?Ẃ)
1023 ("'Y")
1024 ("'a")
1025 ("'e")
1026 ("'i")
1027 ("'o")
1028 ("'u")
1029 ("'w" ?ẃ)
1030 ("'y")
1031 (".B" ?Ḃ)
1032 (".C")
1033 (".D" ?Ḋ)
1034 (".F" ?Ḟ)
1035 (".G")
1036 (".I")
1037 (".M" ?Ṁ)
1038 (".P" ?Ṗ)
1039 (".S" ?Ṡ)
1040 (".T" ?Ṫ)
1041 (".Z")
1042 (".b" ?ḃ)
1043 (".c")
1044 (".d" ?ḋ)
1045 (".f" ?ḟ)
1046 (".g")
1047 (".m" ?ṁ)
1048 (".p" ?ṗ)
1049 (".s" ?ṡ)
1050 (".t" ?ṫ)
1051 (".z")
1052 ("/ " ?/)
1053 ("/#")
1054 ("/$")
1055 ("/.")
1056 ("//")
1057 ("/2")
1058 ("/3")
1059 ("/4")
1060 ("/=")
1061 ("/A")
1062 ("/C")
1063 ("/E")
1064 ("/G")
1065 ("/H")
1066 ("/I")
1067 ("/O")
1068 ("/O")
1069 ("/Z")
1070 ("/\\")
1071 ("/a")
1072 ("/c")
1073 ("/c")
1074 ("/e")
1075 ("/g")
1076 ("/h")
1077 ("/i")
1078 ("/o")
1079 ("/o")
1080 ("/z")
1081 ("\" " ?\")
1082 ("\"A")
1083 ("\"E")
1084 ("\"I")
1085 ("\"O")
1086 ("\"U")
1087 ("\"W" ?Ẅ)
1088 ("\"Y")
1089 ("\"\"")
1090 ("\"a")
1091 ("\"e")
1092 ("\"i")
1093 ("\"o")
1094 ("\"s")
1095 ("\"u")
1096 ("\"w" ?ẅ)
1097 ("\"y" ?ÿ)
1098 ("^ " ?^)
1099 ("^1")
1100 ("^2")
1101 ("^3")
1102 ("^A")
1103 ("^C")
1104 ("^E")
1105 ("^G")
1106 ("^H")
1107 ("^I")
1108 ("^J")
1109 ("^O")
1110 ("^S")
1111 ("^U")
1112 ("^W")
1113 ("^Y")
1114 ("^^" ?^)
1115 ("^a")
1116 ("^c")
1117 ("^c")
1118 ("^e")
1119 ("^g")
1120 ("^h")
1121 ("^i")
1122 ("^j")
1123 ("^o")
1124 ("^r")
1125 ("^s")
1126 ("^u")
1127 ("^w")
1128 ("^y")
1129 ("_+")
1130 ("_:")
1131 ("_a")
1132 ("_o")
1133 ("_y")
1134 ("_ ")
1135 ("` " ?`)
1136 ("`A")
1137 ("`E")
1138 ("`I")
1139 ("`O")
1140 ("`U")
1141 ("`W" ?Ẁ)
1142 ("`Y" ?Ỳ)
1143 ("``" ?`)
1144 ("`a")
1145 ("`e")
1146 ("`i")
1147 ("`o")
1148 ("`u")
1149 ("`w" ?ẁ)
1150 ("`y" ?ỳ)
1151 ("~ " ?~)
1152 ("~!")
1153 ("~$")
1154 ("~-")
1155 ("~.")
1156 ("~<" ?\«)
1157 ("~=")
1158 ("~>" ?\»)
1159 ("~?" ?¿)
1160 ("~A")
1161 ("~C")
1162 ("~D")
1163 ("~G")
1164 ("~N")
1165 ("~O")
1166 ("~O")
1167 ("~S")
1168 ("~S")
1169 ("~T")
1170 ("~U")
1171 ("~Z")
1172 ("~`")
1173 ("~a")
1174 ("~c")
1175 ("~d")
1176 ("~e" ?€)
1177 ("~g")
1178 ("~n")
1179 ("~o")
1180 ("~o")
1181 ("~p")
1182 ("~s")
1183 ("~s")
1184 ("~s")
1185 ("~t")
1186 ("~u")
1187 ("~u")
1188 ("~x")
1189 ("~z")
1190 ("~|")
1191 ("~~")
1192 )
1193
1194 ;;; latin-pre.el ends here