Commit | Line | Data |
---|---|---|
8449b3e3 | 1 | ;;; latin-pre.el --- Quail packages for inputting various European characters -*-coding: iso-2022-7bit;-*- |
24b31c88 KH |
2 | |
3 | ;; Copyright (C) 1997 Electrotechnical Laboratory, JAPAN. | |
4 | ;; Licensed to the Free Software Foundation. | |
e34786c9 | 5 | ;; Copyright (C) 2000 Free Software Foundation, Inc. |
24b31c88 KH |
6 | |
7 | ;; Keywords: mule, multilingual, latin, input method | |
8 | ||
9 | ;; This file is part of GNU Emacs. | |
10 | ||
11 | ;; GNU Emacs is free software; you can redistribute it and/or modify | |
12 | ;; it under the terms of the GNU General Public License as published by | |
13 | ;; the Free Software Foundation; either version 2, or (at your option) | |
14 | ;; any later version. | |
15 | ||
16 | ;; GNU Emacs is distributed in the hope that it will be useful, | |
17 | ;; but WITHOUT ANY WARRANTY; without even the implied warranty of | |
18 | ;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the | |
19 | ;; GNU General Public License for more details. | |
20 | ||
21 | ;; You should have received a copy of the GNU General Public License | |
22 | ;; along with GNU Emacs; see the file COPYING. If not, write to the | |
23 | ;; Free Software Foundation, Inc., 59 Temple Place - Suite 330, | |
24 | ;; Boston, MA 02111-1307, USA. | |
25 | ||
26 | ;;; Commentary: | |
27 | ||
e34786c9 | 28 | ;; Key translation maps were originally copied from iso-acc.el. |
9ad8204c | 29 | ;; latin-1-prefix: extra special characters added, adapted from the vim |
4b23d21d KH |
30 | ;; digraphs (from J.H.M.Dassen <jdassen@wi.leidenuniv.nl>) |
31 | ;; by R.F. Smith <rsmith@xs4all.nl> | |
9ad8204c KH |
32 | ;; |
33 | ;; polish-slash: | |
be567141 PJ |
34 | ;; Author: W\e,B3\e(Bodek Bzyl <matwb@univ.gda.pl> |
35 | ;; Maintainer: W\e,B3\e(Bodek Bzyl <matwb@univ.gda.pl> | |
e34786c9 DL |
36 | ;; |
37 | ;; latin-[89]-prefix: Dave Love <fx@gnu.org> | |
24b31c88 KH |
38 | |
39 | ;;; Code: | |
40 | ||
41 | (require 'quail) | |
42 | ||
43 | (quail-define-package | |
db9dfa94 | 44 | "latin-1-prefix" "Latin-1" "1>" t |
24b31c88 KH |
45 | "Latin-1 characters input method with prefix modifiers |
46 | ||
47 | effect | prefix | examples | |
48 | ------------+--------+---------- | |
49 | acute | ' | 'a -> \e,Aa\e(B, '' -> \e,A4\e(B | |
50 | grave | ` | `a -> \e,A`\e(B | |
51 | circumflex | ^ | ^a -> \e,Ab\e(B | |
4b23d21d | 52 | diaeresis | \" | \"a -> \e,Ad\e(B \"\" -> \e,A(\e(B |
24b31c88 KH |
53 | tilde | ~ | ~a -> \e,Ac\e(B |
54 | cedilla | ~ | ~c -> \e,Ag\e(B | |
4b23d21d KH |
55 | 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 |
56 | symbol | ~ | ~> -> \e,A;\e(B ~< -> \e,A+\e(B ~! -> \e,A!\e(B ~? -> \e,A?\e(B ~~ -> \e,A8\e(B | |
e34786c9 DL |
57 | | ~ | ~s -> \e,A'\e(B ~x -> \e,A$\e(B ~. -> \e,A7\e(B ~$ -> \e,A#\e(B ~u -> \e,A5\e(B |
58 | | ~ | ~p -> \e,A6\e(B ~- -> \e,A-\e(B ~= -> \e,A/\e(B ~| -> \e,A&\e(B | |
4b23d21d KH |
59 | symbol | _ / | _o -> \e,A:\e(B _a -> \e,A*\e(B // -> \e,A0\e(B /\\ -> \e,AW\e(B _y -> \e,A%\e(B |
60 | | _ / | _: -> \e,Aw\e(B /c -> \e,A"\e(B /2 -> \e,A=\e(B /4 -> \e,A<\e(B /3 -> \e,A>\e(B | |
e34786c9 DL |
61 | | _ / | /= => \e,A,\e(B |
62 | symbol | ^ | ^r -> \e,A.\e(B ^c -> \e,A)\e(B ^1 -> \e,A9\e(B ^2 -> \e,A2\e(B ^3 -> \e,A3\e(B | |
3c48e39a | 63 | " nil t nil nil nil nil nil nil nil nil t) |
24b31c88 | 64 | |
be567141 | 65 | ;; Fixme: should we have non-break space somehow? If so, how? |
24b31c88 KH |
66 | (quail-define-rules |
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 | ("'a" ?\e,Aa\e(B) | |
74 | ("'e" ?\e,Ai\e(B) | |
75 | ("'i" ?\e,Am\e(B) | |
76 | ("'o" ?\e,As\e(B) | |
77 | ("'u" ?\e,Az\e(B) | |
78 | ("'y" ?\e,A}\e(B) | |
79 | ("''" ?\e,A4\e(B) | |
80 | ("' " ?') | |
81 | ("`A" ?\e,A@\e(B) | |
82 | ("`E" ?\e,AH\e(B) | |
83 | ("`I" ?\e,AL\e(B) | |
84 | ("`O" ?\e,AR\e(B) | |
85 | ("`U" ?\e,AY\e(B) | |
86 | ("`a" ?\e,A`\e(B) | |
87 | ("`e" ?\e,Ah\e(B) | |
88 | ("`i" ?\e,Al\e(B) | |
89 | ("`o" ?\e,Ar\e(B) | |
90 | ("`u" ?\e,Ay\e(B) | |
91 | ("``" ?`) | |
92 | ("` " ?`) | |
93 | ("^A" ?\e,AB\e(B) | |
94 | ("^E" ?\e,AJ\e(B) | |
95 | ("^I" ?\e,AN\e(B) | |
96 | ("^O" ?\e,AT\e(B) | |
97 | ("^U" ?\e,A[\e(B) | |
98 | ("^a" ?\e,Ab\e(B) | |
99 | ("^e" ?\e,Aj\e(B) | |
100 | ("^i" ?\e,An\e(B) | |
101 | ("^o" ?\e,At\e(B) | |
102 | ("^u" ?\e,A{\e(B) | |
103 | ("^^" ?^) | |
104 | ("^ " ?^) | |
105 | ("\"A" ?\e,AD\e(B) | |
106 | ("\"E" ?\e,AK\e(B) | |
107 | ("\"I" ?\e,AO\e(B) | |
108 | ("\"O" ?\e,AV\e(B) | |
109 | ("\"U" ?\e,A\\e(B) | |
110 | ("\"a" ?\e,Ad\e(B) | |
111 | ("\"e" ?\e,Ak\e(B) | |
112 | ("\"i" ?\e,Ao\e(B) | |
113 | ("\"o" ?\e,Av\e(B) | |
114 | ("\"s" ?\e,A_\e(B) | |
115 | ("\"u" ?\e,A|\e(B) | |
116 | ("\"y" ?\e,A\7f\e(B) | |
117 | ("\"\"" ?\e,A(\e(B) | |
118 | ("\" " ?\") | |
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 | ("~a" ?\e,Ac\e(B) | |
126 | ("~c" ?\e,Ag\e(B) | |
127 | ("~d" ?\e,Ap\e(B) | |
128 | ("~n" ?\e,Aq\e(B) | |
129 | ("~o" ?\e,Au\e(B) | |
130 | ("~t" ?\e,A~\e(B) | |
131 | ("~>" ?\\e,A;\e(B) | |
132 | ("~<" ?\\e,A+\e(B) | |
133 | ("~!" ?\e,A!\e(B) | |
134 | ("~?" ?\e,A?\e(B) | |
135 | ("~~" ?\e,A8\e(B) | |
136 | ("~ " ?~) | |
137 | ("/A" ?\e,AE\e(B) | |
138 | ("/E" ?\e,AF\e(B) | |
139 | ("/O" ?\e,AX\e(B) | |
140 | ("/a" ?\e,Ae\e(B) | |
141 | ("/e" ?\e,Af\e(B) | |
142 | ("/o" ?\e,Ax\e(B) | |
143 | ("//" ?\e,A0\e(B) | |
ec9faeb4 | 144 | ("/ " ?/) |
1c6724b4 RS |
145 | ("_o" ?\e,A:\e(B) |
146 | ("_a" ?\e,A*\e(B) | |
4b23d21d KH |
147 | ;; Symbols added by Roland Smith <rsmith@xs4all.nl> |
148 | ("_+" ?\e,A1\e(B) | |
149 | ("_y" ?\e,A%\e(B) | |
150 | ("_:" ?\e,Aw\e(B) | |
151 | ("/c" ?\e,A"\e(B) | |
152 | ("/\\" ?\e,AW\e(B) | |
153 | ("/2" ?\e,A=\e(B) | |
154 | ("/4" ?\e,A<\e(B) | |
155 | ("/3" ?\e,A>\e(B) | |
5a76406c DL |
156 | ("~s" ?\e,A'\e(B) |
157 | ("~p" ?\e,A6\e(B) | |
4b23d21d KH |
158 | ("~x" ?\e,A$\e(B) |
159 | ("~." ?\e,A7\e(B) | |
160 | ("~$" ?\e,A#\e(B) | |
161 | ("~u" ?\e,A5\e(B) | |
162 | ("^r" ?\e,A.\e(B) | |
163 | ("^c" ?\e,A)\e(B) | |
e34786c9 | 164 | ("^1" ?\e,A9\e(B) |
4b23d21d KH |
165 | ("^2" ?\e,A2\e(B) |
166 | ("^3" ?\e,A3\e(B) | |
e34786c9 DL |
167 | ("~-" ?\e,A-\e(B) |
168 | ("~|" ?\e,A&\e(B) | |
169 | ("/=" ?\e,A,\e(B) | |
170 | ("~=" ?\e,A/\e(B) | |
24b31c88 KH |
171 | ) |
172 | ||
173 | (quail-define-package | |
db9dfa94 | 174 | "catalan-prefix" "Latin-1" "CA>" t |
24b31c88 KH |
175 | "Catalan and Spanish input method with prefix modifiers |
176 | ||
177 | effect | prefix | examples | |
178 | ------------+--------+---------- | |
1c6724b4 | 179 | acute | ' | 'a -> \e,Aa\e(B '' -> \e,A4\e(B |
24b31c88 | 180 | grave | ` | `a -> \e,A`\e(B |
1c6724b4 | 181 | diaeresis | \" | \"i -> \e,Ao\e(B \"\" -> \e,A(\e(B |
24b31c88 KH |
182 | tilde | ~ | ~n -> \e,Aq\e(B |
183 | cedilla | ~ | ~c -> \e,Ag\e(B | |
1c6724b4 | 184 | symbol | ~ | ~> -> \e,A;\e(B ~< -> \e,A+\e(B ~! -> \e,A!\e(B ~? -> \e,A?\e(B |
3c48e39a | 185 | " nil t nil nil nil nil nil nil nil nil t) |
24b31c88 KH |
186 | |
187 | (quail-define-rules | |
188 | ("'A" ?\e,AA\e(B) | |
189 | ("'E" ?\e,AI\e(B) | |
190 | ("'I" ?\e,AM\e(B) | |
191 | ("'O" ?\e,AS\e(B) | |
192 | ("'U" ?\e,AZ\e(B) | |
193 | ("'a" ?\e,Aa\e(B) | |
194 | ("'e" ?\e,Ai\e(B) | |
195 | ("'i" ?\e,Am\e(B) | |
196 | ("'o" ?\e,As\e(B) | |
197 | ("'u" ?\e,Az\e(B) | |
198 | ("' " ?') | |
199 | ("`A" ?\e,A@\e(B) | |
200 | ("`E" ?\e,AH\e(B) | |
201 | ("`O" ?\e,AR\e(B) | |
202 | ("`a" ?\e,A`\e(B) | |
203 | ("`e" ?\e,Ah\e(B) | |
204 | ("`o" ?\e,Ar\e(B) | |
205 | ("` " ?`) | |
206 | ("\"I" ?\e,AO\e(B) | |
207 | ("\"U" ?\e,A\\e(B) | |
208 | ("\"i" ?\e,Ao\e(B) | |
209 | ("\"u" ?\e,A|\e(B) | |
210 | ("\" " ?\") | |
211 | ("~C" ?\e,AG\e(B) | |
212 | ("~N" ?\e,AQ\e(B) | |
213 | ("~c" ?\e,Ag\e(B) | |
214 | ("~n" ?\e,Aq\e(B) | |
215 | ("~>" ?\\e,A;\e(B) | |
216 | ("~<" ?\\e,A+\e(B) | |
217 | ("~!" ?\e,A!\e(B) | |
218 | ("~?" ?\e,A?\e(B) | |
219 | ("~ " ?~) | |
220 | ) | |
221 | ||
222 | (quail-define-package | |
fa4e74ee | 223 | "esperanto-prefix" "Latin-3" "EO>" t |
24b31c88 KH |
224 | "Esperanto input method with prefix modifiers |
225 | Key translation rules are: | |
fa4e74ee KH |
226 | ^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, |
227 | ^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 | 228 | " nil t nil nil nil nil nil nil nil nil t) |
24b31c88 KH |
229 | |
230 | (quail-define-rules | |
fa4e74ee KH |
231 | ("^H" ?\e,C&\e(B) |
232 | ("^J" ?\e,C,\e(B) | |
233 | ("^h" ?\e,C6\e(B) | |
234 | ("^j" ?\e,C<\e(B) | |
235 | ("^C" ?\e,CF\e(B) | |
236 | ("^G" ?\e,CX\e(B) | |
237 | ("^S" ?\e,C^\e(B) | |
238 | ("^c" ?\e,Cf\e(B) | |
239 | ("^g" ?\e,Cx\e(B) | |
240 | ("^s" ?\e,C~\e(B) | |
24b31c88 KH |
241 | ("^^" ?^) |
242 | ("^ " ?^) | |
fa4e74ee KH |
243 | ("~U" ?\e,C]\e(B) |
244 | ("~u" ?\e,C}\e(B) | |
24b31c88 KH |
245 | ("~ " ?~) |
246 | ) | |
247 | ||
248 | (quail-define-package | |
14f68920 | 249 | "french-prefix" "French" "FR>" t |
24b31c88 KH |
250 | "French (Fran\e,Ag\e(Bais) input method with prefix modifiers |
251 | ||
252 | effect | prefix | examples | |
253 | ------------+--------+---------- | |
254 | acute | ' | 'e -> \e,Ai\e(B | |
255 | grave | ` | `a -> \e,A`\e(B | |
256 | circumflex | ^ | ^a -> \e,Ab\e(B | |
257 | diaeresis | \" | \"i -> \e,Ao\e(B | |
1c6724b4 RS |
258 | cedilla | ~ or , | ~c -> \e,Ag\e(B ,c -> \e,Ag\e(B |
259 | symbol | ~ | ~> -> \e,A;\e(B ~< -> \e,A+\e(B | |
3c48e39a | 260 | " nil t nil nil nil nil nil nil nil nil t) |
24b31c88 KH |
261 | |
262 | (quail-define-rules | |
263 | ("'E" ?\e,AI\e(B) | |
264 | ("'C" ?\e,AG\e(B) | |
265 | ("'e" ?\e,Ai\e(B) | |
266 | ("'c" ?\e,Ag\e(B) | |
267 | ("' " ?') | |
268 | ("`A" ?\e,A@\e(B) | |
269 | ("`E" ?\e,AH\e(B) | |
270 | ("`U" ?\e,AY\e(B) | |
271 | ("`a" ?\e,A`\e(B) | |
272 | ("`e" ?\e,Ah\e(B) | |
273 | ("`u" ?\e,Ay\e(B) | |
274 | ("` " ?`) | |
275 | ("^A" ?\e,AB\e(B) | |
276 | ("^E" ?\e,AJ\e(B) | |
277 | ("^I" ?\e,AN\e(B) | |
278 | ("^O" ?\e,AT\e(B) | |
279 | ("^U" ?\e,A[\e(B) | |
280 | ("^a" ?\e,Ab\e(B) | |
281 | ("^e" ?\e,Aj\e(B) | |
282 | ("^i" ?\e,An\e(B) | |
283 | ("^o" ?\e,At\e(B) | |
284 | ("^u" ?\e,A{\e(B) | |
285 | ("^ " ?^) | |
286 | ("\"E" ?\e,AK\e(B) | |
287 | ("\"I" ?\e,AO\e(B) | |
288 | ("\"e" ?\e,Ak\e(B) | |
289 | ("\"i" ?\e,Ao\e(B) | |
290 | ("\" " ?\") | |
291 | ("~<" ?\\e,A+\e(B) | |
292 | ("~>" ?\\e,A;\e(B) | |
293 | ("~C" ?\e,AG\e(B) | |
294 | ("~c" ?\e,Ag\e(B) | |
295 | ("~," ?,) | |
296 | (",C" ?\e,AG\e(B) | |
297 | (",c" ?\e,Ag\e(B) | |
298 | (", " ?~) | |
299 | ) | |
300 | ||
847fb748 KH |
301 | (quail-define-package |
302 | "romanian-prefix" "Romanian" "RO>" t | |
303 | "Romanian (rom\e,Bb\e(Bne\e,B:\e(Bte) input method with prefix modifiers | |
304 | ||
305 | effect | prefix | examples | |
306 | ------------+--------+------------------ | |
307 | tilde | ~ | ~a -> \e,Bc\e(B | |
308 | circumflex | ^ | ^a -> \e,Bb\e(B, ^i -> \e,Bn\e(B | |
309 | cedilla | , | ,s -> \e,B:\e(B, ,t -> \e,B~\e(B | |
310 | ~ | ~ | ~~ -> ~ | |
311 | ^ | ^ | ^^ -> ^ | |
312 | , | , | ,, -> , | |
313 | " nil t nil nil nil nil nil nil nil nil t) | |
314 | ||
315 | (quail-define-rules | |
316 | ("~A" ?\e,BC\e(B) ("~a" ?\e,Bc\e(B) | |
317 | ("^A" ?\e,BB\e(B) ("^a" ?\e,Bb\e(B) | |
318 | ("^I" ?\e,BN\e(B) ("^i" ?\e,Bn\e(B) | |
319 | (",S" ?\e,B*\e(B) (",s" ?\e,B:\e(B) | |
320 | (",T" ?\e,B^\e(B) (",t" ?\e,B~\e(B) | |
321 | ("^^" ?^) ("~~" ?~) (",," ?,)) | |
322 | ||
323 | (quail-define-package | |
324 | "romanian-alt-prefix" "Romanian" "RO>" t | |
325 | "Alternative Romanian (rom\e,Bb\e(Bne\e,B:\e(Bte) input method with prefix modifiers | |
326 | ||
327 | effect | prefix | examples | |
328 | ------------+--------+------------------ | |
329 | tilde | \" | \"a -> \e,Bb\e(B | |
330 | circumflex | ' | 'a -> \e,Bb\e(B, 'i -> \e,Bn\e(B | |
331 | cedilla | ' | 's -> \e,B:\e(B, 't -> \e,B~\e(B | |
332 | ' | ' | '' -> ' | |
333 | \" | \" | \"\" -> \" | |
334 | " nil t nil nil nil nil nil nil nil nil t) | |
335 | ||
336 | (quail-define-rules | |
337 | ("'A" ?\e,BC\e(B) ("'a" ?\e,Bc\e(B) | |
338 | ("\"A" ?\e,BB\e(B) ("\"a" ?\e,Bb\e(B) | |
339 | ("'I" ?\e,BN\e(B) ("'i" ?\e,Bn\e(B) | |
340 | ("'S" ?\e,B*\e(B) ("'s" ?\e,B:\e(B) | |
341 | ("'T" ?\e,B^\e(B) ("'t" ?\e,B~\e(B) | |
342 | ("''" ?') ("\"\"" ?\")) | |
343 | ||
24b31c88 | 344 | (quail-define-package |
14f68920 | 345 | "german-prefix" "German" "DE>" t |
24b31c88 KH |
346 | "German (Deutsch) input method with prefix modifiers |
347 | Key translation rules are: | |
1c6724b4 | 348 | \"A -> \e,AD\e(B -> \"O -> \e,AV\e(B \"U -> \e,A\\e(B \"s -> ?\e,A_\e(B |
3c48e39a | 349 | " nil t nil nil nil nil nil nil nil nil t) |
24b31c88 KH |
350 | |
351 | (quail-define-rules | |
352 | ("\"A" ?\e,AD\e(B) | |
353 | ("\"O" ?\e,AV\e(B) | |
354 | ("\"U" ?\e,A\\e(B) | |
355 | ("\"a" ?\e,Ad\e(B) | |
356 | ("\"o" ?\e,Av\e(B) | |
357 | ("\"u" ?\e,A|\e(B) | |
358 | ("\"s" ?\e,A_\e(B) | |
359 | ("\" " ?\") | |
360 | ) | |
361 | ||
362 | (quail-define-package | |
db9dfa94 | 363 | "irish-prefix" "Latin-1" "GA>" t |
24b31c88 KH |
364 | "Irish input method with prefix modifiers |
365 | Key translation rules are: | |
1c6724b4 | 366 | '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 | 367 | " nil t nil nil nil nil nil nil nil nil t) |
24b31c88 KH |
368 | |
369 | (quail-define-rules | |
370 | ("'A" ?\e,AA\e(B) | |
371 | ("'E" ?\e,AI\e(B) | |
372 | ("'I" ?\e,AM\e(B) | |
373 | ("'O" ?\e,AS\e(B) | |
374 | ("'U" ?\e,AZ\e(B) | |
375 | ("'a" ?\e,Aa\e(B) | |
376 | ("'e" ?\e,Ai\e(B) | |
377 | ("'i" ?\e,Am\e(B) | |
378 | ("'o" ?\e,As\e(B) | |
379 | ("'u" ?\e,Az\e(B) | |
380 | ("' " ?') | |
381 | ) | |
382 | ||
383 | (quail-define-package | |
db9dfa94 | 384 | "portuguese-prefix" "Latin-1" "PT>" t |
24b31c88 KH |
385 | "Portuguese input method with prefix modifiers |
386 | ||
387 | effect | prefix | examples | |
388 | ------------+--------+---------- | |
1c6724b4 | 389 | acute | ' | 'a -> \e,Aa\e(B '' -> \e,A4\e(B |
24b31c88 KH |
390 | grave | ` | `a -> \e,A`\e(B |
391 | circumflex | ^ | ^a -> \e,Ab\e(B | |
392 | diaeresis | \" | \"u -> \e,A|\e(B | |
393 | tilde | ~ | ~a -> \e,Ac\e(B | |
1c6724b4 | 394 | cedilla | ' or , | 'c -> \e,Ag\e(B ,c -> \e,Ag\e(B |
3c48e39a | 395 | " nil t nil nil nil nil nil nil nil nil t) |
24b31c88 KH |
396 | |
397 | (quail-define-rules | |
398 | ("'A" ?\e,AA\e(B) | |
399 | ("'E" ?\e,AI\e(B) | |
400 | ("'I" ?\e,AM\e(B) | |
401 | ("'O" ?\e,AS\e(B) | |
402 | ("'U" ?\e,AZ\e(B) | |
403 | ("'C" ?\e,AG\e(B) | |
404 | ("'a" ?\e,Aa\e(B) | |
405 | ("'e" ?\e,Ai\e(B) | |
406 | ("'i" ?\e,Am\e(B) | |
407 | ("'o" ?\e,As\e(B) | |
408 | ("'u" ?\e,Az\e(B) | |
409 | ("'c" ?\e,Ag\e(B) | |
410 | ("' " ?') | |
411 | ("`A" ?\e,A@\e(B) | |
412 | ("`a" ?\e,A`\e(B) | |
413 | ("` " ?`) | |
414 | ("^A" ?\e,AB\e(B) | |
415 | ("^E" ?\e,AJ\e(B) | |
416 | ("^O" ?\e,AT\e(B) | |
417 | ("^a" ?\e,Ab\e(B) | |
418 | ("^e" ?\e,Aj\e(B) | |
419 | ("^o" ?\e,At\e(B) | |
420 | ("^ " ?^) | |
421 | ("\"U" ?\e,A\\e(B) | |
422 | ("\"u" ?\e,A|\e(B) | |
423 | ("\" " ?\") | |
424 | ("~A" ?\e,AC\e(B) | |
425 | ("~O" ?\e,AU\e(B) | |
426 | ("~a" ?\e,Ac\e(B) | |
427 | ("~o" ?\e,Au\e(B) | |
428 | ("~ " ?~) | |
429 | (",c" ?\e,Ag\e(B) | |
430 | (",C" ?\e,AG\e(B) | |
431 | (",," ?,) | |
432 | ) | |
433 | ||
434 | (quail-define-package | |
14f68920 | 435 | "spanish-prefix" "Spanish" "ES>" t |
24b31c88 KH |
436 | "Spanish (Espa\e,Aq\e(Bol) input method with prefix modifiers |
437 | ||
438 | effect | prefix | examples | |
439 | ------------+--------+---------- | |
440 | acute | ' | 'a -> \e,Aa\e(B | |
441 | diaeresis | \" | \"u -> \e,A|\e(B | |
442 | tilde | ~ | ~n -> \e,Aq\e(B | |
1c6724b4 | 443 | symbol | ~ | ~> -> \e,A;\e(B ~< -> \e,A+\e(B ~! -> \e,A!\e(B ~? -> \e,A?\e(B |
3c48e39a | 444 | " nil t nil nil nil nil nil nil nil nil t) |
24b31c88 KH |
445 | |
446 | (quail-define-rules | |
447 | ("'A" ?\e,AA\e(B) | |
448 | ("'E" ?\e,AI\e(B) | |
449 | ("'I" ?\e,AM\e(B) | |
450 | ("'O" ?\e,AS\e(B) | |
451 | ("'U" ?\e,AZ\e(B) | |
452 | ("'a" ?\e,Aa\e(B) | |
453 | ("'e" ?\e,Ai\e(B) | |
454 | ("'i" ?\e,Am\e(B) | |
455 | ("'o" ?\e,As\e(B) | |
456 | ("'u" ?\e,Az\e(B) | |
457 | ("' " ?') | |
458 | ("\"U" ?\e,A\\e(B) | |
459 | ("\"u" ?\e,A|\e(B) | |
460 | ("\" " ?\") | |
461 | ("~N" ?\e,AQ\e(B) | |
462 | ("~n" ?\e,Aq\e(B) | |
463 | ("~>" ?\\e,A;\e(B) | |
464 | ("~<" ?\\e,A+\e(B) | |
465 | ("~!" ?\e,A!\e(B) | |
466 | ("~?" ?\e,A?\e(B) | |
467 | ("~ " ?~) | |
468 | ) | |
469 | ||
470 | (quail-define-package | |
db9dfa94 | 471 | "latin-2-prefix" "Latin-2" "2>" t |
24b31c88 KH |
472 | "Latin-2 characters input method with prefix modifiers |
473 | ||
474 | effect | prefix | examples | |
475 | ------------+--------+---------- | |
1c6724b4 | 476 | acute | ' | 'a -> \e,Ba\e(B '' -> ?\e,B4\e(B |
24b31c88 | 477 | circumflex | ^ | ^a -> \e,Bb\e(B |
1c6724b4 | 478 | diaeresis | \" | \"a -> \e,Bd\e(B \"\" -> \e,B(\e(B |
24b31c88 KH |
479 | breve | ~ | ~a -> \e,Bc\e(B |
480 | caron | ~ | ~c -> \e,Bh\e(B | |
1c6724b4 RS |
481 | cedilla | ` | `c -> \e,Bg\e(B `e -> ?\e,Bj\e(B |
482 | 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 | |
483 | symbol | ~ | `. -> \e,B\7f\e(B ~~ -> \e,B"\e(B ~. -> ?\e,B8\e(B | |
3c48e39a | 484 | " nil t nil nil nil nil nil nil nil nil t) |
24b31c88 KH |
485 | |
486 | (quail-define-rules | |
487 | ("'A" ?\e,BA\e(B) | |
488 | ("'C" ?\e,BF\e(B) | |
489 | ("'D" ?\e,BP\e(B) | |
490 | ("'E" ?\e,BI\e(B) | |
491 | ("'I" ?\e,BM\e(B) | |
492 | ("'L" ?\e,BE\e(B) | |
493 | ("'N" ?\e,BQ\e(B) | |
494 | ("'O" ?\e,BS\e(B) | |
495 | ("'R" ?\e,B@\e(B) | |
496 | ("'S" ?\e,B&\e(B) | |
497 | ("'U" ?\e,BZ\e(B) | |
498 | ("'Y" ?\e,B]\e(B) | |
499 | ("'Z" ?\e,B,\e(B) | |
500 | ("'a" ?\e,Ba\e(B) | |
501 | ("'c" ?\e,Bf\e(B) | |
502 | ("'d" ?\e,Bp\e(B) | |
503 | ("'e" ?\e,Bi\e(B) | |
504 | ("'i" ?\e,Bm\e(B) | |
505 | ("'l" ?\e,Be\e(B) | |
506 | ("'n" ?\e,Bq\e(B) | |
507 | ("'o" ?\e,Bs\e(B) | |
508 | ("'r" ?\e,B`\e(B) | |
509 | ("'s" ?\e,B6\e(B) | |
510 | ("'u" ?\e,Bz\e(B) | |
511 | ("'y" ?\e,B}\e(B) | |
512 | ("'z" ?\e,B<\e(B) | |
513 | ("''" ?\e,B4\e(B) | |
514 | ("' " ?') | |
515 | ("`A" ?\e,B!\e(B) | |
516 | ("`C" ?\e,BG\e(B) | |
517 | ("`E" ?\e,BJ\e(B) | |
518 | ("`L" ?\e,B#\e(B) | |
519 | ("`S" ?\e,B*\e(B) | |
520 | ("`T" ?\e,B^\e(B) | |
521 | ("`Z" ?\e,B/\e(B) | |
522 | ("`a" ?\e,B1\e(B) | |
523 | ("`l" ?\e,B3\e(B) | |
524 | ("`c" ?\e,Bg\e(B) | |
525 | ("`e" ?\e,Bj\e(B) | |
526 | ("`s" ?\e,B:\e(B) | |
527 | ("`t" ?\e,B~\e(B) | |
528 | ("`z" ?\e,B?\e(B) | |
529 | ("``" ?\e,B*\e(B) | |
530 | ("`." ?\e,B\7f\e(B) | |
531 | ("` " ?`) | |
532 | ("^A" ?\e,BB\e(B) | |
533 | ("^I" ?\e,BN\e(B) | |
534 | ("^O" ?\e,BT\e(B) | |
535 | ("^a" ?\e,Bb\e(B) | |
536 | ("^i" ?\e,Bn\e(B) | |
537 | ("^o" ?\e,Bt\e(B) | |
538 | ("^^" ?^) | |
539 | ("^ " ?^) | |
540 | ("\"A" ?\e,BD\e(B) | |
541 | ("\"E" ?\e,BK\e(B) | |
542 | ("\"O" ?\e,BV\e(B) | |
543 | ("\"U" ?\e,B\\e(B) | |
544 | ("\"a" ?\e,Bd\e(B) | |
545 | ("\"e" ?\e,Bk\e(B) | |
546 | ("\"o" ?\e,Bv\e(B) | |
547 | ("\"s" ?\e,B_\e(B) | |
548 | ("\"u" ?\e,B|\e(B) | |
549 | ("\"\"" ?\e,B(\e(B) | |
550 | ("\" " ?\") | |
551 | ("~A" ?\e,BC\e(B) | |
552 | ("~C" ?\e,BH\e(B) | |
553 | ("~D" ?\e,BO\e(B) | |
cc13aa25 | 554 | ("~E" ?\e,BL\e(B) |
24b31c88 KH |
555 | ("~L" ?\e,B%\e(B) |
556 | ("~N" ?\e,BR\e(B) | |
557 | ("~O" ?\e,BU\e(B) | |
558 | ("~R" ?\e,BX\e(B) | |
559 | ("~S" ?\e,B)\e(B) | |
560 | ("~T" ?\e,B+\e(B) | |
561 | ("~U" ?\e,B[\e(B) | |
562 | ("~Z" ?\e,B.\e(B) | |
563 | ("~a" ?\e,Bc\e(B) | |
564 | ("~c" ?\e,Bh\e(B) | |
565 | ("~d" ?\e,Bo\e(B) | |
cc13aa25 | 566 | ("~e" ?\e,Bl\e(B) |
24b31c88 KH |
567 | ("~l" ?\e,B5\e(B) |
568 | ("~n" ?\e,Br\e(B) | |
569 | ("~o" ?\e,Bu\e(B) | |
570 | ("~r" ?\e,Bx\e(B) | |
571 | ("~s" ?\e,B9\e(B) | |
572 | ("~t" ?\e,B;\e(B) | |
573 | ("~u" ?\e,B{\e(B) | |
574 | ("~z" ?\e,B>\e(B) | |
575 | ("~v" ?\e,B"\e(B) | |
576 | ("~~" ?\e,B"\e(B) | |
577 | ("~." ?\e,B8\e(B) | |
578 | ("~ " ?~) | |
579 | ) | |
580 | ||
581 | (quail-define-package | |
db9dfa94 | 582 | "latin-3-prefix" "Latin-3" "3>" t |
24b31c88 KH |
583 | "Latin-3 characters input method with prefix modifiers |
584 | ||
585 | effect | prefix | examples | |
586 | ------------+--------+---------- | |
1c6724b4 | 587 | acute | ' | 'a -> \e,Ca\e(B '' -> ?\e,C4\e(B |
24b31c88 KH |
588 | grave | ` | `a -> \e,C`\e(B |
589 | circumflex | ^ | ^a -> \e,Cb\e(B | |
1c6724b4 RS |
590 | diaeresis | \" | \"a -> \e,Cd\e(B \"\" -> \e,C(\e(B |
591 | cedilla | ~ | ~c -> \e,Cg\e(B ~s -> \e,C:\e(B ~~ -> \e,C8\e(B | |
592 | dot above | ~ / . | ~o -> \e,Cu\e(B /o -> \e,Cu\e(B .o -> \e,Cu\e(B | |
593 | 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 | |
594 | symbol | ~ | ~` -> \e,C"\e(B /# -> \e,C#\e(B /$ -> \e,C$\e(B // -> \e,C0\e(B | |
3c48e39a | 595 | " nil t nil nil nil nil nil nil nil nil t) |
24b31c88 KH |
596 | |
597 | (quail-define-rules | |
598 | ("'A" ?\e,CA\e(B) | |
599 | ("'E" ?\e,CI\e(B) | |
600 | ("'I" ?\e,CM\e(B) | |
601 | ("'O" ?\e,CS\e(B) | |
602 | ("'U" ?\e,CZ\e(B) | |
603 | ("'a" ?\e,Ca\e(B) | |
604 | ("'e" ?\e,Ci\e(B) | |
605 | ("'i" ?\e,Cm\e(B) | |
606 | ("'o" ?\e,Cs\e(B) | |
607 | ("'u" ?\e,Cz\e(B) | |
608 | ("''" ?\e,C4\e(B) | |
609 | ("' " ?') | |
610 | ("`A" ?\e,C@\e(B) | |
611 | ("`E" ?\e,CH\e(B) | |
612 | ("`I" ?\e,CL\e(B) | |
613 | ("`O" ?\e,CR\e(B) | |
614 | ("`U" ?\e,CY\e(B) | |
615 | ("`a" ?\e,C`\e(B) | |
616 | ("`e" ?\e,Ch\e(B) | |
617 | ("`i" ?\e,Cl\e(B) | |
618 | ("`o" ?\e,Cr\e(B) | |
619 | ("`u" ?\e,Cy\e(B) | |
620 | ("``" ?`) | |
621 | ("` " ?`) | |
622 | ("^A" ?\e,CB\e(B) | |
623 | ("^C" ?\e,CF\e(B) | |
624 | ("^E" ?\e,CJ\e(B) | |
625 | ("^G" ?\e,CX\e(B) | |
626 | ("^H" ?\e,C&\e(B) | |
627 | ("^I" ?\e,CN\e(B) | |
628 | ("^J" ?\e,C,\e(B) | |
629 | ("^O" ?\e,CT\e(B) | |
630 | ("^S" ?\e,C^\e(B) | |
631 | ("^U" ?\e,C[\e(B) | |
632 | ("^a" ?\e,Cb\e(B) | |
633 | ("^c" ?\e,Cf\e(B) | |
634 | ("^e" ?\e,Cj\e(B) | |
635 | ("^g" ?\e,Cx\e(B) | |
636 | ("^h" ?\e,C6\e(B) | |
637 | ("^i" ?\e,Cn\e(B) | |
638 | ("^j" ?\e,C<\e(B) | |
639 | ("^o" ?\e,Ct\e(B) | |
640 | ("^s" ?\e,C~\e(B) | |
641 | ("^u" ?\e,C{\e(B) | |
642 | ("^^" ?^) | |
643 | ("^ " ?^) | |
644 | ("\"A" ?\e,CD\e(B) | |
645 | ("\"E" ?\e,CK\e(B) | |
646 | ("\"I" ?\e,CO\e(B) | |
647 | ("\"O" ?\e,CV\e(B) | |
648 | ("\"U" ?\e,C\\e(B) | |
649 | ("\"a" ?\e,Cd\e(B) | |
650 | ("\"e" ?\e,Ck\e(B) | |
651 | ("\"i" ?\e,Co\e(B) | |
652 | ("\"o" ?\e,Cv\e(B) | |
653 | ("\"u" ?\e,C|\e(B) | |
654 | ("\"s" ?\e,C_\e(B) | |
655 | ("\"\"" ?\e,C(\e(B) | |
656 | ("\" " ?\") | |
657 | ("~A" ?\e,CC\e(B) | |
658 | ("~C" ?\e,CG\e(B) | |
659 | ("~D" ?\e,CP\e(B) | |
660 | ("~N" ?\e,CQ\e(B) | |
661 | ("~O" ?\e,CU\e(B) | |
662 | ("~a" ?\e,Cc\e(B) | |
663 | ("~c" ?\e,Cg\e(B) | |
664 | ("~d" ?\e,Cp\e(B) | |
665 | ("~n" ?\e,Cq\e(B) | |
666 | ("~o" ?\e,Cu\e(B) | |
667 | ("~$" ?\e,C%\e(B) | |
668 | ("~S" ?\e,C*\e(B) | |
669 | ("~s" ?\e,C:\e(B) | |
670 | ("~G" ?\e,C+\e(B) | |
671 | ("~g" ?\e,C;\e(B) | |
672 | ("~U" ?\e,C]\e(B) | |
673 | ("~u" ?\e,C}\e(B) | |
674 | ("~`" ?\e,C"\e(B) | |
675 | ("~~" ?\e,C8\e(B) | |
676 | ("~ " ?~) | |
677 | ("/C" ?\e,CE\e(B) | |
678 | ("/G" ?\e,CU\e(B) | |
679 | ("/H" ?\e,C!\e(B) | |
680 | ("/I" ?\e,C)\e(B) | |
681 | ("/Z" ?\e,C/\e(B) | |
682 | ("/c" ?\e,Ce\e(B) | |
683 | ("/g" ?\e,Cu\e(B) | |
684 | ("/h" ?\e,C1\e(B) | |
685 | ("/i" ?\e,C9\e(B) | |
686 | ("/z" ?\e,C?\e(B) | |
687 | ("/r" ?\e,C.\e(B) | |
688 | ("/." ?\e,C\7f\e(B) | |
689 | ("/#" ?\e,C#\e(B) | |
690 | ("/$" ?\e,C$\e(B) | |
691 | ("//" ?\e,C0\e(B) | |
692 | ("/ " ?/) | |
693 | (".C" ?\e,CE\e(B) | |
694 | (".G" ?\e,CU\e(B) | |
695 | (".I" ?\e,C)\e(B) | |
696 | (".Z" ?\e,C/\e(B) | |
697 | (".c" ?\e,Ce\e(B) | |
698 | (".g" ?\e,Cu\e(B) | |
699 | (".z" ?\e,C?\e(B) | |
700 | ) | |
9ad8204c KH |
701 | |
702 | ||
703 | (quail-define-package | |
704 | "polish-slash" "Polish" "PL>" nil | |
705 | "Polish diacritics in Latin-2 encoding are input as `/[acelnosxzACELNOSXZ]'. | |
706 | For example, the character named `aogonek' is obtained by `/a'." | |
7998bb4d | 707 | nil t t t nil nil nil nil nil nil t) |
9ad8204c KH |
708 | |
709 | (quail-define-rules | |
710 | ("/a" ?\e,B1\e(B) | |
711 | ("/c" ?\e,Bf\e(B) | |
712 | ("/e" ?\e,Bj\e(B) | |
713 | ("/l" ?\e,B3\e(B) | |
714 | ("/n" ?\e,Bq\e(B) | |
715 | ("/o" ?\e,Bs\e(B) | |
716 | ("/s" ?\e,B6\e(B) | |
717 | ("/x" ?\e,B<\e(B) | |
718 | ("/z" ?\e,B?\e(B) | |
719 | ("/A" ?\e,B!\e(B) | |
720 | ("/C" ?\e,BF\e(B) | |
721 | ("/E" ?\e,BJ\e(B) | |
722 | ("/L" ?\e,B#\e(B) | |
723 | ("/N" ?\e,BQ\e(B) | |
724 | ("/O" ?\e,BS\e(B) | |
725 | ("/S" ?\e,B&\e(B) | |
726 | ("/X" ?\e,B,\e(B) | |
727 | ("/Z" ?\e,B/\e(B)) | |
e34786c9 DL |
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 -> \e,ba\e(B | |
736 | grave | ` | `a -> \e,b`\e(B | |
737 | circumflex | ^ | ^a -> \e,bb\e(B | |
738 | diaeresis | \" | \"a -> \e,bd\e(B, \"Y -> \e,b>\e(B | |
739 | tilde | ~ | ~a -> \e,bc\e(B | |
740 | caron | ~ | ~z -> \e,b8\e(B | |
741 | cedilla | ~ | ~c -> \e,bg\e(B | |
742 | misc | \" ~ / | \"s -> \e,b_\e(B ~d -> \e,bp\e(B ~t -> \e,b~\e(B /a -> \e,be\e(B /e -> \e,bf\e(B /o -> \e,bx\e(B | |
efd4c4fa | 743 | | \" ~ / | /o -> \e,b=\e(B |
e34786c9 DL |
744 | symbol | ~ | ~> -> \e,b;\e(B ~< -> \e,b+\e(B ~! -> \e,b!\e(B ~? -> \e,b?\e(B ~~ -> \e,b8\e(B |
745 | | ~ | ~s -> \e,b'\e(B ~e -> \e,b$\e(B ~. -> \e,b7\e(B ~$ -> \e,b#\e(B ~u -> \e,b5\e(B | |
746 | | ~ | ~- -> \e,b-\e(B ~= -> \e,b/\e(B | |
747 | symbol | _ / | _o -> \e,b:\e(B _a -> \e,b*\e(B // -> \e,b0\e(B /\\ -> \e,bW\e(B _y -> \e,b%\e(B | |
efd4c4fa | 748 | | _ / | _: -> \e,bw\e(B /c -> \e,b"\e(B ~p -> \e,b6\e(B |
e34786c9 | 749 | | _ / | /= -> \e,b,\e(B |
efd4c4fa | 750 | symbol | ^ | ^r -> \e,b.\e(B ^c -> \e,b)\e(B ^1 -> \e,b9\e(B ^2 -> \e,b2\e(B ^3 -> \e,b3\e(B _a -> \e,b*\e(B |
e34786c9 DL |
751 | " nil t nil nil nil nil nil nil nil nil t) |
752 | ||
753 | (quail-define-rules | |
754 | ("'A" ?\e,bA\e(B) | |
755 | ("'E" ?\e,bI\e(B) | |
756 | ("'I" ?\e,bM\e(B) | |
757 | ("'O" ?\e,bS\e(B) | |
758 | ("'U" ?\e,bZ\e(B) | |
759 | ("'Y" ?\e,b]\e(B) | |
760 | ("'a" ?\e,ba\e(B) | |
761 | ("'e" ?\e,bi\e(B) | |
762 | ("'i" ?\e,bm\e(B) | |
763 | ("'o" ?\e,bs\e(B) | |
764 | ("'u" ?\e,bz\e(B) | |
765 | ("'y" ?\e,b}\e(B) | |
766 | ("' " ?') | |
767 | ("`A" ?\e,b@\e(B) | |
768 | ("`E" ?\e,bH\e(B) | |
769 | ("`I" ?\e,bL\e(B) | |
770 | ("`O" ?\e,bR\e(B) | |
771 | ("`U" ?\e,bY\e(B) | |
772 | ("`a" ?\e,b`\e(B) | |
773 | ("`e" ?\e,bh\e(B) | |
774 | ("`i" ?\e,bl\e(B) | |
775 | ("`o" ?\e,br\e(B) | |
776 | ("`u" ?\e,by\e(B) | |
777 | ("``" ?`) | |
778 | ("` " ?`) | |
779 | ("^A" ?\e,bB\e(B) | |
780 | ("^E" ?\e,bJ\e(B) | |
781 | ("^I" ?\e,bN\e(B) | |
782 | ("^O" ?\e,bT\e(B) | |
783 | ("^U" ?\e,b[\e(B) | |
784 | ("^a" ?\e,bb\e(B) | |
785 | ("^e" ?\e,bj\e(B) | |
786 | ("^i" ?\e,bn\e(B) | |
787 | ("^o" ?\e,bt\e(B) | |
788 | ("^u" ?\e,b{\e(B) | |
789 | ("^^" ?^) | |
790 | ("^ " ?^) | |
791 | ("\"A" ?\e,bD\e(B) | |
792 | ("\"E" ?\e,bK\e(B) | |
793 | ("\"I" ?\e,bO\e(B) | |
794 | ("\"O" ?\e,bV\e(B) | |
795 | ("\"U" ?\e,b\\e(B) | |
796 | ("\"a" ?\e,bd\e(B) | |
797 | ("\"e" ?\e,bk\e(B) | |
798 | ("\"i" ?\e,bo\e(B) | |
799 | ("\"o" ?\e,bv\e(B) | |
800 | ("\"s" ?\e,b_\e(B) | |
801 | ("\"u" ?\e,b|\e(B) | |
802 | ("\"y" ?\e,b\7f\e(B) | |
e34786c9 DL |
803 | ("\" " ?\") |
804 | ("~A" ?\e,bC\e(B) | |
805 | ("~C" ?\e,bG\e(B) | |
806 | ("~D" ?\e,bP\e(B) | |
807 | ("~N" ?\e,bQ\e(B) | |
808 | ("~O" ?\e,bU\e(B) | |
809 | ("~S" ?\e,b&\e(B) | |
810 | ("~T" ?\e,b^\e(B) | |
811 | ("~Z" ?\e,b4\e(B) | |
812 | ("~a" ?\e,bc\e(B) | |
813 | ("~c" ?\e,bg\e(B) | |
814 | ("~d" ?\e,bp\e(B) | |
815 | ("~n" ?\e,bq\e(B) | |
816 | ("~o" ?\e,bu\e(B) | |
817 | ("~s" ?\e,b(\e(B) | |
818 | ("~t" ?\e,b~\e(B) | |
819 | ("~z" ?\e,b8\e(B) | |
820 | ("~>" ?\\e,b;\e(B) | |
821 | ("~<" ?\\e,b+\e(B) | |
822 | ("~!" ?\e,b!\e(B) | |
823 | ("~?" ?\e,b?\e(B) | |
824 | ("~ " ?~) | |
825 | ("/A" ?\e,bE\e(B) | |
826 | ("/E" ?\e,bF\e(B) | |
827 | ("/O" ?\e,bX\e(B) | |
828 | ("/a" ?\e,be\e(B) | |
829 | ("/e" ?\e,bf\e(B) | |
830 | ("/o" ?\e,bx\e(B) | |
831 | ("//" ?\e,b0\e(B) | |
832 | ("/ " ?/) | |
833 | ("_o" ?\e,b:\e(B) | |
834 | ("_a" ?\e,b*\e(B) | |
835 | ("_+" ?\e,b1\e(B) | |
836 | ("_y" ?\e,b%\e(B) | |
837 | ("_:" ?\e,bw\e(B) | |
838 | ("/c" ?\e,b"\e(B) | |
839 | ("/\\" ?\e,bW\e(B) | |
efd4c4fa DL |
840 | ("/o" ?\e,b=\e(B) ; clash with \e,bx\e(B, but \e,bf\e(B uses / |
841 | ("/O" ?\e,b<\e(B) | |
e34786c9 DL |
842 | ("\"Y" ?\e,b>\e(B) |
843 | ("~s" ?\e,b'\e(B) | |
efd4c4fa | 844 | ("~p" ?\e,b6\e(B) |
e34786c9 DL |
845 | ;; Is this the best option for Euro entry? |
846 | ("~e" ?\e,b$\e(B) | |
847 | ("~." ?\e,b7\e(B) | |
848 | ("~$" ?\e,b#\e(B) | |
849 | ("~u" ?\e,b5\e(B) | |
850 | ("^r" ?\e,b.\e(B) | |
851 | ("^c" ?\e,b)\e(B) | |
852 | ("^1" ?\e,b9\e(B) | |
853 | ("^2" ?\e,b2\e(B) | |
854 | ("^3" ?\e,b3\e(B) | |
855 | ("~-" ?\e,b-\e(B) | |
856 | ("~=" ?\e,b/\e(B) | |
857 | ("/=" ?\e,b,\e(B)) | |
858 | ||
859 | ;; Latin-8 was done by an Englishman -- Johnny Celt should take a | |
860 | ;; squint at it. | |
861 | ||
862 | (quail-define-package | |
863 | "latin-8-prefix" "Latin-8" "8>" t | |
864 | "Latin-8 characters input method with prefix modifiers | |
865 | ||
866 | effect | prefix | examples | |
867 | ------------+--------+---------- | |
868 | acute | ' | 'a -> \e,_a\e(B | |
869 | grave | ` | `a -> \e,_`\e(B | |
870 | circumflex | ^ | ^w -> \e,_p\e(B | |
871 | diaeresis | \" | \"a -> \e,_d\e(B | |
872 | dot above | . | .b -> \e,_"\e(B | |
873 | tilde | ~ | ~a -> \e,_c\e(B | |
874 | cedilla | ~ | ~c -> \e,_g\e(B | |
875 | misc | \" ~ / | \"s -> \e,__\e(B /a -> \e,_e\e(B /e -> \e,_f\e(B /o -> \e,_x\e(B | |
876 | | ~ | ~s -> \e,_'\e(B ~$ -> \e,_#\e(B ~p -> \e,_6\e(B | |
877 | symbol | ^ | ^r -> \e,_.\e(B ^c -> \e,_)\e(B | |
878 | " nil t nil nil nil nil nil nil nil nil t) | |
879 | ||
880 | ;; Basically following Latin-1 plus dottiness from Latin-3. | |
881 | (quail-define-rules | |
882 | (".B" ?\e,_!\e(B) | |
883 | (".b" ?\e,_"\e(B) | |
884 | (".c" ?\e,_%\e(B) | |
885 | (".C" ?\e,_$\e(B) | |
886 | (".D" ?\e,_&\e(B) | |
887 | (".d" ?\e,_+\e(B) | |
888 | (".f" ?\e,_1\e(B) | |
889 | (".F" ?\e,_0\e(B) | |
890 | (".g" ?\e,_3\e(B) | |
891 | (".G" ?\e,_2\e(B) | |
892 | (".m" ?\e,_5\e(B) | |
893 | (".M" ?\e,_4\e(B) | |
894 | (".p" ?\e,_9\e(B) | |
895 | (".P" ?\e,_7\e(B) | |
896 | (".s" ?\e,_?\e(B) | |
897 | (".S" ?\e,_;\e(B) | |
898 | (".t" ?\e,_w\e(B) | |
899 | (".T" ?\e,_W\e(B) | |
900 | ("'A" ?\e,_A\e(B) | |
901 | ("'E" ?\e,_I\e(B) | |
902 | ("'I" ?\e,_M\e(B) | |
903 | ("'O" ?\e,_S\e(B) | |
904 | ("'U" ?\e,_Z\e(B) | |
905 | ("'Y" ?\e,_]\e(B) | |
906 | ("'W" ?\e,_*\e(B) | |
907 | ("'a" ?\e,_a\e(B) | |
908 | ("'e" ?\e,_i\e(B) | |
909 | ("'i" ?\e,_m\e(B) | |
910 | ("'o" ?\e,_s\e(B) | |
911 | ("'u" ?\e,_z\e(B) | |
912 | ("'w" ?\e,_:\e(B) | |
913 | ("'y" ?\e,_}\e(B) | |
914 | ("' " ?') | |
915 | ("`A" ?\e,_@\e(B) | |
916 | ("`E" ?\e,_H\e(B) | |
917 | ("`I" ?\e,_L\e(B) | |
918 | ("`O" ?\e,_R\e(B) | |
919 | ("`U" ?\e,_Y\e(B) | |
920 | ("`W" ?\e,_(\e(B) | |
921 | ("`Y" ?\e,_,\e(B) | |
922 | ("`a" ?\e,_`\e(B) | |
923 | ("`e" ?\e,_h\e(B) | |
924 | ("`i" ?\e,_l\e(B) | |
925 | ("`o" ?\e,_r\e(B) | |
926 | ("`u" ?\e,_y\e(B) | |
927 | ("`w" ?\e,_8\e(B) | |
928 | ("`y" ?\e,_<\e(B) | |
929 | ("``" ?`) | |
930 | ("` " ?`) | |
931 | ("^A" ?\e,_B\e(B) | |
932 | ("^E" ?\e,_J\e(B) | |
933 | ("^I" ?\e,_N\e(B) | |
934 | ("^O" ?\e,_T\e(B) | |
935 | ("^U" ?\e,_[\e(B) | |
936 | ("^a" ?\e,_b\e(B) | |
937 | ("^e" ?\e,_j\e(B) | |
938 | ("^i" ?\e,_n\e(B) | |
939 | ("^o" ?\e,_t\e(B) | |
940 | ("^u" ?\e,_{\e(B) | |
941 | ("^w" ?\e,_p\e(B) | |
942 | ("^W" ?\e,_P\e(B) | |
943 | ("^y" ?\e,_~\e(B) | |
944 | ("^Y" ?\e,_^\e(B) | |
945 | ("^^" ?^) | |
946 | ("^ " ?^) | |
947 | ("\"A" ?\e,_D\e(B) | |
948 | ("\"E" ?\e,_K\e(B) | |
949 | ("\"I" ?\e,_O\e(B) | |
950 | ("\"O" ?\e,_V\e(B) | |
951 | ("\"U" ?\e,_\\e(B) | |
952 | ("\"a" ?\e,_d\e(B) | |
953 | ("\"e" ?\e,_k\e(B) | |
954 | ("\"i" ?\e,_o\e(B) | |
955 | ("\"o" ?\e,_v\e(B) | |
956 | ("\"s" ?\e,__\e(B) | |
957 | ("\"u" ?\e,_|\e(B) | |
958 | ("\"w" ?\e,_>\e(B) | |
959 | ("\"W" ?\e,_=\e(B) | |
960 | ("\"y" ?\e,_\7f\e(B) | |
961 | ("\"Y" ?\e,_/\e(B) | |
962 | ("\" " ?\") | |
963 | ("~A" ?\e,_C\e(B) | |
964 | ("~C" ?\e,_G\e(B) | |
965 | ("~N" ?\e,_Q\e(B) | |
966 | ("~O" ?\e,_U\e(B) | |
967 | ("~a" ?\e,_c\e(B) | |
968 | ("~c" ?\e,_g\e(B) | |
969 | ("~n" ?\e,_q\e(B) | |
970 | ("~o" ?\e,_u\e(B) | |
971 | ("~ " ?~) | |
972 | ("/A" ?\e,_E\e(B) | |
973 | ("/E" ?\e,_F\e(B) | |
974 | ("/O" ?\e,_X\e(B) | |
975 | ("/a" ?\e,_e\e(B) | |
976 | ("/e" ?\e,_f\e(B) | |
977 | ("/o" ?\e,_x\e(B) | |
978 | ("/ " ?/) | |
979 | ("~p" ?\e,_6\e(B) | |
980 | ("~s" ?\e,_'\e(B) | |
981 | ("~$" ?\e,_#\e(B) | |
982 | ("^r" ?\e,_.\e(B) | |
983 | ("^c" ?\e,_)\e(B)) | |
be567141 PJ |
984 | |
985 | ;;; latin-pre.el ends here |