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