*** empty log message ***
[emacs.git] / leim / quail / cyrillic.el
blob1cd7f08eaf8732abd2945468323e06171ee42a60
1 ;;; quail/cyrillic.el -- Quail package for inputting Cyrillic characters
3 ;; Copyright (C) 1997 Electrotechnical Laboratory, JAPAN.
4 ;; Licensed to the Free Software Foundation.
6 ;; Keywords: multilingual, input method, Cyrillic
8 ;; This file is part of GNU Emacs.
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.
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.
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.
25 ;;; Code:
27 (require 'quail)
29 (quail-define-package
30 "cyrillic-jcuken" "Cyrillic" "\e,L69\e(B" nil
31 "\e,L9FC:5=\e(B keyboard layout widely used in Russia (ISO 8859-5 encoding)"
32 nil t t t t nil nil nil nil nil t)
34 ;; 1! 2" 3' 4* 5: 6, 7. 8; 9( 0) -_ =+ \e,L!\e(B
35 ;; \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
36 ;; \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
37 ;; \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 /?
39 (quail-define-rules
40 ("1" ?1)
41 ("2" ?2)
42 ("3" ?3)
43 ("4" ?4)
44 ("5" ?5)
45 ("6" ?6)
46 ("7" ?7)
47 ("8" ?8)
48 ("9" ?9)
49 ("0" ?0)
50 ("-" ?-)
51 ("=" ?=)
52 ("`" ?\e,Lq\e(B)
53 ("q" ?\e,LY\e(B)
54 ("w" ?\e,Lf\e(B)
55 ("e" ?\e,Lc\e(B)
56 ("r" ?\e,LZ\e(B)
57 ("t" ?\e,LU\e(B)
58 ("y" ?\e,L]\e(B)
59 ("u" ?\e,LS\e(B)
60 ("i" ?\e,Lh\e(B)
61 ("o" ?\e,Li\e(B)
62 ("p" ?\e,LW\e(B)
63 ("[" ?\e,Le\e(B)
64 ("]" ?\e,Lj\e(B)
65 ("a" ?\e,Ld\e(B)
66 ("s" ?\e,Lk\e(B)
67 ("d" ?\e,LR\e(B)
68 ("f" ?\e,LP\e(B)
69 ("g" ?\e,L_\e(B)
70 ("h" ?\e,L`\e(B)
71 ("j" ?\e,L^\e(B)
72 ("k" ?\e,L[\e(B)
73 ("l" ?\e,LT\e(B)
74 (";" ?\e,LV\e(B)
75 ("'" ?\e,Lm\e(B)
76 ("\\" ?\\)
77 ("z" ?\e,Lo\e(B)
78 ("x" ?\e,Lg\e(B)
79 ("c" ?\e,La\e(B)
80 ("v" ?\e,L\\e(B)
81 ("b" ?\e,LX\e(B)
82 ("n" ?\e,Lb\e(B)
83 ("m" ?\e,Ll\e(B)
84 ("," ?\e,LQ\e(B)
85 ("." ?\e,Ln\e(B)
86 ("/" ?/)
88 ("!" ?!)
89 ("@" ?\")
90 ("#" ?')
91 ("$" ?*)
92 ("%" ?:)
93 ("^" ?,)
94 ("&" ?.)
95 ("*" ?\;)
96 ("(" ?()
97 (")" ?))
98 ("_" ?_)
99 ("+" ?+)
100 ("~" ?\e,L!\e(B)
101 ("Q" ?\e,L9\e(B)
102 ("W" ?\e,LF\e(B)
103 ("E" ?\e,LC\e(B)
104 ("R" ?\e,L:\e(B)
105 ("T" ?\e,L5\e(B)
106 ("Y" ?\e,L=\e(B)
107 ("U" ?\e,L3\e(B)
108 ("I" ?\e,LH\e(B)
109 ("O" ?\e,LI\e(B)
110 ("P" ?\e,L7\e(B)
111 ("{" ?\e,LE\e(B)
112 ("}" ?\e,LJ\e(B)
113 ("A" ?\e,LD\e(B)
114 ("S" ?\e,LK\e(B)
115 ("D" ?\e,L2\e(B)
116 ("F" ?\e,L0\e(B)
117 ("G" ?\e,L?\e(B)
118 ("H" ?\e,L@\e(B)
119 ("J" ?\e,L>\e(B)
120 ("K" ?\e,L;\e(B)
121 ("L" ?\e,L4\e(B)
122 (":" ?\e,L6\e(B)
123 ("\"" ?\e,LM\e(B)
124 ("|" ?|)
125 ("Z" ?\e,LO\e(B)
126 ("X" ?\e,LG\e(B)
127 ("C" ?\e,LA\e(B)
128 ("V" ?\e,L<\e(B)
129 ("B" ?\e,L8\e(B)
130 ("N" ?\e,LB\e(B)
131 ("M" ?\e,LL\e(B)
132 ("<" ?\e,L1\e(B)
133 (">" ?\e,LN\e(B)
134 ("?" ??))
138 (quail-define-package
139 "cyrillic-macedonian" "Cyrillic" "\e,L6\e(BM" nil
140 "\e,L)*5@B7\e(B-\e,L#,\e(B keyboard layout based on JUS.I.K1.004 (ISO 8859-5 encoding)"
141 nil t t t t nil nil nil nil nil t)
143 ;; 1! 2" 3# 4$ 5% 6& 7' 8( 9) 0= /? +* <>
144 ;; \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
145 ;; \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
146 ;; \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 ,; .: -_
148 (quail-define-rules
149 ("1" ?1)
150 ("2" ?2)
151 ("3" ?3)
152 ("4" ?4)
153 ("5" ?5)
154 ("6" ?6)
155 ("7" ?7)
156 ("8" ?8)
157 ("9" ?9)
158 ("0" ?0)
159 ("-" ?/)
160 ("=" ?+)
161 ("`" ?<)
162 ("q" ?\e,Ly\e(B)
163 ("w" ?\e,Lz\e(B)
164 ("e" ?\e,LU\e(B)
165 ("r" ?\e,L`\e(B)
166 ("t" ?\e,Lb\e(B)
167 ("y" ?\e,LW\e(B)
168 ("u" ?\e,Lc\e(B)
169 ("i" ?\e,LX\e(B)
170 ("o" ?\e,L^\e(B)
171 ("p" ?\e,L_\e(B)
172 ("[" ?\e,Lh\e(B)
173 ("]" ?\e,Ls\e(B)
174 ("a" ?\e,LP\e(B)
175 ("s" ?\e,La\e(B)
176 ("d" ?\e,LT\e(B)
177 ("f" ?\e,Ld\e(B)
178 ("g" ?\e,LS\e(B)
179 ("h" ?\e,Le\e(B)
180 ("j" ?\e,Lx\e(B)
181 ("k" ?\e,LZ\e(B)
182 ("l" ?\e,L[\e(B)
183 (";" ?\e,Lg\e(B)
184 ("'" ?\e,L|\e(B)
185 ("\\" ?\e,LV\e(B)
186 ("z" ?\e,Lu\e(B)
187 ("x" ?\e,L\x7f\e(B)
188 ("c" ?\e,Lf\e(B)
189 ("v" ?\e,LR\e(B)
190 ("b" ?\e,LQ\e(B)
191 ("n" ?\e,L]\e(B)
192 ("m" ?\e,L\\e(B)
193 ("," ?,)
194 ("." ?.)
195 ("/" ?-)
197 ("!" ?!)
198 ("@" ?\")
199 ("#" ?#)
200 ("$" ?$)
201 ("%" ?%)
202 ("^" ?&)
203 ("&" ?')
204 ("*" ?\()
205 ("(" ?\))
206 (")" ?=)
207 ("_" ??)
208 ("+" ?*)
209 ("~" ?>)
210 ("Q" ?\e,L)\e(B)
211 ("W" ?\e,L*\e(B)
212 ("E" ?\e,L5\e(B)
213 ("R" ?\e,L@\e(B)
214 ("T" ?\e,LB\e(B)
215 ("Y" ?\e,L7\e(B)
216 ("U" ?\e,LC\e(B)
217 ("I" ?\e,L8\e(B)
218 ("O" ?\e,L>\e(B)
219 ("P" ?\e,L?\e(B)
220 ("{" ?\e,LH\e(B)
221 ("}" ?\e,L#\e(B)
222 ("A" ?\e,L0\e(B)
223 ("S" ?\e,LA\e(B)
224 ("D" ?\e,L4\e(B)
225 ("F" ?\e,LD\e(B)
226 ("G" ?\e,L3\e(B)
227 ("H" ?\e,LE\e(B)
228 ("J" ?\e,L(\e(B)
229 ("K" ?\e,L:\e(B)
230 ("L" ?\e,L;\e(B)
231 (":" ?\e,LG\e(B)
232 ("\"" ?\e,L,\e(B)
233 ("|" ?\e,L6\e(B)
234 ("Z" ?\e,L%\e(B)
235 ("X" ?\e,L/\e(B)
236 ("C" ?\e,LF\e(B)
237 ("V" ?\e,L2\e(B)
238 ("B" ?\e,L1\e(B)
239 ("N" ?\e,L=\e(B)
240 ("M" ?\e,L<\e(B)
241 ("<" ?\;)
242 (">" ?:)
243 ("?" ?_))
247 (quail-define-package
248 "cyrillic-serbian" "Cyrillic" "\e,L6\e(BS" nil
249 "\e,L)*5@B7\e(B-\e,L"+\e(B keyboard layout based on JUS.I.K1.005 (ISO 8859-5 encoding)"
250 nil t t t t nil nil nil nil nil t)
252 ;; 1! 2" 3# 4$ 5% 6& 7' 8( 9) 0= /? +* <>
253 ;; \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
254 ;; \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
255 ;; \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 ,; .: -_
257 (quail-define-rules
258 ("1" ?1)
259 ("2" ?2)
260 ("3" ?3)
261 ("4" ?4)
262 ("5" ?5)
263 ("6" ?6)
264 ("7" ?7)
265 ("8" ?8)
266 ("9" ?9)
267 ("0" ?0)
268 ("-" ?/)
269 ("=" ?+)
270 ("`" ?<)
271 ("q" ?\e,Ly\e(B)
272 ("w" ?\e,Lz\e(B)
273 ("e" ?\e,LU\e(B)
274 ("r" ?\e,L`\e(B)
275 ("t" ?\e,Lb\e(B)
276 ("y" ?\e,LW\e(B)
277 ("u" ?\e,Lc\e(B)
278 ("i" ?\e,LX\e(B)
279 ("o" ?\e,L^\e(B)
280 ("p" ?\e,L_\e(B)
281 ("[" ?\e,Lh\e(B)
282 ("]" ?\e,Lr\e(B)
283 ("a" ?\e,LP\e(B)
284 ("s" ?\e,La\e(B)
285 ("d" ?\e,LT\e(B)
286 ("f" ?\e,Ld\e(B)
287 ("g" ?\e,LS\e(B)
288 ("h" ?\e,Le\e(B)
289 ("j" ?\e,Lx\e(B)
290 ("k" ?\e,LZ\e(B)
291 ("l" ?\e,L[\e(B)
292 (";" ?\e,Lg\e(B)
293 ("'" ?\e,L{\e(B)
294 ("\\" ?\e,LV\e(B)
295 ("z" ?\e,Lu\e(B)
296 ("x" ?\e,L\x7f\e(B)
297 ("c" ?\e,Lf\e(B)
298 ("v" ?\e,LR\e(B)
299 ("b" ?\e,LQ\e(B)
300 ("n" ?\e,L]\e(B)
301 ("m" ?\e,L\\e(B)
302 ("," ?,)
303 ("." ?.)
304 ("/" ?-)
306 ("!" ?!)
307 ("@" ?\")
308 ("#" ?#)
309 ("$" ?$)
310 ("%" ?%)
311 ("^" ?&)
312 ("&" ?')
313 ("*" ?\()
314 ("(" ?\))
315 (")" ?=)
316 ("_" ??)
317 ("+" ?*)
318 ("~" ?>)
319 ("Q" ?\e,L)\e(B)
320 ("W" ?\e,L*\e(B)
321 ("E" ?\e,L5\e(B)
322 ("R" ?\e,L@\e(B)
323 ("T" ?\e,LB\e(B)
324 ("Y" ?\e,L7\e(B)
325 ("U" ?\e,LC\e(B)
326 ("I" ?\e,L8\e(B)
327 ("O" ?\e,L>\e(B)
328 ("P" ?\e,L?\e(B)
329 ("{" ?\e,LH\e(B)
330 ("}" ?\e,L"\e(B)
331 ("A" ?\e,L0\e(B)
332 ("S" ?\e,LA\e(B)
333 ("D" ?\e,L4\e(B)
334 ("F" ?\e,LD\e(B)
335 ("G" ?\e,L3\e(B)
336 ("H" ?\e,LE\e(B)
337 ("J" ?\e,L(\e(B)
338 ("K" ?\e,L:\e(B)
339 ("L" ?\e,L;\e(B)
340 (":" ?\e,LG\e(B)
341 ("\"" ?\e,L+\e(B)
342 ("|" ?\e,L6\e(B)
343 ("Z" ?\e,L%\e(B)
344 ("X" ?\e,L/\e(B)
345 ("C" ?\e,LF\e(B)
346 ("V" ?\e,L2\e(B)
347 ("B" ?\e,L1\e(B)
348 ("N" ?\e,L=\e(B)
349 ("M" ?\e,L<\e(B)
350 ("<" ?\;)
351 (">" ?:)
352 ("?" ?_))
356 (quail-define-package
357 "cyrillic-beylorussian" "Cyrillic" "\e,L6\e(BB" nil
358 "\e,L)*5@B7\e(B-\e,L&.\e(B BEYLORUSSIAN (ISO 8859-5 encoding)"
359 nil t t t t nil nil nil nil nil t)
361 ;; 1! 2" 3# 4$ 5% 6& 7' 8( 9) 0= /? +* <>
362 ;; \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
363 ;; \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
364 ;; \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 ,; .: -_
366 (quail-define-rules
367 ("1" ?1)
368 ("2" ?2)
369 ("3" ?3)
370 ("4" ?4)
371 ("5" ?5)
372 ("6" ?6)
373 ("7" ?7)
374 ("8" ?8)
375 ("9" ?9)
376 ("0" ?0)
377 ("-" ?/)
378 ("=" ?+)
379 ("`" ?<)
380 ("q" ?\e,Ly\e(B)
381 ("w" ?\e,Lz\e(B)
382 ("e" ?\e,LU\e(B)
383 ("r" ?\e,L`\e(B)
384 ("t" ?\e,Lb\e(B)
385 ("y" ?\e,LW\e(B)
386 ("u" ?\e,Lc\e(B)
387 ("i" ?\e,LX\e(B)
388 ("o" ?\e,L^\e(B)
389 ("p" ?\e,L_\e(B)
390 ("[" ?\e,Lh\e(B)
391 ("]" ?\e,Lv\e(B)
392 ("a" ?\e,LP\e(B)
393 ("s" ?\e,La\e(B)
394 ("d" ?\e,LT\e(B)
395 ("f" ?\e,Ld\e(B)
396 ("g" ?\e,LS\e(B)
397 ("h" ?\e,Le\e(B)
398 ("j" ?\e,Lx\e(B)
399 ("k" ?\e,LZ\e(B)
400 ("l" ?\e,L[\e(B)
401 (";" ?\e,Lg\e(B)
402 ("'" ?\e,L~\e(B)
403 ("\\" ?\e,LV\e(B)
404 ("z" ?\e,Lu\e(B)
405 ("x" ?\e,L\x7f\e(B)
406 ("c" ?\e,Lf\e(B)
407 ("v" ?\e,LR\e(B)
408 ("b" ?\e,LQ\e(B)
409 ("n" ?\e,L]\e(B)
410 ("m" ?\e,L\\e(B)
411 ("," ?,)
412 ("." ?.)
413 ("/" ?-)
415 ("!" ?!)
416 ("@" ?\")
417 ("#" ?#)
418 ("$" ?$)
419 ("%" ?%)
420 ("^" ?&)
421 ("&" ?')
422 ("*" ?\()
423 ("(" ?\))
424 (")" ?=)
425 ("_" ??)
426 ("+" ?*)
427 ("~" ?>)
428 ("Q" ?\e,L)\e(B)
429 ("W" ?\e,L*\e(B)
430 ("E" ?\e,L5\e(B)
431 ("R" ?\e,L@\e(B)
432 ("T" ?\e,LB\e(B)
433 ("Y" ?\e,L7\e(B)
434 ("U" ?\e,LC\e(B)
435 ("I" ?\e,L8\e(B)
436 ("O" ?\e,L>\e(B)
437 ("P" ?\e,L?\e(B)
438 ("{" ?\e,LH\e(B)
439 ("}" ?\e,L&\e(B)
440 ("A" ?\e,L0\e(B)
441 ("S" ?\e,LA\e(B)
442 ("D" ?\e,L4\e(B)
443 ("F" ?\e,LD\e(B)
444 ("G" ?\e,L3\e(B)
445 ("H" ?\e,LE\e(B)
446 ("J" ?\e,L(\e(B)
447 ("K" ?\e,L:\e(B)
448 ("L" ?\e,L;\e(B)
449 (":" ?\e,LG\e(B)
450 ("\"" ?\e,L.\e(B)
451 ("|" ?\e,L6\e(B)
452 ("Z" ?\e,L%\e(B)
453 ("X" ?\e,L/\e(B)
454 ("C" ?\e,LF\e(B)
455 ("V" ?\e,L2\e(B)
456 ("B" ?\e,L1\e(B)
457 ("N" ?\e,L=\e(B)
458 ("M" ?\e,L<\e(B)
459 ("<" ?\;)
460 (">" ?:)
461 ("?" ?_))
465 (quail-define-package
466 "cyrillic-ukrainian" "Cyrillic" "\e,L6\e(BU" nil
467 "\e,L$'5@B7\e(B-\e,L&.\e(B UKRAINIAN (ISO 8859-5 encoding)
469 Sorry, but 'ghe with upturn' is not included in ISO 8859-5"
470 nil t t t t nil nil nil nil nil t)
472 ;; 1! 2" 3# 4$ 5% 6& 7' 8( 9) 0= /? +* <>
473 ;; \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
474 ;; \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
475 ;; \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 ,; .: -_
477 (quail-define-rules
478 ("1" ?1)
479 ("2" ?2)
480 ("3" ?3)
481 ("4" ?4)
482 ("5" ?5)
483 ("6" ?6)
484 ("7" ?7)
485 ("8" ?8)
486 ("9" ?9)
487 ("0" ?0)
488 ("-" ?/)
489 ("=" ?+)
490 ("`" ?<)
491 ("q" ?\e,Lt\e(B)
492 ("w" ?\e,Lw\e(B)
493 ("e" ?\e,LU\e(B)
494 ("r" ?\e,L`\e(B)
495 ("t" ?\e,Lb\e(B)
496 ("y" ?\e,LW\e(B)
497 ("u" ?\e,Lc\e(B)
498 ("i" ?\e,LX\e(B)
499 ("o" ?\e,L^\e(B)
500 ("p" ?\e,L_\e(B)
501 ("[" ?\e,Lh\e(B)
502 ("]" ?\e,Lv\e(B)
503 ("a" ?\e,LP\e(B)
504 ("s" ?\e,La\e(B)
505 ("d" ?\e,LT\e(B)
506 ("f" ?\e,Ld\e(B)
507 ("g" ?\e,LS\e(B)
508 ("h" ?\e,Le\e(B)
509 ("j" ?\e,Lx\e(B)
510 ("k" ?\e,LZ\e(B)
511 ("l" ?\e,L[\e(B)
512 (";" ?\e,Lg\e(B)
513 ("'" ?\e,L~\e(B)
514 ("\\" ?\e,LV\e(B)
515 ("z" ?\e,Lu\e(B)
516 ("x" ?\e,L\x7f\e(B)
517 ("c" ?\e,Lf\e(B)
518 ("v" ?\e,LR\e(B)
519 ("b" ?\e,LQ\e(B)
520 ("n" ?\e,L]\e(B)
521 ("m" ?\e,L\\e(B)
522 ("," ?,)
523 ("." ?.)
524 ("/" ?-)
526 ("!" ?!)
527 ("@" ?\")
528 ("#" ?#)
529 ("$" ?$)
530 ("%" ?%)
531 ("^" ?&)
532 ("&" ?')
533 ("*" ?\()
534 ("(" ?\))
535 (")" ?=)
536 ("_" ??)
537 ("+" ?*)
538 ("~" ?>)
539 ("Q" ?\e,L$\e(B)
540 ("W" ?\e,L'\e(B)
541 ("E" ?\e,L5\e(B)
542 ("R" ?\e,L@\e(B)
543 ("T" ?\e,LB\e(B)
544 ("Y" ?\e,L7\e(B)
545 ("U" ?\e,LC\e(B)
546 ("I" ?\e,L8\e(B)
547 ("O" ?\e,L>\e(B)
548 ("P" ?\e,L?\e(B)
549 ("{" ?\e,LH\e(B)
550 ("}" ?\e,L&\e(B)
551 ("A" ?\e,L0\e(B)
552 ("S" ?\e,LA\e(B)
553 ("D" ?\e,L4\e(B)
554 ("F" ?\e,LD\e(B)
555 ("G" ?\e,L3\e(B)
556 ("H" ?\e,LE\e(B)
557 ("J" ?\e,L(\e(B)
558 ("K" ?\e,L:\e(B)
559 ("L" ?\e,L;\e(B)
560 (":" ?\e,LG\e(B)
561 ("\"" ?\e,L.\e(B)
562 ("|" ?\e,L6\e(B)
563 ("Z" ?\e,L%\e(B)
564 ("X" ?\e,L/\e(B)
565 ("C" ?\e,LF\e(B)
566 ("V" ?\e,L2\e(B)
567 ("B" ?\e,L1\e(B)
568 ("N" ?\e,L=\e(B)
569 ("M" ?\e,L<\e(B)
570 ("<" ?\;)
571 (">" ?:)
572 ("?" ?_))
576 (quail-define-package
577 "cyrillic-yawerty" "Cyrillic" "\e,L6O\e(B" nil
578 "\e,LO25@BK\e(B Roman transcription (ISO 8859-5 encoding)
580 This layout is based on Roman transcription.
581 When preceded by a '/', the second and the third rows (number key row) change
582 as follows.
584 keytop | Q W E R T Y U I O P A S D
585 --------+---------------------------------------
586 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"
587 nil t t t t nil nil nil nil nil t)
589 ;; 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
590 ;; \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
591 ;; \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
592 ;; \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 ,< .> /?
594 ;; 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
595 ;; \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
596 ;; \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
597 ;; \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 ,< .> /?
599 (quail-define-rules
600 ("1" ?1)
601 ("2" ?2)
602 ("3" ?3)
603 ("4" ?4)
604 ("5" ?5)
605 ("6" ?6)
606 ("7" ?7)
607 ("8" ?8)
608 ("9" ?9)
609 ("0" ?0)
610 ("-" ?-)
611 ("=" ?\e,Lg\e(B)
612 ("`" ?\e,Ln\e(B)
613 ("q" ?\e,Lo\e(B)
614 ("w" ?\e,LR\e(B)
615 ("e" ?\e,LU\e(B)
616 ("r" ?\e,L`\e(B)
617 ("t" ?\e,Lb\e(B)
618 ("y" ?\e,Lk\e(B)
619 ("u" ?\e,Lc\e(B)
620 ("i" ?\e,LX\e(B)
621 ("o" ?\e,L^\e(B)
622 ("p" ?\e,L_\e(B)
623 ("[" ?\e,Lh\e(B)
624 ("]" ?\e,Li\e(B)
625 ("a" ?\e,LP\e(B)
626 ("s" ?\e,La\e(B)
627 ("d" ?\e,LT\e(B)
628 ("f" ?\e,Ld\e(B)
629 ("g" ?\e,LS\e(B)
630 ("h" ?\e,Le\e(B)
631 ("j" ?\e,LY\e(B)
632 ("k" ?\e,LZ\e(B)
633 ("l" ?\e,L[\e(B)
634 (";" ?\;)
635 ("'" ?')
636 ("\\" ?\e,Lm\e(B)
637 ("z" ?\e,LW\e(B)
638 ("x" ?\e,Ll\e(B)
639 ("c" ?\e,Lf\e(B)
640 ("v" ?\e,LV\e(B)
641 ("b" ?\e,LQ\e(B)
642 ("n" ?\e,L]\e(B)
643 ("m" ?\e,L\\e(B)
644 ("," ?,)
645 ("." ?.)
646 ("/" ?/)
648 ("!" ?!)
649 ("@" ?\e,Lq\e(B)
650 ("#" ?\e,Lj\e(B)
651 ("$" ?\e,L!\e(B)
652 ("%" ?%)
653 ("^" ?^)
654 ("&" ?&)
655 ("*" ?*)
656 ("(" ?\()
657 (")" ?\))
658 ("_" ?_)
659 ("+" ?\e,LG\e(B)
660 ("~" ?\e,LN\e(B)
661 ("Q" ?\e,LO\e(B)
662 ("W" ?\e,L2\e(B)
663 ("E" ?\e,L5\e(B)
664 ("R" ?\e,L@\e(B)
665 ("T" ?\e,LB\e(B)
666 ("Y" ?\e,LK\e(B)
667 ("U" ?\e,LC\e(B)
668 ("I" ?\e,L8\e(B)
669 ("O" ?\e,L>\e(B)
670 ("P" ?\e,L?\e(B)
671 ("{" ?\e,LH\e(B)
672 ("}" ?\e,LI\e(B)
673 ("A" ?\e,L0\e(B)
674 ("S" ?\e,LA\e(B)
675 ("D" ?\e,L4\e(B)
676 ("F" ?\e,LD\e(B)
677 ("G" ?\e,L3\e(B)
678 ("H" ?\e,LE\e(B)
679 ("J" ?\e,L9\e(B)
680 ("K" ?\e,L:\e(B)
681 ("L" ?\e,L;\e(B)
682 (":" ?:)
683 ("\"" ?\")
684 ("|" ?\e,LM\e(B)
685 ("Z" ?\e,L7\e(B)
686 ("X" ?\e,LL\e(B)
687 ("C" ?\e,LF\e(B)
688 ("V" ?\e,L6\e(B)
689 ("B" ?\e,L1\e(B)
690 ("N" ?\e,L=\e(B)
691 ("M" ?\e,L<\e(B)
692 ("<" ?<)
693 (">" ?>)
694 ("?" ??)
696 ("/q" ?\e,Lr\e(B)
697 ("/w" ?\e,Ls\e(B)
698 ("/e" ?\e,Lt\e(B)
699 ("/r" ?\e,Lu\e(B)
700 ("/t" ?\e,Lv\e(B)
701 ("/y" ?\e,Lw\e(B)
702 ("/u" ?\e,Lx\e(B)
703 ("/i" ?\e,Ly\e(B)
704 ("/o" ?\e,Lz\e(B)
705 ("/p" ?\e,L{\e(B)
706 ("/a" ?\e,L|\e(B)
707 ("/s" ?\e,L~\e(B)
708 ("/d" ?\e,L\x7f\e(B)
710 ("/Q" ?\e,L"\e(B)
711 ("/W" ?\e,L#\e(B)
712 ("/E" ?\e,L$\e(B)
713 ("/R" ?\e,L%\e(B)
714 ("/T" ?\e,L&\e(B)
715 ("/Y" ?\e,L'\e(B)
716 ("/U" ?\e,L(\e(B)
717 ("/I" ?\e,L)\e(B)
718 ("/O" ?\e,L*\e(B)
719 ("/P" ?\e,L+\e(B)
720 ("/A" ?\e,L,\e(B)
721 ("/S" ?\e,L.\e(B)
722 ("/D" ?\e,L/\e(B))
724 ;; This was provided by Valery Alexeev <valery@domovoy.math.uga.edu>.
726 (quail-define-package
727 "cyrillic-translit" "Cyrillic" "\e,L6\e(Bt" nil
728 "Intuitively transliterated keyboard layout.
729 Most convenient for entering Russian but all cyrillic characters are included.
730 Should handle most cases. However:
731 for \e,Lf\e(B (TSE) use \"c\", never \"ts\"
732 \e,Li\e(B (SHCHA = Bulgarian SHT) = \"shch\", \"sj\", \"/sht\" or \"/t\",
733 \e,Lm\e(B (REVERSE ROUNDED E) = \"e'\" or \"e`\"
734 \e,Le\e(B (KHA) when after \e,La\e(B (S) = \"x\" or \"kh\"
735 \e,Lj\e(B (HARD SIGN) = \"~\", \e,LJ\e(B (CAPITAL HARD SIGN) = \"~~\",
736 \e,Ll\e(B (SOFT SIGN) = \"'\", \e,LL\e(B (CAPITAL SOFT SIGN) = \"''\",
737 \e,Lo\e(B (YA) = \"ya\", \"ja\" or \"q\".
739 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
740 u f h=kh=x c ch sh shch=sj=/s=/sht ~ y ' e' yu=ju ya=ja=q
742 Also included are Ukrainian \e,Lt\e(B (YE) = \"/e\" and \e,Lw\e(B (YI) = \"yi\",
743 Belorussian \e,L~\e(B (SHORT U) = \"u'\",
744 Serbo-Croatian \e,Lr\e(B (DJE) = \"/d\", \e,L{\e(B (CHJE)= \"/ch\",
745 Macedonian \e,Ls\e(B (GJE) = \"/g\", \e,Lu\e(B (DZE) = \"/s\", \e,L|\e(B (KJE) = \"/k\",
746 cyrillic \e,Lv\e(B (I DECIMAL) = \"/i\", \e,Lx\e(B (JE) = \"/j\",
747 \e,Ly\e(B (LJE) = \"/l\", \e,Lz\e(B (NJE) = \"/n\" and \e,L\x7f\e(B (DZE) =\"/z\"."
748 nil t t t t nil nil nil nil nil t)
750 (quail-define-rules
751 ("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)
752 ("e" ?\e,LU\e(B) ("je" ?\e,LU\e(B)
753 ("yo" ?\e,Lq\e(B) ("jo" ?\e,Lq\e(B)
754 ("zh" ?\e,LV\e(B) ("z" ?\e,LW\e(B) ("i" ?\e,LX\e(B)
755 ("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)
756 ("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)
757 ("f" ?\e,Ld\e(B) ("x" ?\e,Le\e(B) ("h" ?\e,Le\e(B) ("kh" ?\e,Le\e(B)
758 ("c" ?\e,Lf\e(B) ("ch" ?\e,Lg\e(B)
759 ("sh" ?\e,Lh\e(B)
760 ("shch" ?\e,Li\e(B) ("sj" ?\e,Li\e(B)
761 ("/sht" ?\e,Li\e(B) ("/t" ?\e,Li\e(B)
762 ("~" ?\e,Lj\e(B) ("y" ?\e,Lk\e(B) ("'" ?\e,Ll\e(B) ("`" ?\e,Ll\e(B)
763 ("e'" ?\e,Lm\e(B) ("e`" ?\e,Lm\e(B) ("@" ?\e,Lm\e(B)
764 ("yu" ?\e,Ln\e(B) ("ju" ?\e,Ln\e(B)
765 ("ya" ?\e,Lo\e(B) ("ja" ?\e,Lo\e(B) ("q" ?\e,Lo\e(B)
767 ("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)
768 ("E" ?\e,L5\e(B) ("Je" ?\e,L5\e(B) ("JE" ?\e,L5\e(B)
769 ("Yo" ?\e,L!\e(B) ("YO" ?\e,L!\e(B) ("Jo" ?\e,L!\e(B) ("JO" ?\e,L!\e(B)
770 ("Zh" ?\e,L6\e(B) ("ZH" ?\e,L6\e(B) ("Z" ?\e,L7\e(B) ("I" ?\e,L8\e(B)
771 ("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)
772 ("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)
773 ("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)
774 ("C" ?\e,LF\e(B) ("Ch" ?\e,LG\e(B) ("CH" ?\e,LG\e(B)
775 ("Sh" ?\e,LH\e(B) ("SH" ?\e,LH\e(B)
776 ("Shch" ?\e,LI\e(B) ("SHCH" ?\e,LI\e(B) ("Sj" ?\e,LI\e(B) ("SJ" ?\e,LI\e(B)
777 ("/Sht" ?\e,LI\e(B) ("/SHT" ?\e,LI\e(B) ("/T" ?\e,LI\e(B)
778 ("~~" "\e,LJ\e(B") ("Y" ?\e,LK\e(B) ("''" "\e,LL\e(B") ("E'" ?\e,LM\e(B) ("E`" ?\e,LM\e(B)
779 ("Yu" ?\e,LN\e(B) ("YU" ?\e,LN\e(B) ("Ju" ?\e,LN\e(B) ("JU" ?\e,LN\e(B)
780 ("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)
782 ("/e" ?\e,Lt\e(B) ("yi" ?\e,Lw\e(B) ("u'" ?\e,L~\e(B)
783 ("/d" ?\e,Lr\e(B) ("/ch" ?\e,L{\e(B)
784 ("/g" ?\e,Ls\e(B) ("/s" ?\e,Lu\e(B) ("/k" ?\e,L|\e(B)
785 ("/i" ?\e,Lv\e(B) ("/j" ?\e,Lx\e(B) ("/l" ?\e,Ly\e(B) ("/n" ?\e,Lz\e(B) ("/z" ?\e,L\x7f\e(B)
786 ("/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)
787 ("/D" ?\e,L"\e(B) ("/Ch" ?\e,L+\e(B) ("/CH" ?\e,L+\e(B)
788 ("/G" ?\e,L#\e(B) ("/S" ?\e,L%\e(B) ("/K" ?\e,L,\e(B)
789 ("/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)
792 (quail-define-package
793 "cyrillic-translit-bulgarian" "Cyrillic" "\e,L6\e(Btb" nil
794 "Intuitively transliterated keyboard layout optimized for Bulgarian.
795 The only difference with cyrillic-translit is that \"sht\" translates as
796 \e,Li\e(B (SHCHA = Bulgarian SHT) insteat of \e,Lhb\e(B (SH+T)."
797 nil t t t t nil nil nil nil nil t)
799 (quail-define-rules
800 ("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)
801 ("e" ?\e,LU\e(B) ("je" ?\e,LU\e(B)
802 ("yo" ?\e,Lq\e(B) ("jo" ?\e,Lq\e(B)
803 ("zh" ?\e,LV\e(B) ("z" ?\e,LW\e(B) ("i" ?\e,LX\e(B)
804 ("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)
805 ("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)
806 ("f" ?\e,Ld\e(B) ("x" ?\e,Le\e(B) ("h" ?\e,Le\e(B) ("kh" ?\e,Le\e(B)
807 ("c" ?\e,Lf\e(B) ("ch" ?\e,Lg\e(B)
808 ("sh" ?\e,Lh\e(B)
809 ("shch" ?\e,Li\e(B) ("sj" ?\e,Li\e(B)
810 ("/sht" ?\e,Li\e(B) ("/t" ?\e,Li\e(B) ("sht" ?\e,Li\e(B)
811 ("~" ?\e,Lj\e(B) ("y" ?\e,Lk\e(B) ("'" ?\e,Ll\e(B) ("`" ?\e,Ll\e(B)
812 ("e'" ?\e,Lm\e(B) ("e`" ?\e,Lm\e(B) ("@" ?\e,Lm\e(B)
813 ("yu" ?\e,Ln\e(B) ("ju" ?\e,Ln\e(B)
814 ("ya" ?\e,Lo\e(B) ("ja" ?\e,Lo\e(B) ("q" ?\e,Lo\e(B)
816 ("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)
817 ("E" ?\e,L5\e(B) ("Je" ?\e,L5\e(B) ("JE" ?\e,L5\e(B)
818 ("Yo" ?\e,L!\e(B) ("YO" ?\e,L!\e(B) ("Jo" ?\e,L!\e(B) ("JO" ?\e,L!\e(B)
819 ("Zh" ?\e,L6\e(B) ("ZH" ?\e,L6\e(B) ("Z" ?\e,L7\e(B) ("I" ?\e,L8\e(B)
820 ("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)
821 ("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)
822 ("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)
823 ("C" ?\e,LF\e(B) ("Ch" ?\e,LG\e(B) ("CH" ?\e,LG\e(B)
824 ("Sh" ?\e,LH\e(B) ("SH" ?\e,LH\e(B)
825 ("Shch" ?\e,LI\e(B) ("SHCH" ?\e,LI\e(B) ("Sj" ?\e,LI\e(B) ("SJ" ?\e,LI\e(B)
826 ("/Sht" ?\e,LI\e(B) ("/SHT" ?\e,LI\e(B) ("/T" ?\e,LI\e(B) ("Sht" ?\e,LI\e(B) ("SHT" ?\e,LI\e(B)
827 ("~~" "\e,LJ\e(B") ("Y" ?\e,LK\e(B) ("''" "\e,LL\e(B") ("E'" ?\e,LM\e(B) ("E`" ?\e,LM\e(B)
828 ("Yu" ?\e,LN\e(B) ("YU" ?\e,LN\e(B) ("Ju" ?\e,LN\e(B) ("JU" ?\e,LN\e(B)
829 ("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)
831 ("/e" ?\e,Lt\e(B) ("yi" ?\e,Lw\e(B) ("u'" ?\e,L~\e(B)
832 ("/d" ?\e,Lr\e(B) ("/ch" ?\e,L{\e(B)
833 ("/g" ?\e,Ls\e(B) ("/s" ?\e,Lu\e(B) ("/k" ?\e,L|\e(B)
834 ("/i" ?\e,Lv\e(B) ("/j" ?\e,Lx\e(B) ("/l" ?\e,Ly\e(B) ("/n" ?\e,Lz\e(B) ("/z" ?\e,L\x7f\e(B)
835 ("/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)
836 ("/D" ?\e,L"\e(B) ("/Ch" ?\e,L+\e(B) ("/CH" ?\e,L+\e(B)
837 ("/G" ?\e,L#\e(B) ("/S" ?\e,L%\e(B) ("/K" ?\e,L,\e(B)
838 ("/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)
845 ;; Local Variables:
846 ;; buffer-file-coding-system: iso-2022-7bit
847 ;; End: