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