Mercurial > hg > xemacs-beta
comparison lisp/leim/quail/cyrillic.el @ 155:43dd3413c7c7 r20-3b4
Import from CVS: tag r20-3b4
author | cvs |
---|---|
date | Mon, 13 Aug 2007 09:39:39 +0200 |
parents | |
children | acd284d43ca1 |
comparison
equal
deleted
inserted
replaced
154:94141801dd7e | 155:43dd3413c7c7 |
---|---|
1 ;;; quail/cyrillic.el -- Quail package for inputting Cyrillic characters | |
2 | |
3 ;; Copyright (C) 1995 Free Software Foundation, Inc. | |
4 ;; Copyright (C) 1995 Electrotechnical Laboratory, JAPAN. | |
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 | |
22 ;; the Free Software Foundation, 675 Mass Ave, Cambridge, MA 02139, USA. | |
23 | |
24 ;;; Code: | |
25 | |
26 (require 'quail) | |
27 | |
28 (quail-define-package "quail-jcuken" "Cyrillic" ",L9FC:5=(B" nil | |
29 "Cyrillic (ISO 8859-5) encoding. | |
30 | |
31 They say this layout is widely used in Russia." | |
32 nil t t t t) | |
33 | |
34 ;; 1! 2@ 3# 4" 5: 6, 7. 8* 9( 0) -_ =+ ,L!(B | |
35 ;; ,L9(B ,LF(B ,LC(B ,L:(B ,L5(B ,L=(B ,L3(B ,LH(B ,LI(B ,L7(B ,LE(B ,Lj(B | |
36 ;; ,LD(B ,LK(B ,L2(B ,L0(B ,L?(B ,L@(B ,L>(B ,L;(B ,L4(B ,L6(B ,LM(B | |
37 ;; ,LO(B ,LG(B ,LA(B ,L<(B ,L8(B ,LB(B ,LL(B ,L1(B ,LN(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 ("`" ?,Lq(B) | |
53 ("q" ?,LY(B) | |
54 ("w" ?,Lf(B) | |
55 ("e" ?,Lc(B) | |
56 ("r" ?,LZ(B) | |
57 ("t" ?,LU(B) | |
58 ("y" ?,L](B) | |
59 ("u" ?,LS(B) | |
60 ("i" ?,Lh(B) | |
61 ("o" ?,Li(B) | |
62 ("p" ?,LW(B) | |
63 ("[" ?,Le(B) | |
64 ("]" ?,Lj(B) | |
65 ("a" ?,Ld(B) | |
66 ("s" ?,Lk(B) | |
67 ("d" ?,LR(B) | |
68 ("f" ?,LP(B) | |
69 ("g" ?,L_(B) | |
70 ("h" ?,L`(B) | |
71 ("j" ?,L^(B) | |
72 ("k" ?,L[(B) | |
73 ("l" ?,LT(B) | |
74 (";" ?,LV(B) | |
75 ("'" ?,Lm(B) | |
76 ("\\" ?\\) | |
77 ("z" ?,Lo(B) | |
78 ("x" ?,Lg(B) | |
79 ("c" ?,La(B) | |
80 ("v" ?,L\(B) | |
81 ("b" ?,LX(B) | |
82 ("n" ?,Lb(B) | |
83 ("m" ?,Ll(B) | |
84 ("," ?,LQ(B) | |
85 ("." ?,Ln(B) | |
86 ("/" ?/) | |
87 | |
88 ("!" ?!) | |
89 ("@" ?@) | |
90 ("#" ?#) | |
91 ("$" ?\") | |
92 ("%" ?:) | |
93 ("^" ?,) | |
94 ("&" ?.) | |
95 ("*" ?*) | |
96 ("(" ?() | |
97 (")" ?)) | |
98 ("_" ?_) | |
99 ("+" ?+) | |
100 ("~" ?,L!(B) | |
101 ("Q" ?,L9(B) | |
102 ("W" ?,LF(B) | |
103 ("E" ?,LC(B) | |
104 ("R" ?,L:(B) | |
105 ("T" ?,L5(B) | |
106 ("Y" ?,L=(B) | |
107 ("U" ?,L3(B) | |
108 ("I" ?,LH(B) | |
109 ("O" ?,LI(B) | |
110 ("P" ?,L7(B) | |
111 ("{" ?,LE(B) | |
112 ("}" ?,LJ(B) | |
113 ("A" ?,LD(B) | |
114 ("S" ?,LK(B) | |
115 ("D" ?,L2(B) | |
116 ("F" ?,L0(B) | |
117 ("G" ?,L?(B) | |
118 ("H" ?,L@(B) | |
119 ("J" ?,L>(B) | |
120 ("K" ?,L;(B) | |
121 ("L" ?,L4(B) | |
122 (":" ?,L6(B) | |
123 ("\"" ?,LM(B) | |
124 ("|" ?|) | |
125 ("Z" ?,LO(B) | |
126 ("X" ?,LG(B) | |
127 ("C" ?,LA(B) | |
128 ("V" ?,L<(B) | |
129 ("B" ?,L8(B) | |
130 ("N" ?,LB(B) | |
131 ("M" ?,LL(B) | |
132 ("<" ?,L1(B) | |
133 (">" ?,LN(B) | |
134 ("?" ??)) | |
135 | |
136 ;; | |
137 | |
138 (quail-define-package "quail-jis-russian" "Cyrillic" "$B'+'8'5','&'/(B" nil | |
139 "JIS X0208.1983 encoding. | |
140 | |
141 The layout is same as jcuken, but uses JIS characters." | |
142 nil t t t t) | |
143 | |
144 ;; 1! 2@ 3# 4" 5: 6, 7. 8* 9( 0) -_ =+ ,L!(B | |
145 ;; ,L9(B ,LF(B ,LC(B ,L:(B ,L5(B ,L=(B ,L3(B ,LH(B ,LI(B ,L7(B ,LE(B ,Lj(B | |
146 ;; ,LD(B ,LK(B ,L2(B ,L0(B ,L?(B ,L@(B ,L>(B ,L;(B ,L4(B ,L6(B ,LM(B | |
147 ;; ,LO(B ,LG(B ,LA(B ,L<(B ,L8(B ,LB(B ,LL(B ,L1(B ,LN(B /? | |
148 | |
149 (quail-define-rules | |
150 ("1" ?$B#1(B) | |
151 ("2" ?$B#2(B) | |
152 ("3" ?$B#3(B) | |
153 ("4" ?$B#4(B) | |
154 ("5" ?$B#5(B) | |
155 ("6" ?$B#6(B) | |
156 ("7" ?$B#7(B) | |
157 ("8" ?$B#8(B) | |
158 ("9" ?$B#9(B) | |
159 ("0" ?$B#0(B) | |
160 ("-" ?$B!](B) | |
161 ("=" ?$B!a(B) | |
162 ("`" ?$B'W(B) | |
163 ("q" ?$B'[(B) | |
164 ("w" ?$B'h(B) | |
165 ("e" ?$B'e(B) | |
166 ("r" ?$B'\(B) | |
167 ("t" ?$B'V(B) | |
168 ("y" ?$B'_(B) | |
169 ("u" ?$B'T(B) | |
170 ("i" ?$B'j(B) | |
171 ("o" ?$B'k(B) | |
172 ("p" ?$B'Y(B) | |
173 ("[" ?$B'g(B) | |
174 ("]" ?$B'l(B) | |
175 ("a" ?$B'f(B) | |
176 ("s" ?$B'm(B) | |
177 ("d" ?$B'S(B) | |
178 ("f" ?$B'Q(B) | |
179 ("g" ?$B'a(B) | |
180 ("h" ?$B'b(B) | |
181 ("j" ?$B'`(B) | |
182 ("k" ?$B'](B) | |
183 ("l" ?$B'U(B) | |
184 (";" ?$B'X(B) | |
185 ("'" ?$B'o(B) | |
186 ("\\" ?$B!@(B) | |
187 ("z" ?$B'q(B) | |
188 ("x" ?$B'i(B) | |
189 ("c" ?$B'c(B) | |
190 ("v" ?$B'^(B) | |
191 ("b" ?$B'Z(B) | |
192 ("n" ?$B'd(B) | |
193 ("m" ?$B'n(B) | |
194 ("," ?$B'R(B) | |
195 ("." ?$B'p(B) | |
196 ("/" ?$B!?(B) | |
197 | |
198 ("!" ?$B!*(B) | |
199 ("@" ?$B!w(B) | |
200 ("#" ?$B!t(B) | |
201 ("$" ?$B!I(B) | |
202 ("%" ?$B!'(B) | |
203 ("^" ?$B!$(B) | |
204 ("&" ?$B!%(B) | |
205 ("*" ?$B!v(B) | |
206 ("(" ?$B!J(B) | |
207 (")" ?$B!K(B) | |
208 ("_" ?$B!2(B) | |
209 ("+" ?$B!\(B) | |
210 ("~" ?$B''(B) | |
211 ("Q" ?$B'+(B) | |
212 ("W" ?$B'8(B) | |
213 ("E" ?$B'5(B) | |
214 ("R" ?$B',(B) | |
215 ("T" ?$B'&(B) | |
216 ("Y" ?$B'/(B) | |
217 ("U" ?$B'$(B) | |
218 ("I" ?$B':(B) | |
219 ("O" ?$B';(B) | |
220 ("P" ?$B')(B) | |
221 ("{" ?$B'7(B) | |
222 ("}" ?$B'<(B) | |
223 ("A" ?$B'6(B) | |
224 ("S" ?$B'=(B) | |
225 ("D" ?$B'#(B) | |
226 ("F" ?$B'!(B) | |
227 ("G" ?$B'1(B) | |
228 ("H" ?$B'2(B) | |
229 ("J" ?$B'0(B) | |
230 ("K" ?$B'-(B) | |
231 ("L" ?$B'%(B) | |
232 (":" ?$B'((B) | |
233 ("\"" ?$B'?(B) | |
234 ("|" ?$B!C(B) | |
235 ("Z" ?$B'A(B) | |
236 ("X" ?$B'9(B) | |
237 ("C" ?$B'3(B) | |
238 ("V" ?$B'.(B) | |
239 ("B" ?$B'*(B) | |
240 ("N" ?$B'4(B) | |
241 ("M" ?$B'>(B) | |
242 ("<" ?$B'"(B) | |
243 (">" ?$B'@(B) | |
244 ("?" ?$B!)(B)) | |
245 | |
246 ;; | |
247 | |
248 (quail-define-package "quail-macedonian" "Cyrillic" ",L)*5@B7(B-,L#,(B" nil | |
249 "Cyrillic (ISO 8859-5) encoding. | |
250 | |
251 This layout is based on JUS.I.K1.004." | |
252 nil t t t t) | |
253 | |
254 ;; 1! 2" 3# 4$ 5% 6& 7' 8( 9) 0= /? +* <> | |
255 ;; ,L)(B ,L*(B ,L5(B ,L@(B ,LB(B ,L7(B ,LC(B ,L8(B ,L>(B ,L?(B ,LH(B ,L#(B | |
256 ;; ,L0(B ,LA(B ,L4(B ,LD(B ,L3(B ,LE(B ,L((B ,L:(B ,L;(B ,LG(B ,L,(B ,L6(B | |
257 ;; ,L%(B ,L/(B ,LF(B ,L2(B ,L1(B ,L=(B ,L<(B ,; .: -_ | |
258 | |
259 (quail-define-rules | |
260 ("1" ?1) | |
261 ("2" ?2) | |
262 ("3" ?3) | |
263 ("4" ?4) | |
264 ("5" ?5) | |
265 ("6" ?6) | |
266 ("7" ?7) | |
267 ("8" ?8) | |
268 ("9" ?9) | |
269 ("0" ?0) | |
270 ("-" ?/) | |
271 ("=" ?+) | |
272 ("`" ?<) | |
273 ("q" ?,Ly(B) | |
274 ("w" ?,Lz(B) | |
275 ("e" ?,LU(B) | |
276 ("r" ?,L`(B) | |
277 ("t" ?,Lb(B) | |
278 ("y" ?,LW(B) | |
279 ("u" ?,Lc(B) | |
280 ("i" ?,LX(B) | |
281 ("o" ?,L^(B) | |
282 ("p" ?,L_(B) | |
283 ("[" ?,Lh(B) | |
284 ("]" ?,Ls(B) | |
285 ("a" ?,LP(B) | |
286 ("s" ?,La(B) | |
287 ("d" ?,LT(B) | |
288 ("f" ?,Ld(B) | |
289 ("g" ?,LS(B) | |
290 ("h" ?,Le(B) | |
291 ("j" ?,Lx(B) | |
292 ("k" ?,LZ(B) | |
293 ("l" ?,L[(B) | |
294 (";" ?,Lg(B) | |
295 ("'" ?,L|(B) | |
296 ("\\" ?,LV(B) | |
297 ("z" ?,Lu(B) | |
298 ("x" ?,L(B) | |
299 ("c" ?,Lf(B) | |
300 ("v" ?,LR(B) | |
301 ("b" ?,LQ(B) | |
302 ("n" ?,L](B) | |
303 ("m" ?,L\(B) | |
304 ("," ?,) | |
305 ("." ?.) | |
306 ("/" ?-) | |
307 | |
308 ("!" ?!) | |
309 ("@" ?\") | |
310 ("#" ?#) | |
311 ("$" ?$) | |
312 ("%" ?%) | |
313 ("^" ?&) | |
314 ("&" ?') | |
315 ("*" ?\() | |
316 ("(" ?\)) | |
317 (")" ?=) | |
318 ("_" ??) | |
319 ("+" ?*) | |
320 ("~" ?>) | |
321 ("Q" ?,L)(B) | |
322 ("W" ?,L*(B) | |
323 ("E" ?,L5(B) | |
324 ("R" ?,L@(B) | |
325 ("T" ?,LB(B) | |
326 ("Y" ?,L7(B) | |
327 ("U" ?,LC(B) | |
328 ("I" ?,L8(B) | |
329 ("O" ?,L>(B) | |
330 ("P" ?,L?(B) | |
331 ("{" ?,LH(B) | |
332 ("}" ?,L#(B) | |
333 ("A" ?,L0(B) | |
334 ("S" ?,LA(B) | |
335 ("D" ?,L4(B) | |
336 ("F" ?,LD(B) | |
337 ("G" ?,L3(B) | |
338 ("H" ?,LE(B) | |
339 ("J" ?,L((B) | |
340 ("K" ?,L:(B) | |
341 ("L" ?,L;(B) | |
342 (":" ?,LG(B) | |
343 ("\"" ?,L,(B) | |
344 ("|" ?,L6(B) | |
345 ("Z" ?,L%(B) | |
346 ("X" ?,L/(B) | |
347 ("C" ?,LF(B) | |
348 ("V" ?,L2(B) | |
349 ("B" ?,L1(B) | |
350 ("N" ?,L=(B) | |
351 ("M" ?,L<(B) | |
352 ("<" ?\;) | |
353 (">" ?:) | |
354 ("?" ?_)) | |
355 | |
356 ;; | |
357 | |
358 (quail-define-package "quail-serbian" "Cyrillic" ",L)*5@B7(B-,L"+(B" nil | |
359 "Cyrillic (ISO 8859-5) encoding. | |
360 | |
361 This layout is based on JUS.I.K1.005." | |
362 nil t t t t) | |
363 | |
364 ;; 1! 2" 3# 4$ 5% 6& 7' 8( 9) 0= /? +* <> | |
365 ;; ,L)(B ,L*(B ,L5(B ,L@(B ,LB(B ,L7(B ,LC(B ,L8(B ,L>(B ,L?(B ,LH(B ,L"(B | |
366 ;; ,L0(B ,LA(B ,L4(B ,LD(B ,L3(B ,LE(B ,L((B ,L:(B ,L;(B ,LG(B ,L+(B ,L6(B | |
367 ;; ,L%(B ,L/(B ,LF(B ,L2(B ,L1(B ,L=(B ,L<(B ,; .: -_ | |
368 | |
369 (quail-define-rules | |
370 ("1" ?1) | |
371 ("2" ?2) | |
372 ("3" ?3) | |
373 ("4" ?4) | |
374 ("5" ?5) | |
375 ("6" ?6) | |
376 ("7" ?7) | |
377 ("8" ?8) | |
378 ("9" ?9) | |
379 ("0" ?0) | |
380 ("-" ?/) | |
381 ("=" ?+) | |
382 ("`" ?<) | |
383 ("q" ?,Ly(B) | |
384 ("w" ?,Lz(B) | |
385 ("e" ?,LU(B) | |
386 ("r" ?,L`(B) | |
387 ("t" ?,Lb(B) | |
388 ("y" ?,LW(B) | |
389 ("u" ?,Lc(B) | |
390 ("i" ?,LX(B) | |
391 ("o" ?,L^(B) | |
392 ("p" ?,L_(B) | |
393 ("[" ?,Lh(B) | |
394 ("]" ?,Lr(B) | |
395 ("a" ?,LP(B) | |
396 ("s" ?,La(B) | |
397 ("d" ?,LT(B) | |
398 ("f" ?,Ld(B) | |
399 ("g" ?,LS(B) | |
400 ("h" ?,Le(B) | |
401 ("j" ?,Lx(B) | |
402 ("k" ?,LZ(B) | |
403 ("l" ?,L[(B) | |
404 (";" ?,Lg(B) | |
405 ("'" ?,L{(B) | |
406 ("\\" ?,LV(B) | |
407 ("z" ?,Lu(B) | |
408 ("x" ?,L(B) | |
409 ("c" ?,Lf(B) | |
410 ("v" ?,LR(B) | |
411 ("b" ?,LQ(B) | |
412 ("n" ?,L](B) | |
413 ("m" ?,L\(B) | |
414 ("," ?,) | |
415 ("." ?.) | |
416 ("/" ?-) | |
417 | |
418 ("!" ?!) | |
419 ("@" ?\") | |
420 ("#" ?#) | |
421 ("$" ?$) | |
422 ("%" ?%) | |
423 ("^" ?&) | |
424 ("&" ?') | |
425 ("*" ?\() | |
426 ("(" ?\)) | |
427 (")" ?=) | |
428 ("_" ??) | |
429 ("+" ?*) | |
430 ("~" ?>) | |
431 ("Q" ?,L)(B) | |
432 ("W" ?,L*(B) | |
433 ("E" ?,L5(B) | |
434 ("R" ?,L@(B) | |
435 ("T" ?,LB(B) | |
436 ("Y" ?,L7(B) | |
437 ("U" ?,LC(B) | |
438 ("I" ?,L8(B) | |
439 ("O" ?,L>(B) | |
440 ("P" ?,L?(B) | |
441 ("{" ?,LH(B) | |
442 ("}" ?,L"(B) | |
443 ("A" ?,L0(B) | |
444 ("S" ?,LA(B) | |
445 ("D" ?,L4(B) | |
446 ("F" ?,LD(B) | |
447 ("G" ?,L3(B) | |
448 ("H" ?,LE(B) | |
449 ("J" ?,L((B) | |
450 ("K" ?,L:(B) | |
451 ("L" ?,L;(B) | |
452 (":" ?,LG(B) | |
453 ("\"" ?,L+(B) | |
454 ("|" ?,L6(B) | |
455 ("Z" ?,L%(B) | |
456 ("X" ?,L/(B) | |
457 ("C" ?,LF(B) | |
458 ("V" ?,L2(B) | |
459 ("B" ?,L1(B) | |
460 ("N" ?,L=(B) | |
461 ("M" ?,L<(B) | |
462 ("<" ?\;) | |
463 (">" ?:) | |
464 ("?" ?_)) | |
465 | |
466 ;; | |
467 | |
468 (quail-define-package "quail-beylorussian" "Cyrillic" ",L)*5@B7(B-,L&.(B" nil | |
469 "Cyrillic (ISO 8859-5) encoding." | |
470 nil t t t t) | |
471 | |
472 ;; 1! 2" 3# 4$ 5% 6& 7' 8( 9) 0= /? +* <> | |
473 ;; ,L)(B ,L*(B ,L5(B ,L@(B ,LB(B ,L7(B ,LC(B ,L8(B ,L>(B ,L?(B ,LH(B ,L&(B | |
474 ;; ,L0(B ,LA(B ,L4(B ,LD(B ,L3(B ,LE(B ,L((B ,L:(B ,L;(B ,LG(B ,L.(B ,L6(B | |
475 ;; ,L%(B ,L/(B ,LF(B ,L2(B ,L1(B ,L=(B ,L<(B ,; .: -_ | |
476 | |
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" ?,Ly(B) | |
492 ("w" ?,Lz(B) | |
493 ("e" ?,LU(B) | |
494 ("r" ?,L`(B) | |
495 ("t" ?,Lb(B) | |
496 ("y" ?,LW(B) | |
497 ("u" ?,Lc(B) | |
498 ("i" ?,LX(B) | |
499 ("o" ?,L^(B) | |
500 ("p" ?,L_(B) | |
501 ("[" ?,Lh(B) | |
502 ("]" ?,Lv(B) | |
503 ("a" ?,LP(B) | |
504 ("s" ?,La(B) | |
505 ("d" ?,LT(B) | |
506 ("f" ?,Ld(B) | |
507 ("g" ?,LS(B) | |
508 ("h" ?,Le(B) | |
509 ("j" ?,Lx(B) | |
510 ("k" ?,LZ(B) | |
511 ("l" ?,L[(B) | |
512 (";" ?,Lg(B) | |
513 ("'" ?,L~(B) | |
514 ("\\" ?,LV(B) | |
515 ("z" ?,Lu(B) | |
516 ("x" ?,L(B) | |
517 ("c" ?,Lf(B) | |
518 ("v" ?,LR(B) | |
519 ("b" ?,LQ(B) | |
520 ("n" ?,L](B) | |
521 ("m" ?,L\(B) | |
522 ("," ?,) | |
523 ("." ?.) | |
524 ("/" ?-) | |
525 | |
526 ("!" ?!) | |
527 ("@" ?\") | |
528 ("#" ?#) | |
529 ("$" ?$) | |
530 ("%" ?%) | |
531 ("^" ?&) | |
532 ("&" ?') | |
533 ("*" ?\() | |
534 ("(" ?\)) | |
535 (")" ?=) | |
536 ("_" ??) | |
537 ("+" ?*) | |
538 ("~" ?>) | |
539 ("Q" ?,L)(B) | |
540 ("W" ?,L*(B) | |
541 ("E" ?,L5(B) | |
542 ("R" ?,L@(B) | |
543 ("T" ?,LB(B) | |
544 ("Y" ?,L7(B) | |
545 ("U" ?,LC(B) | |
546 ("I" ?,L8(B) | |
547 ("O" ?,L>(B) | |
548 ("P" ?,L?(B) | |
549 ("{" ?,LH(B) | |
550 ("}" ?,L&(B) | |
551 ("A" ?,L0(B) | |
552 ("S" ?,LA(B) | |
553 ("D" ?,L4(B) | |
554 ("F" ?,LD(B) | |
555 ("G" ?,L3(B) | |
556 ("H" ?,LE(B) | |
557 ("J" ?,L((B) | |
558 ("K" ?,L:(B) | |
559 ("L" ?,L;(B) | |
560 (":" ?,LG(B) | |
561 ("\"" ?,L.(B) | |
562 ("|" ?,L6(B) | |
563 ("Z" ?,L%(B) | |
564 ("X" ?,L/(B) | |
565 ("C" ?,LF(B) | |
566 ("V" ?,L2(B) | |
567 ("B" ?,L1(B) | |
568 ("N" ?,L=(B) | |
569 ("M" ?,L<(B) | |
570 ("<" ?\;) | |
571 (">" ?:) | |
572 ("?" ?_)) | |
573 | |
574 ;; | |
575 | |
576 (quail-define-package "quail-ukrainian" "Cyrillic" ",L$'5@B7(B-,L&.(B" nil | |
577 "Cyrillic (ISO 8859-5) encoding. | |
578 | |
579 Sorry, but 'ghe with upturn' is not included in ISO 8859-5" | |
580 nil t t t t) | |
581 | |
582 ;; 1! 2" 3# 4$ 5% 6& 7' 8( 9) 0= /? +* <> | |
583 ;; ,L$(B ,L'(B ,L5(B ,L@(B ,LB(B ,L7(B ,LC(B ,L8(B ,L>(B ,L?(B ,LH(B ,L&(B | |
584 ;; ,L0(B ,LA(B ,L4(B ,LD(B ,L3(B ,LE(B ,L((B ,L:(B ,L;(B ,LG(B ,L.(B ,L6(B | |
585 ;; ,L%(B ,L/(B ,LF(B ,L2(B ,L1(B ,L=(B ,L<(B ,; .: -_ | |
586 | |
587 (quail-define-rules | |
588 ("1" ?1) | |
589 ("2" ?2) | |
590 ("3" ?3) | |
591 ("4" ?4) | |
592 ("5" ?5) | |
593 ("6" ?6) | |
594 ("7" ?7) | |
595 ("8" ?8) | |
596 ("9" ?9) | |
597 ("0" ?0) | |
598 ("-" ?/) | |
599 ("=" ?+) | |
600 ("`" ?<) | |
601 ("q" ?,Lt(B) | |
602 ("w" ?,Lw(B) | |
603 ("e" ?,LU(B) | |
604 ("r" ?,L`(B) | |
605 ("t" ?,Lb(B) | |
606 ("y" ?,LW(B) | |
607 ("u" ?,Lc(B) | |
608 ("i" ?,LX(B) | |
609 ("o" ?,L^(B) | |
610 ("p" ?,L_(B) | |
611 ("[" ?,Lh(B) | |
612 ("]" ?,Lv(B) | |
613 ("a" ?,LP(B) | |
614 ("s" ?,La(B) | |
615 ("d" ?,LT(B) | |
616 ("f" ?,Ld(B) | |
617 ("g" ?,LS(B) | |
618 ("h" ?,Le(B) | |
619 ("j" ?,Lx(B) | |
620 ("k" ?,LZ(B) | |
621 ("l" ?,L[(B) | |
622 (";" ?,Lg(B) | |
623 ("'" ?,L~(B) | |
624 ("\\" ?,LV(B) | |
625 ("z" ?,Lu(B) | |
626 ("x" ?,L(B) | |
627 ("c" ?,Lf(B) | |
628 ("v" ?,LR(B) | |
629 ("b" ?,LQ(B) | |
630 ("n" ?,L](B) | |
631 ("m" ?,L\(B) | |
632 ("," ?,) | |
633 ("." ?.) | |
634 ("/" ?-) | |
635 | |
636 ("!" ?!) | |
637 ("@" ?\") | |
638 ("#" ?#) | |
639 ("$" ?$) | |
640 ("%" ?%) | |
641 ("^" ?&) | |
642 ("&" ?') | |
643 ("*" ?\() | |
644 ("(" ?\)) | |
645 (")" ?=) | |
646 ("_" ??) | |
647 ("+" ?*) | |
648 ("~" ?>) | |
649 ("Q" ?,L$(B) | |
650 ("W" ?,L'(B) | |
651 ("E" ?,L5(B) | |
652 ("R" ?,L@(B) | |
653 ("T" ?,LB(B) | |
654 ("Y" ?,L7(B) | |
655 ("U" ?,LC(B) | |
656 ("I" ?,L8(B) | |
657 ("O" ?,L>(B) | |
658 ("P" ?,L?(B) | |
659 ("{" ?,LH(B) | |
660 ("}" ?,L&(B) | |
661 ("A" ?,L0(B) | |
662 ("S" ?,LA(B) | |
663 ("D" ?,L4(B) | |
664 ("F" ?,LD(B) | |
665 ("G" ?,L3(B) | |
666 ("H" ?,LE(B) | |
667 ("J" ?,L((B) | |
668 ("K" ?,L:(B) | |
669 ("L" ?,L;(B) | |
670 (":" ?,LG(B) | |
671 ("\"" ?,L.(B) | |
672 ("|" ?,L6(B) | |
673 ("Z" ?,L%(B) | |
674 ("X" ?,L/(B) | |
675 ("C" ?,LF(B) | |
676 ("V" ?,L2(B) | |
677 ("B" ?,L1(B) | |
678 ("N" ?,L=(B) | |
679 ("M" ?,L<(B) | |
680 ("<" ?\;) | |
681 (">" ?:) | |
682 ("?" ?_)) | |
683 | |
684 ;; | |
685 | |
686 (quail-define-package "quail-yawerty" "Cyrillic" ",LO25@BK(B" nil | |
687 "Cyrillic (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 | ,L"(B ,L#(B ,L$(B ,L%(B ,L&(B ,L'(B ,L((B ,L)(B ,L*(B ,L+(B ,L,(B ,L.(B ,L/(B" | |
696 nil t t t t) | |
697 | |
698 ;; 1! 2,Lq(B 3,Lj(B 4,L!(B 5% 6^ 7& 8* 9( 0) -_ ,LG(B ,LN(B | |
699 ;; ,LO(B ,L2(B ,L5(B ,L@(B ,LB(B ,LK(B ,LC(B ,L8(B ,L>(B ,L?(B ,LH(B ,LI(B | |
700 ;; ,L0(B ,LA(B ,L4(B ,LD(B ,L3(B ,LE(B ,L9(B ,L:(B ,L;(B ;: '" ,LM(B | |
701 ;; ,L7(B ,LL(B ,LF(B ,L6(B ,L1(B ,L=(B ,L<(B ,< .> /? | |
702 | |
703 ;; 1! 2,Lq(B 3,Lj(B 4,L!(B 5% 6^ 7& 8* 9( 0) -_ ,LG(B ,LN(B | |
704 ;; ,L"(B ,L#(B ,L$(B ,L%(B ,L&(B ,L'(B ,L((B ,L)(B ,L*(B ,L+(B ,LH(B ,LI(B | |
705 ;; ,L,(B ,L.(B ,L/(B ,LD(B ,L3(B ,LE(B ,L9(B ,L:(B ,L;(B ;: '" ,LM(B | |
706 ;; ,L7(B ,LL(B ,LF(B ,L6(B ,L1(B ,L=(B ,L<(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 ("=" ?,Lg(B) | |
721 ("`" ?,Ln(B) | |
722 ("q" ?,Lo(B) | |
723 ("w" ?,LR(B) | |
724 ("e" ?,LU(B) | |
725 ("r" ?,L`(B) | |
726 ("t" ?,Lb(B) | |
727 ("y" ?,Lk(B) | |
728 ("u" ?,Lc(B) | |
729 ("i" ?,LX(B) | |
730 ("o" ?,L^(B) | |
731 ("p" ?,L_(B) | |
732 ("[" ?,Lh(B) | |
733 ("]" ?,Li(B) | |
734 ("a" ?,LP(B) | |
735 ("s" ?,La(B) | |
736 ("d" ?,LT(B) | |
737 ("f" ?,Ld(B) | |
738 ("g" ?,LS(B) | |
739 ("h" ?,Le(B) | |
740 ("j" ?,LY(B) | |
741 ("k" ?,LZ(B) | |
742 ("l" ?,L[(B) | |
743 (";" ?\;) | |
744 ("'" ?') | |
745 ("\\" ?,Lm(B) | |
746 ("z" ?,LW(B) | |
747 ("x" ?,Ll(B) | |
748 ("c" ?,Lf(B) | |
749 ("v" ?,LV(B) | |
750 ("b" ?,LQ(B) | |
751 ("n" ?,L](B) | |
752 ("m" ?,L\(B) | |
753 ("," ?,) | |
754 ("." ?.) | |
755 ("/" ?/) | |
756 | |
757 ("!" ?!) | |
758 ("@" ?,Lq(B) | |
759 ("#" ?,Lj(B) | |
760 ("$" ?,L!(B) | |
761 ("%" ?%) | |
762 ("^" ?^) | |
763 ("&" ?&) | |
764 ("*" ?*) | |
765 ("(" ?\() | |
766 (")" ?\)) | |
767 ("_" ?_) | |
768 ("+" ?,LG(B) | |
769 ("~" ?,LN(B) | |
770 ("Q" ?,LO(B) | |
771 ("W" ?,L2(B) | |
772 ("E" ?,L5(B) | |
773 ("R" ?,L@(B) | |
774 ("T" ?,LB(B) | |
775 ("Y" ?,LK(B) | |
776 ("U" ?,LC(B) | |
777 ("I" ?,L8(B) | |
778 ("O" ?,L>(B) | |
779 ("P" ?,L?(B) | |
780 ("{" ?,LH(B) | |
781 ("}" ?,LI(B) | |
782 ("A" ?,L0(B) | |
783 ("S" ?,LA(B) | |
784 ("D" ?,L4(B) | |
785 ("F" ?,LD(B) | |
786 ("G" ?,L3(B) | |
787 ("H" ?,LE(B) | |
788 ("J" ?,L9(B) | |
789 ("K" ?,L:(B) | |
790 ("L" ?,L;(B) | |
791 (":" ?:) | |
792 ("\"" ?\") | |
793 ("|" ?,LM(B) | |
794 ("Z" ?,L7(B) | |
795 ("X" ?,LL(B) | |
796 ("C" ?,LF(B) | |
797 ("V" ?,L6(B) | |
798 ("B" ?,L1(B) | |
799 ("N" ?,L=(B) | |
800 ("M" ?,L<(B) | |
801 ("<" ?<) | |
802 (">" ?>) | |
803 ("?" ??) | |
804 | |
805 ("/q" ?,Lr(B) | |
806 ("/w" ?,Ls(B) | |
807 ("/e" ?,Lt(B) | |
808 ("/r" ?,Lu(B) | |
809 ("/t" ?,Lv(B) | |
810 ("/y" ?,Lw(B) | |
811 ("/u" ?,Lx(B) | |
812 ("/i" ?,Ly(B) | |
813 ("/o" ?,Lz(B) | |
814 ("/p" ?,L{(B) | |
815 ("/a" ?,L|(B) | |
816 ("/s" ?,L~(B) | |
817 ("/d" ?,L(B) | |
818 | |
819 ("/Q" ?,L"(B) | |
820 ("/W" ?,L#(B) | |
821 ("/E" ?,L$(B) | |
822 ("/R" ?,L%(B) | |
823 ("/T" ?,L&(B) | |
824 ("/Y" ?,L'(B) | |
825 ("/U" ?,L((B) | |
826 ("/I" ?,L)(B) | |
827 ("/O" ?,L*(B) | |
828 ("/P" ?,L+(B) | |
829 ("/A" ?,L,(B) | |
830 ("/S" ?,L.(B) | |
831 ("/D" ?,L/(B)) |