]> code.delx.au - gnu-emacs/blob - leim/quail/cyrillic.el
b1ee78a393e38608ace297f309d9ba8a8e61be34
[gnu-emacs] / leim / quail / cyrillic.el
1 ;;; cyrillic.el --- Quail package for inputting Cyrillic characters
2
3 ;; Copyright (C) 1997-1998, 2001-2011 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 ;; Author: TAKAHASHI Naoto <ntakahas@m17n.org>
10 ;; Keywords: multilingual, input method, Cyrillic, i18n
11
12 ;; This file is part of GNU Emacs.
13
14 ;; GNU Emacs is free software: you can redistribute it and/or modify
15 ;; it under the terms of the GNU General Public License as published by
16 ;; the Free Software Foundation, either version 3 of the License, or
17 ;; (at your option) any later version.
18
19 ;; GNU Emacs is distributed in the hope that it will be useful,
20 ;; but WITHOUT ANY WARRANTY; without even the implied warranty of
21 ;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
22 ;; GNU General Public License for more details.
23
24 ;; You should have received a copy of the GNU General Public License
25 ;; along with GNU Emacs. If not, see <http://www.gnu.org/licenses/>.
26
27 ;;; Commentary:
28
29 ;; These methods use a mixture of 8859-5 and Unicode. Quail, used
30 ;; with ucs-tables provides support for translating on the fly to
31 ;; what's appropriate for aa buffer's file coding system, so the
32 ;; encoding shouldn't matter too much provided it supports the
33 ;; necessary characters.
34
35 ;;; Code:
36
37 (require 'quail)
38
39 ;; This was `cyrillic-jcuken'. Alexander Mikhailian
40 ;; <mikhailian@altern.org> says: "cyrillic-jcuken" is actually
41 ;; russian. It is ok but a bit outdated. This layout has been used
42 ;; in typewriters for ages but it has been superseded on desktops by
43 ;; a variation of this layout, implemented in M$ Windows software.
44 ;; The Windows layout is greatly preferred because of the comma and
45 ;; period being placed more conveniently and, of course, because of
46 ;; the popularity of Windows software. This layout is a common option
47 ;; in X Windows and console layouts for GNU/Linux. [See
48 ;; `russian-computer' below.]
49 (quail-define-package
50 "russian-typewriter" "Russian" "\e,L69\e(B" nil
51 "\e,L9FC:5=\e(B Russian typewriter layout (ISO 8859-5 encoding)."
52 nil t t t t nil nil nil nil nil t)
53
54 ;; \e,Lp\e(B1 -2 /3 "4 :5 ,6 .7 _8 ?9 %0 != ;\ |+
55 ;; \e,L9\e(B \e,LF\e(B \e,LC\e(B \e,L:\e(B \e,L5\e(B \e,L=\e(B \e,L3\e(B \e,LH\e(B \e,LI\e(B \e,L7\e(B \e,LE\e(B \e,LJ\e(B )(
56 ;; \e,LD\e(B \e,LK\e(B \e,L2\e(B \e,L0\e(B \e,L?\e(B \e,L@\e(B \e,L>\e(B \e,L;\e(B \e,L4\e(B \e,L6\e(B \e,LM\e(B
57 ;; \e,LO\e(B \e,LG\e(B \e,LA\e(B \e,L<\e(B \e,L8\e(B \e,LB\e(B \e,LL\e(B \e,L1\e(B \e,LN\e(B \e,L!\e(B
58
59 (quail-define-rules
60 ("1" ?\e,Lp\e(B)
61 ("2" ?-)
62 ("3" ?/)
63 ("4" ?\")
64 ("5" ?:)
65 ("6" ?,)
66 ("7" ?.)
67 ("8" ?_)
68 ("9" ??)
69 ("0" ?%)
70 ("-" ?!)
71 ("=" ?\;)
72 ("`" ?|)
73 ("q" ?\e,LY\e(B)
74 ("w" ?\e,Lf\e(B)
75 ("e" ?\e,Lc\e(B)
76 ("r" ?\e,LZ\e(B)
77 ("t" ?\e,LU\e(B)
78 ("y" ?\e,L]\e(B)
79 ("u" ?\e,LS\e(B)
80 ("i" ?\e,Lh\e(B)
81 ("o" ?\e,Li\e(B)
82 ("p" ?\e,LW\e(B)
83 ("[" ?\e,Le\e(B)
84 ("]" ?\e,Lj\e(B)
85 ("a" ?\e,Ld\e(B)
86 ("s" ?\e,Lk\e(B)
87 ("d" ?\e,LR\e(B)
88 ("f" ?\e,LP\e(B)
89 ("g" ?\e,L_\e(B)
90 ("h" ?\e,L`\e(B)
91 ("j" ?\e,L^\e(B)
92 ("k" ?\e,L[\e(B)
93 ("l" ?\e,LT\e(B)
94 (";" ?\e,LV\e(B)
95 ("'" ?\e,Lm\e(B)
96 ("\\" ?\))
97 ("z" ?\e,Lo\e(B)
98 ("x" ?\e,Lg\e(B)
99 ("c" ?\e,La\e(B)
100 ("v" ?\e,L\\e(B)
101 ("b" ?\e,LX\e(B)
102 ("n" ?\e,Lb\e(B)
103 ("m" ?\e,Ll\e(B)
104 ("," ?\e,LQ\e(B)
105 ("." ?\e,Ln\e(B)
106 ("/" ?\e,Lq\e(B)
107
108 ("!" ?1)
109 ("@" ?2)
110 ("#" ?3)
111 ("$" ?4)
112 ("%" ?5)
113 ("^" ?6)
114 ("&" ?7)
115 ("*" ?8)
116 ("(" ?9)
117 (")" ?0)
118 ("_" ?=)
119 ("+" ?\\)
120 ("~" ?+)
121 ("Q" ?\e,L9\e(B)
122 ("W" ?\e,LF\e(B)
123 ("E" ?\e,LC\e(B)
124 ("R" ?\e,L:\e(B)
125 ("T" ?\e,L5\e(B)
126 ("Y" ?\e,L=\e(B)
127 ("U" ?\e,L3\e(B)
128 ("I" ?\e,LH\e(B)
129 ("O" ?\e,LI\e(B)
130 ("P" ?\e,L7\e(B)
131 ("{" ?\e,LE\e(B)
132 ("}" ?\e,LJ\e(B)
133 ("A" ?\e,LD\e(B)
134 ("S" ?\e,LK\e(B)
135 ("D" ?\e,L2\e(B)
136 ("F" ?\e,L0\e(B)
137 ("G" ?\e,L?\e(B)
138 ("H" ?\e,L@\e(B)
139 ("J" ?\e,L>\e(B)
140 ("K" ?\e,L;\e(B)
141 ("L" ?\e,L4\e(B)
142 (":" ?\e,L6\e(B)
143 ("\"" ?\e,LM\e(B)
144 ("|" ?\()
145 ("Z" ?\e,LO\e(B)
146 ("X" ?\e,LG\e(B)
147 ("C" ?\e,LA\e(B)
148 ("V" ?\e,L<\e(B)
149 ("B" ?\e,L8\e(B)
150 ("N" ?\e,LB\e(B)
151 ("M" ?\e,LL\e(B)
152 ("<" ?\e,L1\e(B)
153 (">" ?\e,LN\e(B)
154 ("?" ?\e,L!\e(B)
155 )
156
157 ;; Maintain the obsolete name for now.
158 (push (cons "cyrillic-jcuken"
159 (cdr (assoc "russian-typewriter" quail-package-alist)))
160 quail-package-alist)
161
162 ;; This needs to be seen by quail-update-leim-list-file, but cannot be
163 ;; commented out because quail-update-leim-list-file ignores
164 ;; commented-out lines.
165 (if nil
166 (quail-define-package
167 "cyrillic-jcuken" "Russian" "\e,L69\e(B" nil
168 "\e,L9FC:5=\e(B Russian typewriter layout (ISO 8859-5 encoding)."))
169
170 ;; See comment above. This is the variant `winkeys' from `ru' in XKB.
171 (quail-define-package
172 "russian-computer" "Russian" "RU" nil
173 "\e,L9FC:5=\e(B Russian computer layout"
174 nil t t t t nil nil nil nil nil t)
175
176 ;; 1! 2" 3\e,Lp\e(B 4; 5% 6: 7? 8* 9( 0) -_ =+ \/ \e,Lq!\e(B
177 ;; \e,L9\e(B \e,LF\e(B \e,LC\e(B \e,L:\e(B \e,L5\e(B \e,L=\e(B \e,L3\e(B \e,LH\e(B \e,LI\e(B \e,L7\e(B \e,LE\e(B \e,LJ\e(B
178 ;; \e,LD\e(B \e,LK\e(B \e,L2\e(B \e,L0\e(B \e,L?\e(B \e,L@\e(B \e,L>\e(B \e,L;\e(B \e,L4\e(B \e,L6\e(B \e,LM\e(B
179 ;; \e,LO\e(B \e,LG\e(B \e,LA\e(B \e,L<\e(B \e,L8\e(B \e,LB\e(B \e,LL\e(B \e,L1\e(B \e,LN\e(B .,
180
181 (quail-define-rules
182 ("1" ?1)
183 ("2" ?2)
184 ("3" ?3)
185 ("4" ?4)
186 ("5" ?5)
187 ("6" ?6)
188 ("7" ?7)
189 ("8" ?8)
190 ("9" ?9)
191 ("0" ?0)
192 ("-" ?-)
193 ("=" ?=)
194 ("|" ?/)
195 ("`" ?\e,Lq\e(B)
196 ("q" ?\e,LY\e(B)
197 ("w" ?\e,Lf\e(B)
198 ("e" ?\e,Lc\e(B)
199 ("r" ?\e,LZ\e(B)
200 ("t" ?\e,LU\e(B)
201 ("y" ?\e,L]\e(B)
202 ("u" ?\e,LS\e(B)
203 ("i" ?\e,Lh\e(B)
204 ("o" ?\e,Li\e(B)
205 ("p" ?\e,LW\e(B)
206 ("[" ?\e,Le\e(B)
207 ("]" ?\e,Lj\e(B)
208 ("a" ?\e,Ld\e(B)
209 ("s" ?\e,Lk\e(B)
210 ("d" ?\e,LR\e(B)
211 ("f" ?\e,LP\e(B)
212 ("g" ?\e,L_\e(B)
213 ("h" ?\e,L`\e(B)
214 ("j" ?\e,L^\e(B)
215 ("k" ?\e,L[\e(B)
216 ("l" ?\e,LT\e(B)
217 (";" ?\e,LV\e(B)
218 ("'" ?\e,Lm\e(B)
219 ("\\" ?\\)
220 ("z" ?\e,Lo\e(B)
221 ("x" ?\e,Lg\e(B)
222 ("c" ?\e,La\e(B)
223 ("v" ?\e,L\\e(B)
224 ("b" ?\e,LX\e(B)
225 ("n" ?\e,Lb\e(B)
226 ("m" ?\e,Ll\e(B)
227 ("," ?\e,LQ\e(B)
228 ("." ?\e,Ln\e(B)
229 ("/" ?.)
230 ("!" ?!)
231 ("@" ?\")
232 ("#" ?\e,Lp\e(B)
233 ("$" ?\;)
234 ("%" ?%)
235 ("^" ?:)
236 ("&" ??)
237 ("*" ?*)
238 ("(" ?()
239 (")" ?))
240 ("_" ?_)
241 ("+" ?+)
242 ("~" ?\e,L!\e(B)
243 ("Q" ?\e,L9\e(B)
244 ("W" ?\e,LF\e(B)
245 ("E" ?\e,LC\e(B)
246 ("R" ?\e,L:\e(B)
247 ("T" ?\e,L5\e(B)
248 ("Y" ?\e,L=\e(B)
249 ("U" ?\e,L3\e(B)
250 ("I" ?\e,LH\e(B)
251 ("O" ?\e,LI\e(B)
252 ("P" ?\e,L7\e(B)
253 ("{" ?\e,LE\e(B)
254 ("}" ?\e,LJ\e(B)
255 ("A" ?\e,LD\e(B)
256 ("S" ?\e,LK\e(B)
257 ("D" ?\e,L2\e(B)
258 ("F" ?\e,L0\e(B)
259 ("G" ?\e,L?\e(B)
260 ("H" ?\e,L@\e(B)
261 ("J" ?\e,L>\e(B)
262 ("K" ?\e,L;\e(B)
263 ("L" ?\e,L4\e(B)
264 (":" ?\e,L6\e(B)
265 ("\"" ?\e,LM\e(B)
266 ("|" ?|)
267 ("Z" ?\e,LO\e(B)
268 ("X" ?\e,LG\e(B)
269 ("C" ?\e,LA\e(B)
270 ("V" ?\e,L<\e(B)
271 ("B" ?\e,L8\e(B)
272 ("N" ?\e,LB\e(B)
273 ("M" ?\e,LL\e(B)
274 ("<" ?\e,L1\e(B)
275 (">" ?\e,LN\e(B)
276 ("?" ?,))
277
278 ;; Mikhailian couldn't check the next two.
279
280 ;; This seems to have the same layout for letters as mk in XKB, but at
281 ;; least the top row is different.
282 (quail-define-package
283 "cyrillic-macedonian" "Cyrillic" "\e,L6\e(BM" nil
284 "\e,L)*5@B7\e(B-\e,L#,\e(B keyboard layout based on JUS.I.K1.004"
285 nil t t t t nil nil nil nil nil t)
286
287 ;; 1! 2" 3# 4$ 5% 6& 7' 8( 9) 0= /? +* <>
288 ;; \e,L)\e(B \e,L*\e(B \e,L5\e(B \e,L@\e(B \e,LB\e(B \e,L7\e(B \e,LC\e(B \e,L8\e(B \e,L>\e(B \e,L?\e(B \e,LH\e(B \e,L#\e(B
289 ;; \e,L0\e(B \e,LA\e(B \e,L4\e(B \e,LD\e(B \e,L3\e(B \e,LE\e(B \e,L(\e(B \e,L:\e(B \e,L;\e(B \e,LG\e(B \e,L,\e(B \e,L6\e(B
290 ;; \e,L%\e(B \e,L/\e(B \e,LF\e(B \e,L2\e(B \e,L1\e(B \e,L=\e(B \e,L<\e(B ,; .: -_
291
292 (quail-define-rules
293 ("1" ?1)
294 ("2" ?2)
295 ("3" ?3)
296 ("4" ?4)
297 ("5" ?5)
298 ("6" ?6)
299 ("7" ?7)
300 ("8" ?8)
301 ("9" ?9)
302 ("0" ?0)
303 ("-" ?/)
304 ("=" ?+)
305 ("`" ?<)
306 ("q" ?\e,Ly\e(B)
307 ("w" ?\e,Lz\e(B)
308 ("e" ?\e,LU\e(B)
309 ("r" ?\e,L`\e(B)
310 ("t" ?\e,Lb\e(B)
311 ("y" ?\e,LW\e(B)
312 ("u" ?\e,Lc\e(B)
313 ("i" ?\e,LX\e(B)
314 ("o" ?\e,L^\e(B)
315 ("p" ?\e,L_\e(B)
316 ("[" ?\e,Lh\e(B)
317 ("]" ?\e,Ls\e(B)
318 ("a" ?\e,LP\e(B)
319 ("s" ?\e,La\e(B)
320 ("d" ?\e,LT\e(B)
321 ("f" ?\e,Ld\e(B)
322 ("g" ?\e,LS\e(B)
323 ("h" ?\e,Le\e(B)
324 ("j" ?\e,Lx\e(B)
325 ("k" ?\e,LZ\e(B)
326 ("l" ?\e,L[\e(B)
327 (";" ?\e,Lg\e(B)
328 ("'" ?\e,L|\e(B)
329 ("\\" ?\e,LV\e(B)
330 ("z" ?\e,Lu\e(B)
331 ("x" ?\e,L\7f\e(B)
332 ("c" ?\e,Lf\e(B)
333 ("v" ?\e,LR\e(B)
334 ("b" ?\e,LQ\e(B)
335 ("n" ?\e,L]\e(B)
336 ("m" ?\e,L\\e(B)
337 ("," ?,)
338 ("." ?.)
339 ("/" ?-)
340
341 ("!" ?!)
342 ("@" ?\")
343 ("#" ?#)
344 ("$" ?$)
345 ("%" ?%)
346 ("^" ?&)
347 ("&" ?')
348 ("*" ?\()
349 ("(" ?\))
350 (")" ?=)
351 ("_" ??)
352 ("+" ?*)
353 ("~" ?>)
354 ("Q" ?\e,L)\e(B)
355 ("W" ?\e,L*\e(B)
356 ("E" ?\e,L5\e(B)
357 ("R" ?\e,L@\e(B)
358 ("T" ?\e,LB\e(B)
359 ("Y" ?\e,L7\e(B)
360 ("U" ?\e,LC\e(B)
361 ("I" ?\e,L8\e(B)
362 ("O" ?\e,L>\e(B)
363 ("P" ?\e,L?\e(B)
364 ("{" ?\e,LH\e(B)
365 ("}" ?\e,L#\e(B)
366 ("A" ?\e,L0\e(B)
367 ("S" ?\e,LA\e(B)
368 ("D" ?\e,L4\e(B)
369 ("F" ?\e,LD\e(B)
370 ("G" ?\e,L3\e(B)
371 ("H" ?\e,LE\e(B)
372 ("J" ?\e,L(\e(B)
373 ("K" ?\e,L:\e(B)
374 ("L" ?\e,L;\e(B)
375 (":" ?\e,LG\e(B)
376 ("\"" ?\e,L,\e(B)
377 ("|" ?\e,L6\e(B)
378 ("Z" ?\e,L%\e(B)
379 ("X" ?\e,L/\e(B)
380 ("C" ?\e,LF\e(B)
381 ("V" ?\e,L2\e(B)
382 ("B" ?\e,L1\e(B)
383 ("N" ?\e,L=\e(B)
384 ("M" ?\e,L<\e(B)
385 ("<" ?\;)
386 (">" ?:)
387 ("?" ?_))
388
389 ;;
390
391 (quail-define-package
392 "cyrillic-serbian" "Cyrillic" "\e,L6\e(BS" nil
393 "\e,L)*5@B7\e(B-\e,L"+\e(B keyboard layout based on JUS.I.K1.005"
394 nil t t t t nil nil nil nil nil t)
395
396 ;; 1! 2" 3# 4$ 5% 6& 7' 8( 9) 0= /? +* <>
397 ;; \e,L)\e(B \e,L*\e(B \e,L5\e(B \e,L@\e(B \e,LB\e(B \e,L7\e(B \e,LC\e(B \e,L8\e(B \e,L>\e(B \e,L?\e(B \e,LH\e(B \e,L"\e(B
398 ;; \e,L0\e(B \e,LA\e(B \e,L4\e(B \e,LD\e(B \e,L3\e(B \e,LE\e(B \e,L(\e(B \e,L:\e(B \e,L;\e(B \e,LG\e(B \e,L+\e(B \e,L6\e(B
399 ;; \e,L%\e(B \e,L/\e(B \e,LF\e(B \e,L2\e(B \e,L1\e(B \e,L=\e(B \e,L<\e(B ,; .: -_
400
401 (quail-define-rules
402 ("1" ?1)
403 ("2" ?2)
404 ("3" ?3)
405 ("4" ?4)
406 ("5" ?5)
407 ("6" ?6)
408 ("7" ?7)
409 ("8" ?8)
410 ("9" ?9)
411 ("0" ?0)
412 ("-" ?/)
413 ("=" ?+)
414 ("`" ?<)
415 ("q" ?\e,Ly\e(B)
416 ("w" ?\e,Lz\e(B)
417 ("e" ?\e,LU\e(B)
418 ("r" ?\e,L`\e(B)
419 ("t" ?\e,Lb\e(B)
420 ("y" ?\e,LW\e(B)
421 ("u" ?\e,Lc\e(B)
422 ("i" ?\e,LX\e(B)
423 ("o" ?\e,L^\e(B)
424 ("p" ?\e,L_\e(B)
425 ("[" ?\e,Lh\e(B)
426 ("]" ?\e,Lr\e(B)
427 ("a" ?\e,LP\e(B)
428 ("s" ?\e,La\e(B)
429 ("d" ?\e,LT\e(B)
430 ("f" ?\e,Ld\e(B)
431 ("g" ?\e,LS\e(B)
432 ("h" ?\e,Le\e(B)
433 ("j" ?\e,Lx\e(B)
434 ("k" ?\e,LZ\e(B)
435 ("l" ?\e,L[\e(B)
436 (";" ?\e,Lg\e(B)
437 ("'" ?\e,L{\e(B)
438 ("\\" ?\e,LV\e(B)
439 ("z" ?\e,Lu\e(B)
440 ("x" ?\e,L\7f\e(B)
441 ("c" ?\e,Lf\e(B)
442 ("v" ?\e,LR\e(B)
443 ("b" ?\e,LQ\e(B)
444 ("n" ?\e,L]\e(B)
445 ("m" ?\e,L\\e(B)
446 ("," ?,)
447 ("." ?.)
448 ("/" ?-)
449
450 ("!" ?!)
451 ("@" ?\")
452 ("#" ?#)
453 ("$" ?$)
454 ("%" ?%)
455 ("^" ?&)
456 ("&" ?')
457 ("*" ?\()
458 ("(" ?\))
459 (")" ?=)
460 ("_" ??)
461 ("+" ?*)
462 ("~" ?>)
463 ("Q" ?\e,L)\e(B)
464 ("W" ?\e,L*\e(B)
465 ("E" ?\e,L5\e(B)
466 ("R" ?\e,L@\e(B)
467 ("T" ?\e,LB\e(B)
468 ("Y" ?\e,L7\e(B)
469 ("U" ?\e,LC\e(B)
470 ("I" ?\e,L8\e(B)
471 ("O" ?\e,L>\e(B)
472 ("P" ?\e,L?\e(B)
473 ("{" ?\e,LH\e(B)
474 ("}" ?\e,L"\e(B)
475 ("A" ?\e,L0\e(B)
476 ("S" ?\e,LA\e(B)
477 ("D" ?\e,L4\e(B)
478 ("F" ?\e,LD\e(B)
479 ("G" ?\e,L3\e(B)
480 ("H" ?\e,LE\e(B)
481 ("J" ?\e,L(\e(B)
482 ("K" ?\e,L:\e(B)
483 ("L" ?\e,L;\e(B)
484 (":" ?\e,LG\e(B)
485 ("\"" ?\e,L+\e(B)
486 ("|" ?\e,L6\e(B)
487 ("Z" ?\e,L%\e(B)
488 ("X" ?\e,L/\e(B)
489 ("C" ?\e,LF\e(B)
490 ("V" ?\e,L2\e(B)
491 ("B" ?\e,L1\e(B)
492 ("N" ?\e,L=\e(B)
493 ("M" ?\e,L<\e(B)
494 ("<" ?\;)
495 (">" ?:)
496 ("?" ?_))
497
498 ;;
499
500 ;; Alexander Mikhailian comments:
501 ;; Having worked for several years as a Belarusian linguist, I still
502 ;; can not find the origin of this layout which BTW does include
503 ;; several characters that are not present in Belarusian and does not
504 ;; include a few ones that do exist in Belarusian. Besides, the typo
505 ;; in the name of this layout speaks for itself since Belarusian has
506 ;; an outdated version of spelling which is "Byelorussian" and not
507 ;; "beylorussian". I suggest that you just remove this layout.
508
509 ;; [`derived from JUS.I.K1' according to an old Mule note -- fx]
510
511 ;; (quail-define-package
512 ;; "cyrillic-beylorussian" "Belarussian" "\e,L6\e(BB" nil
513 ;; "\e,L)*5@B7\e(B-\e,L&.\e(B BEYLORUSSIAN (ISO 8859-5 encoding)"
514 ;; nil t t t t nil nil nil nil nil t)
515
516 ;; ;; 1! 2" 3# 4$ 5% 6& 7' 8( 9) 0= /? +* <>
517 ;; ;; \e,L)\e(B \e,L*\e(B \e,L5\e(B \e,L@\e(B \e,LB\e(B \e,L7\e(B \e,LC\e(B \e,L8\e(B \e,L>\e(B \e,L?\e(B \e,LH\e(B \e,L&\e(B
518 ;; ;; \e,L0\e(B \e,LA\e(B \e,L4\e(B \e,LD\e(B \e,L3\e(B \e,LE\e(B \e,L(\e(B \e,L:\e(B \e,L;\e(B \e,LG\e(B \e,L.\e(B \e,L6\e(B
519 ;; ;; \e,L%\e(B \e,L/\e(B \e,LF\e(B \e,L2\e(B \e,L1\e(B \e,L=\e(B \e,L<\e(B ,; .: -_
520
521 ;; (quail-define-rules
522 ;; ("-" ?/)
523 ;; ("=" ?+)
524 ;; ("`" ?<)
525 ;; ("q" ?\e,Ly\e(B)
526 ;; ("w" ?\e,Lz\e(B)
527 ;; ("e" ?\e,LU\e(B)
528 ;; ("r" ?\e,L`\e(B)
529 ;; ("t" ?\e,Lb\e(B)
530 ;; ("y" ?\e,LW\e(B)
531 ;; ("u" ?\e,Lc\e(B)
532 ;; ("i" ?\e,LX\e(B)
533 ;; ("o" ?\e,L^\e(B)
534 ;; ("p" ?\e,L_\e(B)
535 ;; ("[" ?\e,Lh\e(B)
536 ;; ("]" ?\e,Lv\e(B)
537 ;; ("a" ?\e,LP\e(B)
538 ;; ("s" ?\e,La\e(B)
539 ;; ("d" ?\e,LT\e(B)
540 ;; ("f" ?\e,Ld\e(B)
541 ;; ("g" ?\e,LS\e(B)
542 ;; ("h" ?\e,Le\e(B)
543 ;; ("j" ?\e,Lx\e(B)
544 ;; ("k" ?\e,LZ\e(B)
545 ;; ("l" ?\e,L[\e(B)
546 ;; (";" ?\e,Lg\e(B)
547 ;; ("'" ?\e,L~\e(B)
548 ;; ("\\" ?\e,LV\e(B)
549 ;; ("z" ?\e,Lu\e(B)
550 ;; ("x" ?\e,L\7f\e(B)
551 ;; ("c" ?\e,Lf\e(B)
552 ;; ("v" ?\e,LR\e(B)
553 ;; ("b" ?\e,LQ\e(B)
554 ;; ("n" ?\e,L]\e(B)
555 ;; ("m" ?\e,L\\e(B)
556 ;; ("/" ?-)
557
558 ;; ("@" ?\")
559 ;; ("^" ?&)
560 ;; ("&" ?')
561 ;; ("*" ?\()
562 ;; ("(" ?\))
563 ;; (")" ?=)
564 ;; ("_" ??)
565 ;; ("+" ?*)
566 ;; ("~" ?>)
567 ;; ("Q" ?\e,L)\e(B)
568 ;; ("W" ?\e,L*\e(B)
569 ;; ("E" ?\e,L5\e(B)
570 ;; ("R" ?\e,L@\e(B)
571 ;; ("T" ?\e,LB\e(B)
572 ;; ("Y" ?\e,L7\e(B)
573 ;; ("U" ?\e,LC\e(B)
574 ;; ("I" ?\e,L8\e(B)
575 ;; ("O" ?\e,L>\e(B)
576 ;; ("P" ?\e,L?\e(B)
577 ;; ("{" ?\e,LH\e(B)
578 ;; ("}" ?\e,L&\e(B)
579 ;; ("A" ?\e,L0\e(B)
580 ;; ("S" ?\e,LA\e(B)
581 ;; ("D" ?\e,L4\e(B)
582 ;; ("F" ?\e,LD\e(B)
583 ;; ("G" ?\e,L3\e(B)
584 ;; ("H" ?\e,LE\e(B)
585 ;; ("J" ?\e,L(\e(B)
586 ;; ("K" ?\e,L:\e(B)
587 ;; ("L" ?\e,L;\e(B)
588 ;; (":" ?\e,LG\e(B)
589 ;; ("\"" ?\e,L.\e(B)
590 ;; ("|" ?\e,L6\e(B)
591 ;; ("Z" ?\e,L%\e(B)
592 ;; ("X" ?\e,L/\e(B)
593 ;; ("C" ?\e,LF\e(B)
594 ;; ("V" ?\e,L2\e(B)
595 ;; ("B" ?\e,L1\e(B)
596 ;; ("N" ?\e,L=\e(B)
597 ;; ("M" ?\e,L<\e(B)
598 ;; ("<" ?\;)
599 ;; (">" ?:)
600 ;; ("?" ?_))
601
602 ;;
603
604 ;; Alexander Mikhailian reports the opinion of fellow Ukrainian
605 ;; linguist Bogdan Babych <babych@altern.org>:
606 ;; He had seen this layout on some oldish systems but that the vast
607 ;; majority of the population uses a modified version of the M$ Windows
608 ;; layout. In fact, Microsoft shipped for a while a layout that was lacking
609 ;; two characters, precisely the "GHE_WITH_UPTURN" and the apostrophe. The
610 ;; latest versions of Windows software do have the "GHE_WITH_UPTURN" in the
611 ;; ukrainian keyboard layout but the apostrophe is still not there, whereas
612 ;; there is one letter, "Cyrillic_YO", not used in ukrainian. Ukrainians
613 ;; normally replace the "Cyrillic_YO" by the apostrophe sign and live
614 ;; happily with this little change. [See "ukrainian-computer" below.]
615
616 ;; Fixme: add GHE_WITH_UPTURN.
617 (quail-define-package
618 "cyrillic-ukrainian" "Ukrainian" "\e,L6\e(BU" nil
619 "\e,L$'5@B7\e(B-\e,L&.\e(B UKRAINIAN
620
621 Sorry, but 'ghe with upturn' is not included in ISO 8859-5."
622 nil t t t t nil nil nil nil nil t)
623
624 ;; 1! 2" 3# 4$ 5% 6& 7' 8( 9) 0= /? +* <>
625 ;; \e,L$\e(B \e,L'\e(B \e,L5\e(B \e,L@\e(B \e,LB\e(B \e,L7\e(B \e,LC\e(B \e,L8\e(B \e,L>\e(B \e,L?\e(B \e,LH\e(B \e,L&\e(B
626 ;; \e,L0\e(B \e,LA\e(B \e,L4\e(B \e,LD\e(B \e,L3\e(B \e,LE\e(B \e,L(\e(B \e,L:\e(B \e,L;\e(B \e,LG\e(B \e,L.\e(B \e,L6\e(B
627 ;; \e,L%\e(B \e,L/\e(B \e,LF\e(B \e,L2\e(B \e,L1\e(B \e,L=\e(B \e,L<\e(B ,; .: -_
628
629 (quail-define-rules
630 ("1" ?1)
631 ("2" ?2)
632 ("3" ?3)
633 ("4" ?4)
634 ("5" ?5)
635 ("6" ?6)
636 ("7" ?7)
637 ("8" ?8)
638 ("9" ?9)
639 ("0" ?0)
640 ("-" ?/)
641 ("=" ?+)
642 ("`" ?<)
643 ("q" ?\e,Lt\e(B)
644 ("w" ?\e,Lw\e(B)
645 ("e" ?\e,LU\e(B)
646 ("r" ?\e,L`\e(B)
647 ("t" ?\e,Lb\e(B)
648 ("y" ?\e,LW\e(B)
649 ("u" ?\e,Lc\e(B)
650 ("i" ?\e,LX\e(B)
651 ("o" ?\e,L^\e(B)
652 ("p" ?\e,L_\e(B)
653 ("[" ?\e,Lh\e(B)
654 ("]" ?\e,Lv\e(B)
655 ("a" ?\e,LP\e(B)
656 ("s" ?\e,La\e(B)
657 ("d" ?\e,LT\e(B)
658 ("f" ?\e,Ld\e(B)
659 ("g" ?\e,LS\e(B)
660 ("h" ?\e,Le\e(B)
661 ("j" ?\e,Lx\e(B)
662 ("k" ?\e,LZ\e(B)
663 ("l" ?\e,L[\e(B)
664 (";" ?\e,Lg\e(B)
665 ("'" ?\e,L~\e(B)
666 ("\\" ?\e,LV\e(B)
667 ("z" ?\e,Lu\e(B)
668 ("x" ?\e,L\7f\e(B)
669 ("c" ?\e,Lf\e(B)
670 ("v" ?\e,LR\e(B)
671 ("b" ?\e,LQ\e(B)
672 ("n" ?\e,L]\e(B)
673 ("m" ?\e,L\\e(B)
674 ("," ?,)
675 ("." ?.)
676 ("/" ?-)
677
678 ("!" ?!)
679 ("@" ?\")
680 ("#" ?#)
681 ("$" ?$)
682 ("%" ?%)
683 ("^" ?&)
684 ("&" ?')
685 ("*" ?\()
686 ("(" ?\))
687 (")" ?=)
688 ("_" ??)
689 ("+" ?*)
690 ("~" ?>)
691 ("Q" ?\e,L$\e(B)
692 ("W" ?\e,L'\e(B)
693 ("E" ?\e,L5\e(B)
694 ("R" ?\e,L@\e(B)
695 ("T" ?\e,LB\e(B)
696 ("Y" ?\e,L7\e(B)
697 ("U" ?\e,LC\e(B)
698 ("I" ?\e,L8\e(B)
699 ("O" ?\e,L>\e(B)
700 ("P" ?\e,L?\e(B)
701 ("{" ?\e,LH\e(B)
702 ("}" ?\e,L&\e(B)
703 ("A" ?\e,L0\e(B)
704 ("S" ?\e,LA\e(B)
705 ("D" ?\e,L4\e(B)
706 ("F" ?\e,LD\e(B)
707 ("G" ?\e,L3\e(B)
708 ("H" ?\e,LE\e(B)
709 ("J" ?\e,L(\e(B)
710 ("K" ?\e,L:\e(B)
711 ("L" ?\e,L;\e(B)
712 (":" ?\e,LG\e(B)
713 ("\"" ?\e,L.\e(B)
714 ("|" ?\e,L6\e(B)
715 ("Z" ?\e,L%\e(B)
716 ("X" ?\e,L/\e(B)
717 ("C" ?\e,LF\e(B)
718 ("V" ?\e,L2\e(B)
719 ("B" ?\e,L1\e(B)
720 ("N" ?\e,L=\e(B)
721 ("M" ?\e,L<\e(B)
722 ("<" ?\;)
723 (">" ?:)
724 ("?" ?_))
725
726
727 (quail-define-package
728 "ukrainian-computer" "Ukrainian" "UK" nil
729 "\e$,1(9(F(C(:(5(=\e(B Ukrainian (Unicode-based for use with KOI8-U encoding)."
730 nil t t t t nil nil nil nil nil t)
731
732 ;; ' 1! 2" 3\e$,1uV\e(B 4; 5% 6: 7? 8* 9( 0) -_ =+
733 ;; \e$,1(9\e(B \e$,1(F\e(B \e$,1(C\e(B \e$,1(:\e(B \e$,1(5\e(B \e$,1(=\e(B \e$,1(3\e(B \e$,1(H\e(B \e$,1(I\e(B \e$,1(7\e(B \e$,1(E\e(B \e$,1('\e(B
734 ;; \e$,1(D\e(B \e$,1(&\e(B \e$,1(2\e(B \e$,1(0\e(B \e$,1(?\e(B \e$,1(@\e(B \e$,1(>\e(B \e$,1(;\e(B \e$,1(4\e(B \e$,1(6\e(B \e$,1($\e(B \e$,1)P\e(B
735 ;; \e$,1(O\e(B \e$,1(G\e(B \e$,1(A\e(B \e$,1(<\e(B \e$,1(8\e(B \e$,1(B\e(B \e$,1(L\e(B \e$,1(1\e(B \e$,1(N\e(B .,
736
737 (quail-define-rules
738 ("1" ?1)
739 ("2" ?2)
740 ("3" ?3)
741 ("4" ?4)
742 ("5" ?5)
743 ("6" ?6)
744 ("7" ?7)
745 ("8" ?8)
746 ("9" ?9)
747 ("0" ?0)
748 ("-" ?-)
749 ("=" ?=)
750 ("`" ?')
751 ("q" ?\e$,1(Y\e(B)
752 ("w" ?\e$,1(f\e(B)
753 ("e" ?\e$,1(c\e(B)
754 ("r" ?\e$,1(Z\e(B)
755 ("t" ?\e$,1(U\e(B)
756 ("y" ?\e$,1(]\e(B)
757 ("u" ?\e$,1(S\e(B)
758 ("i" ?\e$,1(h\e(B)
759 ("o" ?\e$,1(i\e(B)
760 ("p" ?\e$,1(W\e(B)
761 ("[" ?\e$,1(e\e(B)
762 ("]" ?\e$,1(w\e(B)
763 ("a" ?\e$,1(d\e(B)
764 ("s" ?\e$,1(v\e(B)
765 ("d" ?\e$,1(R\e(B)
766 ("f" ?\e$,1(P\e(B)
767 ("g" ?\e$,1(_\e(B)
768 ("h" ?\e$,1(`\e(B)
769 ("j" ?\e$,1(^\e(B)
770 ("k" ?\e$,1([\e(B)
771 ("l" ?\e$,1(T\e(B)
772 (";" ?\e$,1(V\e(B)
773 ("'" ?\e$,1(t\e(B)
774 ("z" ?\e$,1(o\e(B)
775 ("x" ?\e$,1(g\e(B)
776 ("c" ?\e$,1(a\e(B)
777 ("v" ?\e$,1(\\e(B)
778 ("b" ?\e$,1(X\e(B)
779 ("n" ?\e$,1(b\e(B)
780 ("m" ?\e$,1(l\e(B)
781 ("," ?\e$,1(Q\e(B)
782 ("." ?\e$,1(n\e(B)
783 ("/" ?.)
784 ("!" ?!)
785 ("@" ?\")
786 ("#" ?\e$,1uV\e(B)
787 ("$" ?\;)
788 ("%" ?%)
789 ("^" ?:)
790 ("&" ??)
791 ("*" ?*)
792 ("(" ?()
793 (")" ?))
794 ("_" ?_)
795 ("+" ?+)
796 ("~" ?')
797 ("Q" ?\e$,1(9\e(B)
798 ("W" ?\e$,1(F\e(B)
799 ("E" ?\e$,1(C\e(B)
800 ("R" ?\e$,1(:\e(B)
801 ("T" ?\e$,1(5\e(B)
802 ("Y" ?\e$,1(=\e(B)
803 ("U" ?\e$,1(3\e(B)
804 ("I" ?\e$,1(H\e(B)
805 ("O" ?\e$,1(I\e(B)
806 ("P" ?\e$,1(7\e(B)
807 ("{" ?\e$,1(E\e(B)
808 ("}" ?\e$,1('\e(B)
809 ("A" ?\e$,1(D\e(B)
810 ("S" ?\e$,1(&\e(B)
811 ("D" ?\e$,1(2\e(B)
812 ("F" ?\e$,1(0\e(B)
813 ("G" ?\e$,1(?\e(B)
814 ("H" ?\e$,1(@\e(B)
815 ("J" ?\e$,1(>\e(B)
816 ("K" ?\e$,1(;\e(B)
817 ("L" ?\e$,1(4\e(B)
818 (":" ?\e$,1(6\e(B)
819 ("\"" ?\e$,1($\e(B)
820 ("Z" ?\e$,1(O\e(B)
821 ("X" ?\e$,1(G\e(B)
822 ("C" ?\e$,1(A\e(B)
823 ("V" ?\e$,1(<\e(B)
824 ("B" ?\e$,1(8\e(B)
825 ("N" ?\e$,1(B\e(B)
826 ("M" ?\e$,1(L\e(B)
827 ("<" ?\e$,1(1\e(B)
828 (">" ?\e$,1(N\e(B)
829 ("?" ?,)
830 ("\\" ?\e$,1)Q\e(B)
831 ("|" ?\e$,1)P\e(B))
832 ;;
833
834 ;; Alexander Mikhailian says this is of limited use. It has been
835 ;; popular among emigrants or foreigners who have to type in Cyrillic
836 ;; (mostly Russian) from time to time.
837 (quail-define-package
838 "cyrillic-yawerty" "Cyrillic" "\e,L6O\e(B" nil
839 "\e,LO25@BK\e(B Roman transcription
840
841 This layout is based on Roman transcription by phonemic resemblance.
842 When preceded by a '/', the second and the third rows (number key row) change
843 as follows.
844
845 keytop | Q W E R T Y U I O P A S D
846 --------+---------------------------------------
847 input | \e,L"\e(B \e,L#\e(B \e,L$\e(B \e,L%\e(B \e,L&\e(B \e,L'\e(B \e,L(\e(B \e,L)\e(B \e,L*\e(B \e,L+\e(B \e,L,\e(B \e,L.\e(B \e,L/\e(B"
848 nil t t t t nil nil nil nil nil t)
849
850 ;; 1! 2\e,Lq\e(B 3\e,Lj\e(B 4\e,L!\e(B 5% 6^ 7& 8* 9( 0) -_ \e,LG\e(B \e,LN\e(B
851 ;; \e,LO\e(B \e,L2\e(B \e,L5\e(B \e,L@\e(B \e,LB\e(B \e,LK\e(B \e,LC\e(B \e,L8\e(B \e,L>\e(B \e,L?\e(B \e,LH\e(B \e,LI\e(B
852 ;; \e,L0\e(B \e,LA\e(B \e,L4\e(B \e,LD\e(B \e,L3\e(B \e,LE\e(B \e,L9\e(B \e,L:\e(B \e,L;\e(B ;: '" \e,LM\e(B
853 ;; \e,L7\e(B \e,LL\e(B \e,LF\e(B \e,L6\e(B \e,L1\e(B \e,L=\e(B \e,L<\e(B ,< .> /?
854
855 ;; 1! 2\e,Lq\e(B 3\e,Lj\e(B 4\e,L!\e(B 5% 6^ 7& 8* 9( 0) -_ \e,LG\e(B \e,LN\e(B
856 ;; \e,L"\e(B \e,L#\e(B \e,L$\e(B \e,L%\e(B \e,L&\e(B \e,L'\e(B \e,L(\e(B \e,L)\e(B \e,L*\e(B \e,L+\e(B \e,LH\e(B \e,LI\e(B
857 ;; \e,L,\e(B \e,L.\e(B \e,L/\e(B \e,LD\e(B \e,L3\e(B \e,LE\e(B \e,L9\e(B \e,L:\e(B \e,L;\e(B ;: '" \e,LM\e(B
858 ;; \e,L7\e(B \e,LL\e(B \e,LF\e(B \e,L6\e(B \e,L1\e(B \e,L=\e(B \e,L<\e(B ,< .> /?
859
860 (quail-define-rules
861 ("1" ?1)
862 ("2" ?2)
863 ("3" ?3)
864 ("4" ?4)
865 ("5" ?5)
866 ("6" ?6)
867 ("7" ?7)
868 ("8" ?8)
869 ("9" ?9)
870 ("0" ?0)
871 ("-" ?-)
872 ("=" ?\e,Lg\e(B)
873 ("`" ?\e,Ln\e(B)
874 ("q" ?\e,Lo\e(B)
875 ("w" ?\e,LR\e(B)
876 ("e" ?\e,LU\e(B)
877 ("r" ?\e,L`\e(B)
878 ("t" ?\e,Lb\e(B)
879 ("y" ?\e,Lk\e(B)
880 ("u" ?\e,Lc\e(B)
881 ("i" ?\e,LX\e(B)
882 ("o" ?\e,L^\e(B)
883 ("p" ?\e,L_\e(B)
884 ("[" ?\e,Lh\e(B)
885 ("]" ?\e,Li\e(B)
886 ("a" ?\e,LP\e(B)
887 ("s" ?\e,La\e(B)
888 ("d" ?\e,LT\e(B)
889 ("f" ?\e,Ld\e(B)
890 ("g" ?\e,LS\e(B)
891 ("h" ?\e,Le\e(B)
892 ("j" ?\e,LY\e(B)
893 ("k" ?\e,LZ\e(B)
894 ("l" ?\e,L[\e(B)
895 (";" ?\;)
896 ("'" ?')
897 ("\\" ?\e,Lm\e(B)
898 ("z" ?\e,LW\e(B)
899 ("x" ?\e,Ll\e(B)
900 ("c" ?\e,Lf\e(B)
901 ("v" ?\e,LV\e(B)
902 ("b" ?\e,LQ\e(B)
903 ("n" ?\e,L]\e(B)
904 ("m" ?\e,L\\e(B)
905 ("," ?,)
906 ("." ?.)
907 ("/" ?/)
908
909 ("!" ?!)
910 ("@" ?\e,Lq\e(B)
911 ("#" ?\e,Lj\e(B)
912 ("$" ?\e,L!\e(B)
913 ("%" ?%)
914 ("^" ?^)
915 ("&" ?&)
916 ("*" ?*)
917 ("(" ?\()
918 (")" ?\))
919 ("_" ?_)
920 ("+" ?\e,LG\e(B)
921 ("~" ?\e,LN\e(B)
922 ("Q" ?\e,LO\e(B)
923 ("W" ?\e,L2\e(B)
924 ("E" ?\e,L5\e(B)
925 ("R" ?\e,L@\e(B)
926 ("T" ?\e,LB\e(B)
927 ("Y" ?\e,LK\e(B)
928 ("U" ?\e,LC\e(B)
929 ("I" ?\e,L8\e(B)
930 ("O" ?\e,L>\e(B)
931 ("P" ?\e,L?\e(B)
932 ("{" ?\e,LH\e(B)
933 ("}" ?\e,LI\e(B)
934 ("A" ?\e,L0\e(B)
935 ("S" ?\e,LA\e(B)
936 ("D" ?\e,L4\e(B)
937 ("F" ?\e,LD\e(B)
938 ("G" ?\e,L3\e(B)
939 ("H" ?\e,LE\e(B)
940 ("J" ?\e,L9\e(B)
941 ("K" ?\e,L:\e(B)
942 ("L" ?\e,L;\e(B)
943 (":" ?:)
944 ("\"" ?\")
945 ("|" ?\e,LM\e(B)
946 ("Z" ?\e,L7\e(B)
947 ("X" ?\e,LL\e(B)
948 ("C" ?\e,LF\e(B)
949 ("V" ?\e,L6\e(B)
950 ("B" ?\e,L1\e(B)
951 ("N" ?\e,L=\e(B)
952 ("M" ?\e,L<\e(B)
953 ("<" ?<)
954 (">" ?>)
955 ("?" ??)
956
957 ("/q" ?\e,Lr\e(B)
958 ("/w" ?\e,Ls\e(B)
959 ("/e" ?\e,Lt\e(B)
960 ("/r" ?\e,Lu\e(B)
961 ("/t" ?\e,Lv\e(B)
962 ("/y" ?\e,Lw\e(B)
963 ("/u" ?\e,Lx\e(B)
964 ("/i" ?\e,Ly\e(B)
965 ("/o" ?\e,Lz\e(B)
966 ("/p" ?\e,L{\e(B)
967 ("/a" ?\e,L|\e(B)
968 ("/s" ?\e,L~\e(B)
969 ("/d" ?\e,L\7f\e(B)
970
971 ("/Q" ?\e,L"\e(B)
972 ("/W" ?\e,L#\e(B)
973 ("/E" ?\e,L$\e(B)
974 ("/R" ?\e,L%\e(B)
975 ("/T" ?\e,L&\e(B)
976 ("/Y" ?\e,L'\e(B)
977 ("/U" ?\e,L(\e(B)
978 ("/I" ?\e,L)\e(B)
979 ("/O" ?\e,L*\e(B)
980 ("/P" ?\e,L+\e(B)
981 ("/A" ?\e,L,\e(B)
982 ("/S" ?\e,L.\e(B)
983 ("/D" ?\e,L/\e(B))
984
985 ;; This was provided by Valery Alexeev <valery@domovoy.math.uga.edu>.
986
987 ;; Ognyan Kulev <ogi@fmi.uni-sofia.bg> wrote:
988
989 ;; I would suggest future `cyrillic-translit' to be with the
990 ;; modification of `cyrillic-translit-bulgarian' applied and the
991 ;; latter to disappear. It could be used by people who write
992 ;; bulgarian e-mails with latin letters for kick start (phonetic input
993 ;; method is not so obvious as translit input method but each letter
994 ;; is one keypress and a *lot* of people know it).
995
996 ;; Anton Zinoviev <anton@lml.bas.bg> wrote:
997 ;; I would say that the main idea for cyrillic-translit is to be
998 ;; language-independent and universal. It should be able to generate all
999 ;; Cyrillic symbols.
1000 (quail-define-package
1001 "cyrillic-translit" "Cyrillic" "\e,L6\e(Bt" t
1002 "Intuitively transliterated keyboard layout.
1003 Most convenient for entering Russian, but all Cyrillic characters
1004 are included. Should handle most cases. However:
1005 for \e,Lf\e(B (TSE) use \"c\", never \"ts\"
1006 \e,Li\e(B (SHCHA = Bulgarian SHT) = \"shch\", \"sj\", \"/sht\" or \"/t\",
1007 \e,Lm\e(B (REVERSE ROUNDED E) = \"e\\\"
1008 \e,Le\e(B (KHA) when after \e,La\e(B (S) = \"x\" or \"kh\"
1009 \e,Lj\e(B (HARD SIGN) = \"~\", \e,LJ\e(B (CAPITAL HARD SIGN) = \"~~\",
1010 \e,Ll\e(B (SOFT SIGN) = \"'\", \e,LL\e(B (CAPITAL SOFT SIGN) = \"''\",
1011 \e,Lo\e(B (YA) = \"ya\", \"ja\" or \"q\".
1012
1013 Russian alphabet: a b v=w g d e yo=jo zh z i j=j' k l m n o p r s t
1014 u f h=kh=x c ch sh shch=sj=/s=/sht ~ y ' e\\ yu=ju ya=ja=q
1015
1016 Also included are Ukrainian \e,Lt\e(B (YE) = \"/e\", \e,Lw\e(B (YI) = \"yi\",
1017 \e$,1)Q\e(B (GHE WITH UPTURN) = \"g'\",
1018 Belarusian \e,L~\e(B (SHORT U) = \"u~\",
1019 Serbo-Croatian \e,Lr\e(B (DJE) = \"/d\", \e,L{\e(B (CHJE)= \"/ch\",
1020 Macedonian \e,Ls\e(B (GJE) = \"/g\", \e,Lu\e(B (DZE) = \"/s\", \e,L|\e(B (KJE) = \"/k\",
1021 cyrillic \e,Lv\e(B (I DECIMAL) = \"/i\", \e,Lx\e(B (JE) = \"/j\",
1022 \e,Ly\e(B (LJE) = \"/l\", \e,Lz\e(B (NJE) = \"/n\" and \e,L\7f\e(B (DZE) =\"/z\"."
1023 nil t t t t nil nil nil nil nil t)
1024
1025 (quail-define-rules
1026 ("a" ?\e,LP\e(B) ("b" ?\e,LQ\e(B) ("v" ?\e,LR\e(B) ("w" ?\e,LR\e(B) ("g" ?\e,LS\e(B) ("d" ?\e,LT\e(B)
1027 ("e" ?\e,LU\e(B) ("je" ?\e,LU\e(B)
1028 ("yo" ?\e,Lq\e(B) ("jo" ?\e,Lq\e(B)
1029 ("zh" ?\e,LV\e(B) ("z" ?\e,LW\e(B) ("i" ?\e,LX\e(B)
1030 ("j" ?\e,LY\e(B) ("j'" ?\e,LY\e(B) ("j`" ?\e,LY\e(B) ("k" ?\e,LZ\e(B) ("l" ?\e,L[\e(B)
1031 ("m" ?\e,L\\e(B) ("n" ?\e,L]\e(B) ("o" ?\e,L^\e(B) ("p" ?\e,L_\e(B) ("r" ?\e,L`\e(B) ("s" ?\e,La\e(B) ("t" ?\e,Lb\e(B) ("u" ?\e,Lc\e(B)
1032 ("f" ?\e,Ld\e(B) ("x" ?\e,Le\e(B) ("h" ?\e,Le\e(B) ("kh" ?\e,Le\e(B)
1033 ("c" ?\e,Lf\e(B) ("ch" ?\e,Lg\e(B)
1034 ("sh" ?\e,Lh\e(B)
1035 ("shch" ?\e,Li\e(B) ("sj" ?\e,Li\e(B)
1036 ("/sht" ?\e,Li\e(B) ("/t" ?\e,Li\e(B)
1037 ("~" ?\e,Lj\e(B) ("y" ?\e,Lk\e(B) ("'" ?\e,Ll\e(B) ("`" ?\e,Ll\e(B)
1038 ("e\\" ?\e,Lm\e(B) ("e'" ?\e,Lm\e(B) ("e`" ?\e,Lm\e(B) ("@" ?\e,Lm\e(B)
1039 ("yu" ?\e,Ln\e(B) ("ju" ?\e,Ln\e(B)
1040 ("ya" ?\e,Lo\e(B) ("ja" ?\e,Lo\e(B) ("q" ?\e,Lo\e(B)
1041
1042 ("A" ?\e,L0\e(B) ("B" ?\e,L1\e(B) ("V" ?\e,L2\e(B) ("W" ?\e,L2\e(B) ("G" ?\e,L3\e(B) ("D" ?\e,L4\e(B)
1043 ("E" ?\e,L5\e(B) ("Je" ?\e,L5\e(B) ("JE" ?\e,L5\e(B)
1044 ("Yo" ?\e,L!\e(B) ("YO" ?\e,L!\e(B) ("Jo" ?\e,L!\e(B) ("JO" ?\e,L!\e(B)
1045 ("Zh" ?\e,L6\e(B) ("ZH" ?\e,L6\e(B) ("Z" ?\e,L7\e(B) ("I" ?\e,L8\e(B)
1046 ("J" ?\e,L9\e(B) ("J'" ?\e,L9\e(B) ("J`" ?\e,L9\e(B) ("K" ?\e,L:\e(B) ("L" ?\e,L;\e(B)
1047 ("M" ?\e,L<\e(B) ("N" ?\e,L=\e(B) ("O" ?\e,L>\e(B) ("P" ?\e,L?\e(B) ("R" ?\e,L@\e(B) ("S" ?\e,LA\e(B) ("T" ?\e,LB\e(B) ("U" ?\e,LC\e(B)
1048 ("F" ?\e,LD\e(B) ("X" ?\e,LE\e(B) ("H" ?\e,LE\e(B) ("Kh" ?\e,LE\e(B) ("KH" ?\e,LE\e(B)
1049 ("C" ?\e,LF\e(B) ("Ch" ?\e,LG\e(B) ("CH" ?\e,LG\e(B)
1050 ("Sh" ?\e,LH\e(B) ("SH" ?\e,LH\e(B)
1051 ("Shch" ?\e,LI\e(B) ("SHCH" ?\e,LI\e(B) ("Sj" ?\e,LI\e(B) ("SJ" ?\e,LI\e(B)
1052 ("/Sht" ?\e,LI\e(B) ("/SHT" ?\e,LI\e(B) ("/T" ?\e,LI\e(B)
1053 ("~~" ?\e,LJ\e(B) ("Y" ?\e,LK\e(B) ("''" ?\e,LL\e(B)
1054 ("E\\" ?\e,LM\e(B) ("E'" ?\e,LM\e(B) ("E`" ?\e,LM\e(B) ("@@" ?\e,LM\e(B)
1055 ("Yu" ?\e,LN\e(B) ("YU" ?\e,LN\e(B) ("Ju" ?\e,LN\e(B) ("JU" ?\e,LN\e(B)
1056 ("Ya" ?\e,LO\e(B) ("YA" ?\e,LO\e(B) ("Ja" ?\e,LO\e(B) ("JA" ?\e,LO\e(B) ("Q" ?\e,LO\e(B)
1057
1058 ("/e" ?\e,Lt\e(B) ("yi" ?\e,Lw\e(B) ("u'" ?\e,L~\e(B) ("u~" ?\e,L~\e(B)
1059 ("g'" ?\e$,1)Q\e(B)
1060 ("/d" ?\e,Lr\e(B) ("/ch" ?\e,L{\e(B)
1061 ("/g" ?\e,Ls\e(B) ("/s" ?\e,Lu\e(B) ("/k" ?\e,L|\e(B)
1062 ("/i" ?\e,Lv\e(B) ("/j" ?\e,Lx\e(B) ("/l" ?\e,Ly\e(B) ("/n" ?\e,Lz\e(B) ("/z" ?\e,L\7f\e(B)
1063 ("/E" ?\e,L$\e(B) ("YE" ?\e,L$\e(B) ("Yi" ?\e,L'\e(B) ("YI" ?\e,L'\e(B) ("U'" ?\e,L.\e(B) ("U~" ?\e,L.\e(B)
1064 ("G'" ?\e$,1)P\e(B)
1065 ("/D" ?\e,L"\e(B) ("/Ch" ?\e,L+\e(B) ("/CH" ?\e,L+\e(B)
1066 ("/G" ?\e,L#\e(B) ("/S" ?\e,L%\e(B) ("/K" ?\e,L,\e(B)
1067 ("/I" ?\e,L&\e(B) ("/J" ?\e,L(\e(B) ("/L" ?\e,L)\e(B) ("/N" ?\e,L*\e(B) ("/Z" ?\e,L/\e(B)
1068
1069 ;; Combining accents as a separate character
1070 ("//'" ?\e$(O+Z\e(B) ("//`" ?\e$(O+\\e(B)
1071
1072 ;; In the following two rules the accent is not a separate character
1073 ("i`" ?\e$,1(}\e(B) ("I`" ?\e$,1(-\e(B)
1074
1075 ("/-" ?\e$(G!9\e(B) ;; EN DASH
1076 ("/--" ?\e$(G!7\e(B) ;; EM DASH
1077 ("/*" ?\e$(O#@\e(B) ;; BULLET
1078 ("/." ?\e$,1s$\e(B) ;; ONE DOT LEADER
1079 ("/.." ?\e$(G!-\e(B) ;; TWO DOT LEADER
1080 ("/..." ?\e$A!-\e(B) ;; HORIZONTAL ELLIPSIS
1081 ("/,," ?\e,Y%\e(B) ;; DOUBLE LOW-9 QUOTATION MARK
1082 ("/," ?\e$,1rz\e(B) ;; SINGLE LOW-9 QUOTATION MARK
1083 ("/''" ?\e,Y!\e(B) ;; RIGHT DOUBLE QUOTATION MARK
1084 ("/'" ?\e,F"\e(B) ;; RIGHT SINGLE QUOTATION MARK
1085 ("/``" ?\e,Y4\e(B) ;; LEFT DOUBLE QUOTATION MARK
1086 ("/`" ?\e,F!\e(B) ;; LEFT SINGLE QUOTATION MARK
1087 ("/<<" ?\e,A+\e(B) ;; LEFT-POINTING DOUBLE ANGLE QUOTATION MARK
1088 ("/>>" ?\e,A;\e(B) ;; RIGHT-POINTING DOUBLE ANGLE QUOTATION MARK
1089
1090 ("/&" ?\e,A'\e(B)
1091 ("/ab" ?\e,A'\e(B) ; _\e,LPQ\e(B_\e,LWPf\e(B
1092 ("/pa" ?\e,A'\e(B) ; _pa_ragraph
1093 ("/#" ?\e,Lp\e(B)
1094 ("/no" ?\e,Lp\e(B) ; _\e,L]^\e(B_\e,L\U`\e(B
1095
1096 ("/c" ?\e,A)\e(B)
1097 ("/tm" ?\e$(D"o\e(B)
1098 ("/reg" ?\e,A.\e(B)
1099 ("/eu" ?\e,b$\e(B)
1100 ("/ce" ?\e,A"\e(B)
1101
1102 ;; fractions
1103 ("/78" ?\e$(C(~\e(B)
1104 ("/58" ?\e$(C(}\e(B)
1105 ("/38" ?\e$(C(|\e(B)
1106 ("/18" ?\e$(C({\e(B)
1107 ("/56" ?\e$,1v:\e(B)
1108 ("/16" ?\e$,1v9\e(B)
1109 ("/45" ?\e$,1v8\e(B)
1110 ("/35" ?\e$,1v7\e(B)
1111 ("/25" ?\e$,1v6\e(B)
1112 ("/15" ?\e$(O'z\e(B)
1113 ("/23" ?\e$(O'y\e(B)
1114 ("/13" ?\e$(O'x\e(B)
1115 ("/34" ?\e,A>\e(B)
1116 ("/12" ?\e,A=\e(B)
1117 ("/14" ?\e,A<\e(B)
1118
1119 ;; Roman numerals, commonly used for months and section/subsection numbers
1120 ("/RI" ?\e$A"q\e(B)
1121 ("/RII" ?\e$A"r\e(B)
1122 ("/RIII" ?\e$A"s\e(B)
1123 ("/RIV" ?\e$A"t\e(B)
1124 ("/RV" ?\e$A"u\e(B)
1125 ("/RVI" ?\e$A"v\e(B)
1126 ("/RVII" ?\e$A"w\e(B)
1127 ("/RVIII" ?\e$A"x\e(B)
1128 ("/RIX" ?\e$A"y\e(B)
1129 ("/RX" ?\e$A"z\e(B)
1130 ("/RXI" ?\e$A"{\e(B)
1131 ("/RXII" ?\e$A"|\e(B)
1132
1133 ("/ri" ?\e$(G&5\e(B)
1134 ("/rii" ?\e$(G&6\e(B)
1135 ("/riii" ?\e$(G&7\e(B)
1136 ("/riv" ?\e$(G&8\e(B)
1137 ("/rv" ?\e$(G&9\e(B)
1138 ("/rvi" ?\e$(G&:\e(B)
1139 ("/rvii" ?\e$(G&;\e(B)
1140 ("/rviii" ?\e$(G&<\e(B)
1141 ("/rix" ?\e$(G&=\e(B)
1142 ("/rx" ?\e$(G&>\e(B)
1143 ("/rxi" ?\e$(O,?\e(B)
1144 ("/rxii" ?\e$(O,@\e(B)
1145 )
1146
1147 ;; Originally from Yudit's `Belarusian input table according to
1148 ;; STB955-94 belarusian standard' (not all) by Alexander Mikhailian
1149 ;; <mikhailian@altern.org>, subsequently amended by AM.
1150 (quail-define-package
1151 "belarusian" "Belarusian" "BE" nil
1152 "\e$,1(9(F(C(:(5(=\e(B keyboard layout registered as STB955-94 Belarusian standard.
1153 Unicode based."
1154 nil t t t t nil nil nil nil nil t)
1155
1156 ;; \e$,1(q(!\e(B 1! 2" 3N 4; 5% 6: 7? 8* 9( 0) -_ =+
1157 ;; \e$,1(9\e(B \e$,1(F\e(B \e$,1(C\e(B \e$,1(:\e(B \e$,1(5\e(B \e$,1(=\e(B \e$,1(3\e(B \e$,1(H\e(B \e$,1(.\e(B \e$,1(7\e(B \e$,1(E\e(B '
1158 ;; \e$,1(D\e(B \e$,1(K\e(B \e$,1(2\e(B \e$,1(0\e(B \e$,1(?\e(B \e$,1(@\e(B \e$,1(>\e(B \e$,1(;\e(B \e$,1(4\e(B \e$,1(6\e(B \e$,1(M\e(B
1159 ;; \e$,1(O\e(B \e$,1(G\e(B \e$,1(A\e(B \e$,1(<\e(B \e$,1(&\e(B \e$,1(B\e(B \e$,1(L\e(B \e$,1(1\e(B \e$,1(N\e(B .,
1160
1161 (quail-define-rules
1162 ("~" ?\e$,1(!\e(B)
1163 ("@" ?\")
1164 ("#" ?\e$,1uV\e(B)
1165 ("$" ?\;)
1166 ("%" ?%)
1167 ("^" ?:)
1168 ("&" ??)
1169 ("Q" ?\e$,1(9\e(B)
1170 ("W" ?\e$,1(F\e(B)
1171 ("E" ?\e$,1(C\e(B)
1172 ("R" ?\e$,1(:\e(B)
1173 ("T" ?\e$,1(5\e(B)
1174 ("Y" ?\e$,1(=\e(B)
1175 ("U" ?\e$,1(3\e(B)
1176 ("I" ?\e$,1(H\e(B)
1177 ("O" ?\e$,1(.\e(B)
1178 ("P" ?\e$,1(7\e(B)
1179 ("{" ?\e$,1(E\e(B)
1180 ("}" ?')
1181 ("A" ?\e$,1(D\e(B)
1182 ("S" ?\e$,1(K\e(B)
1183 ("D" ?\e$,1(2\e(B)
1184 ("F" ?\e$,1(0\e(B)
1185 ("G" ?\e$,1(?\e(B)
1186 ("H" ?\e$,1(@\e(B)
1187 ("J" ?\e$,1(>\e(B)
1188 ("K" ?\e$,1(;\e(B)
1189 ("L" ?\e$,1(4\e(B)
1190 (":" ?\e$,1(6\e(B)
1191 ("\"" ?\e$,1(M\e(B)
1192 ("|" ?|)
1193 ("Z" ?\e$,1(O\e(B)
1194 ("X" ?\e$,1(G\e(B)
1195 ("C" ?\e$,1(A\e(B)
1196 ("V" ?\e$,1(<\e(B)
1197 ("B" ?\e$,1(&\e(B)
1198 ("N" ?\e$,1(B\e(B)
1199 ("M" ?\e$,1(L\e(B)
1200 ("<" ?\e$,1(1\e(B)
1201 (">" ?\e$,1(N\e(B)
1202 ("?" ?,)
1203
1204 ("`" ?\e$,1(q\e(B)
1205 ("q" ?\e$,1(Y\e(B)
1206 ("w" ?\e$,1(f\e(B)
1207 ("e" ?\e$,1(c\e(B)
1208 ("r" ?\e$,1(Z\e(B)
1209 ("t" ?\e$,1(U\e(B)
1210 ("y" ?\e$,1(]\e(B)
1211 ("u" ?\e$,1(S\e(B)
1212 ("i" ?\e$,1(h\e(B)
1213 ("o" ?\e$,1(~\e(B)
1214 ("p" ?\e$,1(W\e(B)
1215 ("[" ?\e$,1(e\e(B)
1216 ("]" ?')
1217 ("a" ?\e$,1(d\e(B)
1218 ("s" ?\e$,1(k\e(B)
1219 ("d" ?\e$,1(R\e(B)
1220 ("f" ?\e$,1(P\e(B)
1221 ("g" ?\e$,1(_\e(B)
1222 ("h" ?\e$,1(`\e(B)
1223 ("j" ?\e$,1(^\e(B)
1224 ("k" ?\e$,1([\e(B)
1225 ("l" ?\e$,1(T\e(B)
1226 (";" ?\e$,1(V\e(B)
1227 ("'" ?\e$,1(m\e(B)
1228 ("z" ?\e$,1(o\e(B)
1229 ("x" ?\e$,1(g\e(B)
1230 ("c" ?\e$,1(a\e(B)
1231 ("v" ?\e$,1(\\e(B)
1232 ("b" ?\e$,1(v\e(B)
1233 ("n" ?\e$,1(b\e(B)
1234 ("m" ?\e$,1(l\e(B)
1235 ("," ?\e$,1(Q\e(B)
1236 ("." ?\e$,1(n\e(B)
1237 ("/" ?.))
1238
1239 ;; From `Bulgarian-PHO.kmap for Yudit', Alexander Shopov
1240 ;; <al_shopov@web.bg>.
1241
1242 ;; Extra commentary and the indicator from an independent
1243 ;; (cyrillic-iso8859-5) implementation by Ognyan Kulev
1244 ;; <ogi@fmi.uni-sofia.bg> and name changes from Anton Zinoviev
1245 ;; <anton@lml.bas.bg>.
1246 (quail-define-package
1247 "bulgarian-phonetic" "Bulgarian" "\e$,1(6(1(D\e(B"
1248 nil
1249 "Bulgarian Phonetic keyboard layout, producing Unicode.
1250
1251 The layout is similar to `cyrillic-translit', but all Bulgarian
1252 characters are typed with a single key.
1253
1254 Use /& for \e,A'\e(B (Cyrillic paragraph) and /# for \e$,1uV\e(B.
1255
1256 The letters \e$,1(G\e(B, \e$,1(H\e(B, \e$,1(I\e(B and \e$,1(N\e(B are not affected by Caps Lock."
1257 nil t t t t nil nil nil nil nil t)
1258
1259 ;; \e$,1(G\e(B
1260 ;; \e$,1(O\e(B \e$,1(2\e(B \e$,1(5\e(B \e$,1(@\e(B \e$,1(B\e(B \e$,1(J\e(B \e$,1(C\e(B \e$,1(8\e(B \e$,1(>\e(B \e$,1(?\e(B \e$,1(H\e(B \e$,1(I\e(B
1261 ;; \e$,1(0\e(B \e$,1(A\e(B \e$,1(4\e(B \e$,1(D\e(B \e$,1(3\e(B \e$,1(E\e(B \e$,1(9\e(B \e$,1(:\e(B \e$,1(;\e(B \e$,1(N\e(B
1262 ;; \e$,1(7\e(B \e$,1(L\e(B \e$,1(F\e(B \e$,1(6\e(B \e$,1(1\e(B \e$,1(=\e(B \e$,1(<\e(B
1263
1264 (quail-define-rules
1265 ("/&" ?\e,A'\e(B)
1266 ("/#" ?\e$,1uV\e(B)
1267 ("A" ?\e$,1(0\e(B)
1268 ("B" ?\e$,1(1\e(B)
1269 ("W" ?\e$,1(2\e(B)
1270 ("G" ?\e$,1(3\e(B)
1271 ("D" ?\e$,1(4\e(B)
1272 ("E" ?\e$,1(5\e(B)
1273 ("V" ?\e$,1(6\e(B)
1274 ("Z" ?\e$,1(7\e(B)
1275 ("I" ?\e$,1(8\e(B)
1276 ("J" ?\e$,1(9\e(B)
1277 ("K" ?\e$,1(:\e(B)
1278 ("L" ?\e$,1(;\e(B)
1279 ("M" ?\e$,1(<\e(B)
1280 ("N" ?\e$,1(=\e(B)
1281 ("O" ?\e$,1(>\e(B)
1282 ("P" ?\e$,1(?\e(B)
1283 ("R" ?\e$,1(@\e(B)
1284 ("S" ?\e$,1(A\e(B)
1285 ("T" ?\e$,1(B\e(B)
1286 ("U" ?\e$,1(C\e(B)
1287 ("F" ?\e$,1(D\e(B)
1288 ("H" ?\e$,1(E\e(B)
1289 ("C" ?\e$,1(F\e(B)
1290 ("~" ?\e$,1(G\e(B)
1291 ("{" ?\e$,1(H\e(B)
1292 ("}" ?\e$,1(I\e(B)
1293 ("Y" ?\e$,1(J\e(B)
1294 ("X" ?\e$,1(L\e(B)
1295 ("|" ?\e$,1(N\e(B)
1296 ("Q" ?\e$,1(O\e(B)
1297 ("a" ?\e$,1(P\e(B)
1298 ("b" ?\e$,1(Q\e(B)
1299 ("w" ?\e$,1(R\e(B)
1300 ("g" ?\e$,1(S\e(B)
1301 ("d" ?\e$,1(T\e(B)
1302 ("e" ?\e$,1(U\e(B)
1303 ("v" ?\e$,1(V\e(B)
1304 ("z" ?\e$,1(W\e(B)
1305 ("i" ?\e$,1(X\e(B)
1306 ("j" ?\e$,1(Y\e(B)
1307 ("k" ?\e$,1(Z\e(B)
1308 ("l" ?\e$,1([\e(B)
1309 ("m" ?\e$,1(\\e(B)
1310 ("n" ?\e$,1(]\e(B)
1311 ("o" ?\e$,1(^\e(B)
1312 ("p" ?\e$,1(_\e(B)
1313 ("r" ?\e$,1(`\e(B)
1314 ("s" ?\e$,1(a\e(B)
1315 ("t" ?\e$,1(b\e(B)
1316 ("u" ?\e$,1(c\e(B)
1317 ("f" ?\e$,1(d\e(B)
1318 ("h" ?\e$,1(e\e(B)
1319 ("c" ?\e$,1(f\e(B)
1320 ("`" ?\e$,1(g\e(B)
1321 ("[" ?\e$,1(h\e(B)
1322 ("]" ?\e$,1(i\e(B)
1323 ("y" ?\e$,1(j\e(B)
1324 ("x" ?\e$,1(l\e(B)
1325 ("\\" ?\e$,1(n\e(B)
1326 ("q" ?\e$,1(o\e(B))
1327
1328 ;; Based on an implementation by Ognyan Kulev <ogi@fmi.uni-sofia.bg>.
1329 ;; This follows XKB bg.
1330
1331 (quail-define-package
1332 "bulgarian-bds" "Bulgarian" "\e$,1(1(4(A\e(B" nil
1333 "Bulgarian standard keyboard layout (BDS)
1334
1335 This keyboard layout is standard for Bulgarian typewriters.
1336
1337 The letters \e$,1(F\e(B, \e$,1(<\e(B, \e$,1(G\e(B, \e$,1(@\e(B, \e$,1(;\e(B, \e$,1(1\e(B and \e$,1(K\e(B are not affected by Caps Lock.
1338
1339 In addition to original Bulgarian typewriter layout, keys \\ and |
1340 are transformed into ' and \e$,1(K\e(B respectively. Some keyboards mark these
1341 keys as being transformed into ( and ) respectively. For ( and ), use
1342 ` and ~ respectively. This input method follows XKB."
1343 nil t t t t nil nil nil nil nil t)
1344
1345 ;; () 1! 2? 3+ 4" 5% 6= 7: 8/ 9_ 0\e$,1uV\e(B -I .V
1346 ;; ,\e$,1(k\e(B \e$,1(C\e(B \e$,1(5\e(B \e$,1(8\e(B \e$,1(H\e(B \e$,1(I\e(B \e$,1(:\e(B \e$,1(A\e(B \e$,1(4\e(B \e$,1(7\e(B \e$,1(F\e(B ;\e,A'\e(B
1347 ;; \e$,1(L\e(B \e$,1(O\e(B \e$,1(0\e(B \e$,1(>\e(B \e$,1(6\e(B \e$,1(3\e(B \e$,1(B\e(B \e$,1(=\e(B \e$,1(2\e(B \e$,1(<\e(B \e$,1(G\e(B '\e$,1(K\e(B
1348 ;; \e$,1(N\e(B \e$,1(9\e(B \e$,1(J\e(B \e$,1(M\e(B \e$,1(D\e(B \e$,1(E\e(B \e$,1(?\e(B \e$,1(@\e(B \e$,1(;\e(B \e$,1(1\e(B
1349
1350 (quail-define-rules
1351
1352 ("1" ?1) ("!" ?!)
1353 ("2" ?2) ("@" ??)
1354 ("3" ?3) ("#" ?+)
1355 ("4" ?4) ("$" ?\")
1356 ("5" ?5) ("%" ?%)
1357 ("6" ?6) ("^" ?=)
1358 ("7" ?7) ("&" ?:)
1359 ("8" ?8) ("*" ?/)
1360 ("9" ?9) ("(" ?_)
1361 ("0" ?0) (")" ?\e$,1uV\e(B)
1362 ("-" ?-) ("_" ?I)
1363 ("=" ?.) ("+" ?V)
1364
1365 ("q" ?,) ("Q" ?\e$,1(k\e(B)
1366 ("w" ?\e$,1(c\e(B) ("W" ?\e$,1(C\e(B)
1367 ("e" ?\e$,1(U\e(B) ("E" ?\e$,1(5\e(B)
1368 ("r" ?\e$,1(X\e(B) ("R" ?\e$,1(8\e(B)
1369 ("t" ?\e$,1(h\e(B) ("T" ?\e$,1(H\e(B)
1370 ("y" ?\e$,1(i\e(B) ("Y" ?\e$,1(I\e(B)
1371 ("u" ?\e$,1(Z\e(B) ("U" ?\e$,1(:\e(B)
1372 ("i" ?\e$,1(a\e(B) ("I" ?\e$,1(A\e(B)
1373 ("o" ?\e$,1(T\e(B) ("O" ?\e$,1(4\e(B)
1374 ("p" ?\e$,1(W\e(B) ("P" ?\e$,1(7\e(B)
1375 ("[" ?\e$,1(f\e(B) ("{" ?\e$,1(F\e(B)
1376 ("]" ?\;) ("}" ?\e,A'\e(B)
1377
1378 ("a" ?\e$,1(l\e(B) ("A" ?\e$,1(L\e(B)
1379 ("s" ?\e$,1(o\e(B) ("S" ?\e$,1(O\e(B)
1380 ("d" ?\e$,1(P\e(B) ("D" ?\e$,1(0\e(B)
1381 ("f" ?\e$,1(^\e(B) ("F" ?\e$,1(>\e(B)
1382 ("g" ?\e$,1(V\e(B) ("G" ?\e$,1(6\e(B)
1383 ("h" ?\e$,1(S\e(B) ("H" ?\e$,1(3\e(B)
1384 ("j" ?\e$,1(b\e(B) ("J" ?\e$,1(B\e(B)
1385 ("k" ?\e$,1(]\e(B) ("K" ?\e$,1(=\e(B)
1386 ("l" ?\e$,1(R\e(B) ("L" ?\e$,1(2\e(B)
1387 (";" ?\e$,1(\\e(B) (":" ?\e$,1(<\e(B)
1388 ("'" ?\e$,1(g\e(B) ("\"" ?\e$,1(G\e(B)
1389 ("`" ?\() ("~" ?\))
1390
1391 ("z" ?\e$,1(n\e(B) ("Z" ?\e$,1(N\e(B)
1392 ("x" ?\e$,1(Y\e(B) ("X" ?\e$,1(9\e(B)
1393 ("c" ?\e$,1(j\e(B) ("C" ?\e$,1(J\e(B)
1394 ("v" ?\e$,1(m\e(B) ("V" ?\e$,1(M\e(B)
1395 ("b" ?\e$,1(d\e(B) ("B" ?\e$,1(D\e(B)
1396 ("n" ?\e$,1(e\e(B) ("N" ?\e$,1(E\e(B)
1397 ("m" ?\e$,1(_\e(B) ("M" ?\e$,1(?\e(B)
1398 ("," ?\e$,1(`\e(B) ("<" ?\e$,1(@\e(B)
1399 ("." ?\e$,1([\e(B) (">" ?\e$,1(;\e(B)
1400 ("/" ?\e$,1(Q\e(B) ("?" ?\e$,1(1\e(B)
1401 ("\\" ?') ("|" ?\e$,1(K\e(B))
1402
1403 ;; Local Variables:
1404 ;; coding: iso-2022-7bit
1405 ;; End:
1406
1407 ;;; cyrillic.el ends here