leim/quail/cyrillic.el

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