]> code.delx.au - gnu-emacs/blob - leim/quail/cyrillic.el
delx.au / code / gnu-emacs / blob
summary | shortlog | log | commit | commitdiff | tree
history | raw | HEAD
Doc-string of Quail package japanese modified.
[gnu-emacs] / leim / quail / cyrillic.el
1 ;;; quail/cyrillic.el -- Quail package for inputting Cyrillic characters
2
3 ;; Copyright (C) 1997 Electrotechnical Laboratory, JAPAN.
4 ;; Licensed to the Free Software Foundation.
5
6 ;; Keywords: multilingual, input method, Cyrillic
7
8 ;; This file is part of GNU Emacs.
9
10 ;; GNU Emacs is free software; you can redistribute it and/or modify
11 ;; it under the terms of the GNU General Public License as published by
12 ;; the Free Software Foundation; either version 2, or (at your option)
13 ;; any later version.
14
15 ;; GNU Emacs is distributed in the hope that it will be useful,
16 ;; but WITHOUT ANY WARRANTY; without even the implied warranty of
17 ;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
18 ;; GNU General Public License for more details.
19
20 ;; You should have received a copy of the GNU General Public License
21 ;; along with GNU Emacs; see the file COPYING. If not, write to the
22 ;; Free Software Foundation, Inc., 59 Temple Place - Suite 330,
23 ;; Boston, MA 02111-1307, USA.
24
25 ;;; Code:
26
27 (require 'quail)
28
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)
33
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 /?
38
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 ("/" ?/)
87
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 ("?" ??))
135
136 ;;
137
138 (quail-define-package
139 "cyrillic-jis-russian" "Cyrillic" "\e$B'('+\e(B" nil
140 "\e$B'+'8'5','&'/\e(B keyboard layout same as JCUKEN (JIS X0208.1983 encoding)"
141 nil t t t t)
142
143 ;; 1! 2@ 3# 4" 5: 6, 7. 8* 9( 0) -_ =+ \e,L!\e(B
144 ;; \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
145 ;; \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
146 ;; \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 /?
147
148 (quail-define-rules
149 ("1" ?\e$B#1\e(B)
150 ("2" ?\e$B#2\e(B)
151 ("3" ?\e$B#3\e(B)
152 ("4" ?\e$B#4\e(B)
153 ("5" ?\e$B#5\e(B)
154 ("6" ?\e$B#6\e(B)
155 ("7" ?\e$B#7\e(B)
156 ("8" ?\e$B#8\e(B)
157 ("9" ?\e$B#9\e(B)
158 ("0" ?\e$B#0\e(B)
159 ("-" ?\e$B!]\e(B)
160 ("=" ?\e$B!a\e(B)
161 ("`" ?\e$B'W\e(B)
162 ("q" ?\e$B'[\e(B)
163 ("w" ?\e$B'h\e(B)
164 ("e" ?\e$B'e\e(B)
165 ("r" ?\e$B'\\e(B)
166 ("t" ?\e$B'V\e(B)
167 ("y" ?\e$B'_\e(B)
168 ("u" ?\e$B'T\e(B)
169 ("i" ?\e$B'j\e(B)
170 ("o" ?\e$B'k\e(B)
171 ("p" ?\e$B'Y\e(B)
172 ("[" ?\e$B'g\e(B)
173 ("]" ?\e$B'l\e(B)
174 ("a" ?\e$B'f\e(B)
175 ("s" ?\e$B'm\e(B)
176 ("d" ?\e$B'S\e(B)
177 ("f" ?\e$B'Q\e(B)
178 ("g" ?\e$B'a\e(B)
179 ("h" ?\e$B'b\e(B)
180 ("j" ?\e$B'`\e(B)
181 ("k" ?\e$B']\e(B)
182 ("l" ?\e$B'U\e(B)
183 (";" ?\e$B'X\e(B)
184 ("'" ?\e$B'o\e(B)
185 ("\\" ?\e$B!@\e(B)
186 ("z" ?\e$B'q\e(B)
187 ("x" ?\e$B'i\e(B)
188 ("c" ?\e$B'c\e(B)
189 ("v" ?\e$B'^\e(B)
190 ("b" ?\e$B'Z\e(B)
191 ("n" ?\e$B'd\e(B)
192 ("m" ?\e$B'n\e(B)
193 ("," ?\e$B'R\e(B)
194 ("." ?\e$B'p\e(B)
195 ("/" ?\e$B!?\e(B)
196
197 ("!" ?\e$B!*\e(B)
198 ("@" ?\e$B!w\e(B)
199 ("#" ?\e$B!t\e(B)
200 ("$" ?\e$B!I\e(B)
201 ("%" ?\e$B!'\e(B)
202 ("^" ?\e$B!$\e(B)
203 ("&" ?\e$B!%\e(B)
204 ("*" ?\e$B!v\e(B)
205 ("(" ?\e$B!J\e(B)
206 (")" ?\e$B!K\e(B)
207 ("_" ?\e$B!2\e(B)
208 ("+" ?\e$B!\\e(B)
209 ("~" ?\e$B''\e(B)
210 ("Q" ?\e$B'+\e(B)
211 ("W" ?\e$B'8\e(B)
212 ("E" ?\e$B'5\e(B)
213 ("R" ?\e$B',\e(B)
214 ("T" ?\e$B'&\e(B)
215 ("Y" ?\e$B'/\e(B)
216 ("U" ?\e$B'$\e(B)
217 ("I" ?\e$B':\e(B)
218 ("O" ?\e$B';\e(B)
219 ("P" ?\e$B')\e(B)
220 ("{" ?\e$B'7\e(B)
221 ("}" ?\e$B'<\e(B)
222 ("A" ?\e$B'6\e(B)
223 ("S" ?\e$B'=\e(B)
224 ("D" ?\e$B'#\e(B)
225 ("F" ?\e$B'!\e(B)
226 ("G" ?\e$B'1\e(B)
227 ("H" ?\e$B'2\e(B)
228 ("J" ?\e$B'0\e(B)
229 ("K" ?\e$B'-\e(B)
230 ("L" ?\e$B'%\e(B)
231 (":" ?\e$B'(\e(B)
232 ("\"" ?\e$B'?\e(B)
233 ("|" ?\e$B!C\e(B)
234 ("Z" ?\e$B'A\e(B)
235 ("X" ?\e$B'9\e(B)
236 ("C" ?\e$B'3\e(B)
237 ("V" ?\e$B'.\e(B)
238 ("B" ?\e$B'*\e(B)
239 ("N" ?\e$B'4\e(B)
240 ("M" ?\e$B'>\e(B)
241 ("<" ?\e$B'"\e(B)
242 (">" ?\e$B'@\e(B)
243 ("?" ?\e$B!)\e(B))
244
245 ;;
246
247 (quail-define-package
248 "cyrillic-macedonian" "Cyrillic" "\e,L6\e(BM" nil
249 "\e,L)*5@B7\e(B-\e,L#,\e(B keyboard layout based on JUS.I.K1.004 (ISO 8859-5 encoding)"
250 nil t t t t)
251
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 ,; .: -_
256
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,Ls\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\7f\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 ("/" ?-)
305
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 ("?" ?_))
353
354 ;;
355
356 (quail-define-package
357 "cyrillic-serbian" "Cyrillic" "\e,L6\e(BS" nil
358 "\e,L)*5@B7\e(B-\e,L"+\e(B keyboard layout based on JUS.I.K1.005 (ISO 8859-5 encoding)"
359 nil t t t t)
360
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 ,; .: -_
365
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,Lr\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\7f\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 ("/" ?-)
414
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 ("?" ?_))
462
463 ;;
464
465 (quail-define-package
466 "cyrillic-beylorussian" "Cyrillic" "\e,L6\e(BB" nil
467 "\e,L)*5@B7\e(B-\e,L&.\e(B BEYLORUSSIAN (ISO 8859-5 encoding)"
468 nil t t t t)
469
470 ;; 1! 2" 3# 4$ 5% 6& 7' 8( 9) 0= /? +* <>
471 ;; \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
472 ;; \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
473 ;; \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 ,; .: -_
474
475 (quail-define-rules
476 ("1" ?1)
477 ("2" ?2)
478 ("3" ?3)
479 ("4" ?4)
480 ("5" ?5)
481 ("6" ?6)
482 ("7" ?7)
483 ("8" ?8)
484 ("9" ?9)
485 ("0" ?0)
486 ("-" ?/)
487 ("=" ?+)
488 ("`" ?<)
489 ("q" ?\e,Ly\e(B)
490 ("w" ?\e,Lz\e(B)
491 ("e" ?\e,LU\e(B)
492 ("r" ?\e,L`\e(B)
493 ("t" ?\e,Lb\e(B)
494 ("y" ?\e,LW\e(B)
495 ("u" ?\e,Lc\e(B)
496 ("i" ?\e,LX\e(B)
497 ("o" ?\e,L^\e(B)
498 ("p" ?\e,L_\e(B)
499 ("[" ?\e,Lh\e(B)
500 ("]" ?\e,Lv\e(B)
501 ("a" ?\e,LP\e(B)
502 ("s" ?\e,La\e(B)
503 ("d" ?\e,LT\e(B)
504 ("f" ?\e,Ld\e(B)
505 ("g" ?\e,LS\e(B)
506 ("h" ?\e,Le\e(B)
507 ("j" ?\e,Lx\e(B)
508 ("k" ?\e,LZ\e(B)
509 ("l" ?\e,L[\e(B)
510 (";" ?\e,Lg\e(B)
511 ("'" ?\e,L~\e(B)
512 ("\\" ?\e,LV\e(B)
513 ("z" ?\e,Lu\e(B)
514 ("x" ?\e,L\7f\e(B)
515 ("c" ?\e,Lf\e(B)
516 ("v" ?\e,LR\e(B)
517 ("b" ?\e,LQ\e(B)
518 ("n" ?\e,L]\e(B)
519 ("m" ?\e,L\\e(B)
520 ("," ?,)
521 ("." ?.)
522 ("/" ?-)
523
524 ("!" ?!)
525 ("@" ?\")
526 ("#" ?#)
527 ("$" ?$)
528 ("%" ?%)
529 ("^" ?&)
530 ("&" ?')
531 ("*" ?\()
532 ("(" ?\))
533 (")" ?=)
534 ("_" ??)
535 ("+" ?*)
536 ("~" ?>)
537 ("Q" ?\e,L)\e(B)
538 ("W" ?\e,L*\e(B)
539 ("E" ?\e,L5\e(B)
540 ("R" ?\e,L@\e(B)
541 ("T" ?\e,LB\e(B)
542 ("Y" ?\e,L7\e(B)
543 ("U" ?\e,LC\e(B)
544 ("I" ?\e,L8\e(B)
545 ("O" ?\e,L>\e(B)
546 ("P" ?\e,L?\e(B)
547 ("{" ?\e,LH\e(B)
548 ("}" ?\e,L&\e(B)
549 ("A" ?\e,L0\e(B)
550 ("S" ?\e,LA\e(B)
551 ("D" ?\e,L4\e(B)
552 ("F" ?\e,LD\e(B)
553 ("G" ?\e,L3\e(B)
554 ("H" ?\e,LE\e(B)
555 ("J" ?\e,L(\e(B)
556 ("K" ?\e,L:\e(B)
557 ("L" ?\e,L;\e(B)
558 (":" ?\e,LG\e(B)
559 ("\"" ?\e,L.\e(B)
560 ("|" ?\e,L6\e(B)
561 ("Z" ?\e,L%\e(B)
562 ("X" ?\e,L/\e(B)
563 ("C" ?\e,LF\e(B)
564 ("V" ?\e,L2\e(B)
565 ("B" ?\e,L1\e(B)
566 ("N" ?\e,L=\e(B)
567 ("M" ?\e,L<\e(B)
568 ("<" ?\;)
569 (">" ?:)
570 ("?" ?_))
571
572 ;;
573
574 (quail-define-package
575 "cyrillic-ukrainian" "Cyrillic" "\e,L6\e(BU" nil
576 "\e,L$'5@B7\e(B-\e,L&.\e(B UKRAINIAN (ISO 8859-5 encoding)
577
578 Sorry, but 'ghe with upturn' is not included in ISO 8859-5"
579 nil t t t t)
580
581 ;; 1! 2" 3# 4$ 5% 6& 7' 8( 9) 0= /? +* <>
582 ;; \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
583 ;; \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
584 ;; \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 ,; .: -_
585
586 (quail-define-rules
587 ("1" ?1)
588 ("2" ?2)
589 ("3" ?3)
590 ("4" ?4)
591 ("5" ?5)
592 ("6" ?6)
593 ("7" ?7)
594 ("8" ?8)
595 ("9" ?9)
596 ("0" ?0)
597 ("-" ?/)
598 ("=" ?+)
599 ("`" ?<)
600 ("q" ?\e,Lt\e(B)
601 ("w" ?\e,Lw\e(B)
602 ("e" ?\e,LU\e(B)
603 ("r" ?\e,L`\e(B)
604 ("t" ?\e,Lb\e(B)
605 ("y" ?\e,LW\e(B)
606 ("u" ?\e,Lc\e(B)
607 ("i" ?\e,LX\e(B)
608 ("o" ?\e,L^\e(B)
609 ("p" ?\e,L_\e(B)
610 ("[" ?\e,Lh\e(B)
611 ("]" ?\e,Lv\e(B)
612 ("a" ?\e,LP\e(B)
613 ("s" ?\e,La\e(B)
614 ("d" ?\e,LT\e(B)
615 ("f" ?\e,Ld\e(B)
616 ("g" ?\e,LS\e(B)
617 ("h" ?\e,Le\e(B)
618 ("j" ?\e,Lx\e(B)
619 ("k" ?\e,LZ\e(B)
620 ("l" ?\e,L[\e(B)
621 (";" ?\e,Lg\e(B)
622 ("'" ?\e,L~\e(B)
623 ("\\" ?\e,LV\e(B)
624 ("z" ?\e,Lu\e(B)
625 ("x" ?\e,L\7f\e(B)
626 ("c" ?\e,Lf\e(B)
627 ("v" ?\e,LR\e(B)
628 ("b" ?\e,LQ\e(B)
629 ("n" ?\e,L]\e(B)
630 ("m" ?\e,L\\e(B)
631 ("," ?,)
632 ("." ?.)
633 ("/" ?-)
634
635 ("!" ?!)
636 ("@" ?\")
637 ("#" ?#)
638 ("$" ?$)
639 ("%" ?%)
640 ("^" ?&)
641 ("&" ?')
642 ("*" ?\()
643 ("(" ?\))
644 (")" ?=)
645 ("_" ??)
646 ("+" ?*)
647 ("~" ?>)
648 ("Q" ?\e,L$\e(B)
649 ("W" ?\e,L'\e(B)
650 ("E" ?\e,L5\e(B)
651 ("R" ?\e,L@\e(B)
652 ("T" ?\e,LB\e(B)
653 ("Y" ?\e,L7\e(B)
654 ("U" ?\e,LC\e(B)
655 ("I" ?\e,L8\e(B)
656 ("O" ?\e,L>\e(B)
657 ("P" ?\e,L?\e(B)
658 ("{" ?\e,LH\e(B)
659 ("}" ?\e,L&\e(B)
660 ("A" ?\e,L0\e(B)
661 ("S" ?\e,LA\e(B)
662 ("D" ?\e,L4\e(B)
663 ("F" ?\e,LD\e(B)
664 ("G" ?\e,L3\e(B)
665 ("H" ?\e,LE\e(B)
666 ("J" ?\e,L(\e(B)
667 ("K" ?\e,L:\e(B)
668 ("L" ?\e,L;\e(B)
669 (":" ?\e,LG\e(B)
670 ("\"" ?\e,L.\e(B)
671 ("|" ?\e,L6\e(B)
672 ("Z" ?\e,L%\e(B)
673 ("X" ?\e,L/\e(B)
674 ("C" ?\e,LF\e(B)
675 ("V" ?\e,L2\e(B)
676 ("B" ?\e,L1\e(B)
677 ("N" ?\e,L=\e(B)
678 ("M" ?\e,L<\e(B)
679 ("<" ?\;)
680 (">" ?:)
681 ("?" ?_))
682
683 ;;
684
685 (quail-define-package
686 "cyrillic-yawerty" "Cyrillic" "\e,L6O\e(B" nil
687 "\e,LO25@BK\e(B Roman transcription (ISO 8859-5 encoding)
688
689 This layout is based on Roman transcription.
690 When preceded by a '/', the second and the third rows (number key row) change
691 as follows.
692
693 keytop | Q W E R T Y U I O P A S D
694 --------+---------------------------------------
695 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"
696 nil t t t t)
697
698 ;; 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
699 ;; \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
700 ;; \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
701 ;; \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 ,< .> /?
702
703 ;; 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
704 ;; \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
705 ;; \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
706 ;; \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 ,< .> /?
707
708 (quail-define-rules
709 ("1" ?1)
710 ("2" ?2)
711 ("3" ?3)
712 ("4" ?4)
713 ("5" ?5)
714 ("6" ?6)
715 ("7" ?7)
716 ("8" ?8)
717 ("9" ?9)
718 ("0" ?0)
719 ("-" ?-)
720 ("=" ?\e,Lg\e(B)
721 ("`" ?\e,Ln\e(B)
722 ("q" ?\e,Lo\e(B)
723 ("w" ?\e,LR\e(B)
724 ("e" ?\e,LU\e(B)
725 ("r" ?\e,L`\e(B)
726 ("t" ?\e,Lb\e(B)
727 ("y" ?\e,Lk\e(B)
728 ("u" ?\e,Lc\e(B)
729 ("i" ?\e,LX\e(B)
730 ("o" ?\e,L^\e(B)
731 ("p" ?\e,L_\e(B)
732 ("[" ?\e,Lh\e(B)
733 ("]" ?\e,Li\e(B)
734 ("a" ?\e,LP\e(B)
735 ("s" ?\e,La\e(B)
736 ("d" ?\e,LT\e(B)
737 ("f" ?\e,Ld\e(B)
738 ("g" ?\e,LS\e(B)
739 ("h" ?\e,Le\e(B)
740 ("j" ?\e,LY\e(B)
741 ("k" ?\e,LZ\e(B)
742 ("l" ?\e,L[\e(B)
743 (";" ?\;)
744 ("'" ?')
745 ("\\" ?\e,Lm\e(B)
746 ("z" ?\e,LW\e(B)
747 ("x" ?\e,Ll\e(B)
748 ("c" ?\e,Lf\e(B)
749 ("v" ?\e,LV\e(B)
750 ("b" ?\e,LQ\e(B)
751 ("n" ?\e,L]\e(B)
752 ("m" ?\e,L\\e(B)
753 ("," ?,)
754 ("." ?.)
755 ("/" ?/)
756
757 ("!" ?!)
758 ("@" ?\e,Lq\e(B)
759 ("#" ?\e,Lj\e(B)
760 ("$" ?\e,L!\e(B)
761 ("%" ?%)
762 ("^" ?^)
763 ("&" ?&)
764 ("*" ?*)
765 ("(" ?\()
766 (")" ?\))
767 ("_" ?_)
768 ("+" ?\e,LG\e(B)
769 ("~" ?\e,LN\e(B)
770 ("Q" ?\e,LO\e(B)
771 ("W" ?\e,L2\e(B)
772 ("E" ?\e,L5\e(B)
773 ("R" ?\e,L@\e(B)
774 ("T" ?\e,LB\e(B)
775 ("Y" ?\e,LK\e(B)
776 ("U" ?\e,LC\e(B)
777 ("I" ?\e,L8\e(B)
778 ("O" ?\e,L>\e(B)
779 ("P" ?\e,L?\e(B)
780 ("{" ?\e,LH\e(B)
781 ("}" ?\e,LI\e(B)
782 ("A" ?\e,L0\e(B)
783 ("S" ?\e,LA\e(B)
784 ("D" ?\e,L4\e(B)
785 ("F" ?\e,LD\e(B)
786 ("G" ?\e,L3\e(B)
787 ("H" ?\e,LE\e(B)
788 ("J" ?\e,L9\e(B)
789 ("K" ?\e,L:\e(B)
790 ("L" ?\e,L;\e(B)
791 (":" ?:)
792 ("\"" ?\")
793 ("|" ?\e,LM\e(B)
794 ("Z" ?\e,L7\e(B)
795 ("X" ?\e,LL\e(B)
796 ("C" ?\e,LF\e(B)
797 ("V" ?\e,L6\e(B)
798 ("B" ?\e,L1\e(B)
799 ("N" ?\e,L=\e(B)
800 ("M" ?\e,L<\e(B)
801 ("<" ?<)
802 (">" ?>)
803 ("?" ??)
804
805 ("/q" ?\e,Lr\e(B)
806 ("/w" ?\e,Ls\e(B)
807 ("/e" ?\e,Lt\e(B)
808 ("/r" ?\e,Lu\e(B)
809 ("/t" ?\e,Lv\e(B)
810 ("/y" ?\e,Lw\e(B)
811 ("/u" ?\e,Lx\e(B)
812 ("/i" ?\e,Ly\e(B)
813 ("/o" ?\e,Lz\e(B)
814 ("/p" ?\e,L{\e(B)
815 ("/a" ?\e,L|\e(B)
816 ("/s" ?\e,L~\e(B)
817 ("/d" ?\e,L\7f\e(B)
818
819 ("/Q" ?\e,L"\e(B)
820 ("/W" ?\e,L#\e(B)
821 ("/E" ?\e,L$\e(B)
822 ("/R" ?\e,L%\e(B)
823 ("/T" ?\e,L&\e(B)
824 ("/Y" ?\e,L'\e(B)
825 ("/U" ?\e,L(\e(B)
826 ("/I" ?\e,L)\e(B)
827 ("/O" ?\e,L*\e(B)
828 ("/P" ?\e,L+\e(B)
829 ("/A" ?\e,L,\e(B)
830 ("/S" ?\e,L.\e(B)
831 ("/D" ?\e,L/\e(B))