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 Free Software Foundation, Inc.
   6
   7 ;; Keywords: multilingual, input method, Cyrillic
   8
   9 ;; This file is part of GNU Emacs.
  10
  11 ;; GNU Emacs is free software; you can redistribute it and/or modify
  12 ;; it under the terms of the GNU General Public License as published by
  13 ;; the Free Software Foundation; either version 2, or (at your option)
  14 ;; any later version.
  15
  16 ;; GNU Emacs is distributed in the hope that it will be useful,
  17 ;; but WITHOUT ANY WARRANTY; without even the implied warranty of
  18 ;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  19 ;; GNU General Public License for more details.
  20
  21 ;; You should have received a copy of the GNU General Public License
  22 ;; along with GNU Emacs; see the file COPYING.  If not, write to the
  23 ;; Free Software Foundation, Inc., 59 Temple Place - Suite 330,
  24 ;; Boston, MA 02111-1307, USA.
  25
  26 ;;; Commentary:
  27
  28 ;;; Code:
  29
  30 (require 'quail)
  31
  32 (quail-define-package
  33  "cyrillic-jcuken" "Cyrillic" "\e,L69\e(B" nil
  34  "\e,L9FC:5=\e(B keyboard layout widely used in Russia (ISO 8859-5 encoding)"
  35  nil t t t t nil nil nil nil nil t)
  36
  37 ;;  1! 2" 3' 4* 5: 6, 7. 8; 9( 0) -_ =+ \e,L!\e(B
  38 ;;   \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
  39 ;;    \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
  40 ;;     \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  /?
  41
  42 (quail-define-rules
  43  ("1" ?1)
  44  ("2" ?2)
  45  ("3" ?3)
  46  ("4" ?4)
  47  ("5" ?5)
  48  ("6" ?6)
  49  ("7" ?7)
  50  ("8" ?8)
  51  ("9" ?9)
  52  ("0" ?0)
  53  ("-" ?-)
  54  ("=" ?=)
  55  ("`" ?\e,Lq\e(B)
  56  ("q" ?\e,LY\e(B)
  57  ("w" ?\e,Lf\e(B)
  58  ("e" ?\e,Lc\e(B)
  59  ("r" ?\e,LZ\e(B)
  60  ("t" ?\e,LU\e(B)
  61  ("y" ?\e,L]\e(B)
  62  ("u" ?\e,LS\e(B)
  63  ("i" ?\e,Lh\e(B)
  64  ("o" ?\e,Li\e(B)
  65  ("p" ?\e,LW\e(B)
  66  ("[" ?\e,Le\e(B)
  67  ("]" ?\e,Lj\e(B)
  68  ("a" ?\e,Ld\e(B)
  69  ("s" ?\e,Lk\e(B)
  70  ("d" ?\e,LR\e(B)
  71  ("f" ?\e,LP\e(B)
  72  ("g" ?\e,L_\e(B)
  73  ("h" ?\e,L`\e(B)
  74  ("j" ?\e,L^\e(B)
  75  ("k" ?\e,L[\e(B)
  76  ("l" ?\e,LT\e(B)
  77  (";" ?\e,LV\e(B)
  78  ("'" ?\e,Lm\e(B)
  79  ("\\" ?\\)
  80  ("z" ?\e,Lo\e(B)
  81  ("x" ?\e,Lg\e(B)
  82  ("c" ?\e,La\e(B)
  83  ("v" ?\e,L\\e(B)
  84  ("b" ?\e,LX\e(B)
  85  ("n" ?\e,Lb\e(B)
  86  ("m" ?\e,Ll\e(B)
  87  ("," ?\e,LQ\e(B)
  88  ("." ?\e,Ln\e(B)
  89  ("/" ?/)
  90
  91  ("!" ?!)
  92  ("@" ?\")
  93  ("#" ?')
  94  ("$" ?*)
  95  ("%" ?:)
  96  ("^" ?,)
  97  ("&" ?.)
  98  ("*" ?\;)
  99  ("(" ?()
 100   (")" ?))
 101  ("_" ?_)
 102  ("+" ?+)
 103  ("~" ?\e,L!\e(B)
 104  ("Q" ?\e,L9\e(B)
 105  ("W" ?\e,LF\e(B)
 106  ("E" ?\e,LC\e(B)
 107  ("R" ?\e,L:\e(B)
 108  ("T" ?\e,L5\e(B)
 109  ("Y" ?\e,L=\e(B)
 110  ("U" ?\e,L3\e(B)
 111  ("I" ?\e,LH\e(B)
 112  ("O" ?\e,LI\e(B)
 113  ("P" ?\e,L7\e(B)
 114  ("{" ?\e,LE\e(B)
 115  ("}" ?\e,LJ\e(B)
 116  ("A" ?\e,LD\e(B)
 117  ("S" ?\e,LK\e(B)
 118  ("D" ?\e,L2\e(B)
 119  ("F" ?\e,L0\e(B)
 120  ("G" ?\e,L?\e(B)
 121  ("H" ?\e,L@\e(B)
 122  ("J" ?\e,L>\e(B)
 123  ("K" ?\e,L;\e(B)
 124  ("L" ?\e,L4\e(B)
 125  (":" ?\e,L6\e(B)
 126  ("\"" ?\e,LM\e(B)
 127  ("|" ?|)
 128  ("Z" ?\e,LO\e(B)
 129  ("X" ?\e,LG\e(B)
 130  ("C" ?\e,LA\e(B)
 131  ("V" ?\e,L<\e(B)
 132  ("B" ?\e,L8\e(B)
 133  ("N" ?\e,LB\e(B)
 134  ("M" ?\e,LL\e(B)
 135  ("<" ?\e,L1\e(B)
 136  (">" ?\e,LN\e(B)
 137  ("?" ??))
 138
 139 ;;
 140
 141 (quail-define-package
 142  "cyrillic-macedonian" "Cyrillic" "\e,L6\e(BM" nil
 143  "\e,L)*5@B7\e(B-\e,L#,\e(B keyboard layout based on JUS.I.K1.004 (ISO 8859-5 encoding)"
 144  nil t t t t nil nil nil nil nil t)
 145
 146 ;;  1! 2" 3# 4$ 5% 6& 7' 8( 9) 0= /? +* <>
 147 ;;   \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
 148 ;;    \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
 149 ;;     \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  ,; .: -_
 150
 151 (quail-define-rules
 152  ("1" ?1)
 153  ("2" ?2)
 154  ("3" ?3)
 155  ("4" ?4)
 156  ("5" ?5)
 157  ("6" ?6)
 158  ("7" ?7)
 159  ("8" ?8)
 160  ("9" ?9)
 161  ("0" ?0)
 162  ("-" ?/)
 163  ("=" ?+)
 164  ("`" ?<)
 165  ("q" ?\e,Ly\e(B)
 166  ("w" ?\e,Lz\e(B)
 167  ("e" ?\e,LU\e(B)
 168  ("r" ?\e,L`\e(B)
 169  ("t" ?\e,Lb\e(B)
 170  ("y" ?\e,LW\e(B)
 171  ("u" ?\e,Lc\e(B)
 172  ("i" ?\e,LX\e(B)
 173  ("o" ?\e,L^\e(B)
 174  ("p" ?\e,L_\e(B)
 175  ("[" ?\e,Lh\e(B)
 176  ("]" ?\e,Ls\e(B)
 177  ("a" ?\e,LP\e(B)
 178  ("s" ?\e,La\e(B)
 179  ("d" ?\e,LT\e(B)
 180  ("f" ?\e,Ld\e(B)
 181  ("g" ?\e,LS\e(B)
 182  ("h" ?\e,Le\e(B)
 183  ("j" ?\e,Lx\e(B)
 184  ("k" ?\e,LZ\e(B)
 185  ("l" ?\e,L[\e(B)
 186  (";" ?\e,Lg\e(B)
 187  ("'" ?\e,L|\e(B)
 188  ("\\" ?\e,LV\e(B)
 189  ("z" ?\e,Lu\e(B)
 190  ("x" ?\e,L\x7f\e(B)
 191  ("c" ?\e,Lf\e(B)
 192  ("v" ?\e,LR\e(B)
 193  ("b" ?\e,LQ\e(B)
 194  ("n" ?\e,L]\e(B)
 195  ("m" ?\e,L\\e(B)
 196  ("," ?,)
 197  ("." ?.)
 198  ("/" ?-)
 199
 200  ("!" ?!)
 201  ("@" ?\")
 202  ("#" ?#)
 203  ("$" ?$)
 204  ("%" ?%)
 205  ("^" ?&)
 206  ("&" ?')
 207  ("*" ?\()
 208  ("(" ?\))
 209  (")" ?=)
 210  ("_" ??)
 211  ("+" ?*)
 212  ("~" ?>)
 213  ("Q" ?\e,L)\e(B)
 214  ("W" ?\e,L*\e(B)
 215  ("E" ?\e,L5\e(B)
 216  ("R" ?\e,L@\e(B)
 217  ("T" ?\e,LB\e(B)
 218  ("Y" ?\e,L7\e(B)
 219  ("U" ?\e,LC\e(B)
 220  ("I" ?\e,L8\e(B)
 221  ("O" ?\e,L>\e(B)
 222  ("P" ?\e,L?\e(B)
 223  ("{" ?\e,LH\e(B)
 224  ("}" ?\e,L#\e(B)
 225  ("A" ?\e,L0\e(B)
 226  ("S" ?\e,LA\e(B)
 227  ("D" ?\e,L4\e(B)
 228  ("F" ?\e,LD\e(B)
 229  ("G" ?\e,L3\e(B)
 230  ("H" ?\e,LE\e(B)
 231  ("J" ?\e,L(\e(B)
 232  ("K" ?\e,L:\e(B)
 233  ("L" ?\e,L;\e(B)
 234  (":" ?\e,LG\e(B)
 235  ("\"" ?\e,L,\e(B)
 236  ("|" ?\e,L6\e(B)
 237  ("Z" ?\e,L%\e(B)
 238  ("X" ?\e,L/\e(B)
 239  ("C" ?\e,LF\e(B)
 240  ("V" ?\e,L2\e(B)
 241  ("B" ?\e,L1\e(B)
 242  ("N" ?\e,L=\e(B)
 243  ("M" ?\e,L<\e(B)
 244  ("<" ?\;)
 245  (">" ?:)
 246  ("?" ?_))
 247
 248 ;;
 249
 250 (quail-define-package
 251  "cyrillic-serbian" "Cyrillic" "\e,L6\e(BS" nil
 252  "\e,L)*5@B7\e(B-\e,L"+\e(B keyboard layout based on JUS.I.K1.005 (ISO 8859-5 encoding)"
 253  nil t t t t nil nil nil nil nil t)
 254
 255 ;;  1! 2" 3# 4$ 5% 6& 7' 8( 9) 0= /? +* <>
 256 ;;   \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
 257 ;;    \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
 258 ;;     \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  ,; .: -_
 259
 260 (quail-define-rules
 261  ("1" ?1)
 262  ("2" ?2)
 263  ("3" ?3)
 264  ("4" ?4)
 265  ("5" ?5)
 266  ("6" ?6)
 267  ("7" ?7)
 268  ("8" ?8)
 269  ("9" ?9)
 270  ("0" ?0)
 271  ("-" ?/)
 272  ("=" ?+)
 273  ("`" ?<)
 274  ("q" ?\e,Ly\e(B)
 275  ("w" ?\e,Lz\e(B)
 276  ("e" ?\e,LU\e(B)
 277  ("r" ?\e,L`\e(B)
 278  ("t" ?\e,Lb\e(B)
 279  ("y" ?\e,LW\e(B)
 280  ("u" ?\e,Lc\e(B)
 281  ("i" ?\e,LX\e(B)
 282  ("o" ?\e,L^\e(B)
 283  ("p" ?\e,L_\e(B)
 284  ("[" ?\e,Lh\e(B)
 285  ("]" ?\e,Lr\e(B)
 286  ("a" ?\e,LP\e(B)
 287  ("s" ?\e,La\e(B)
 288  ("d" ?\e,LT\e(B)
 289  ("f" ?\e,Ld\e(B)
 290  ("g" ?\e,LS\e(B)
 291  ("h" ?\e,Le\e(B)
 292  ("j" ?\e,Lx\e(B)
 293  ("k" ?\e,LZ\e(B)
 294  ("l" ?\e,L[\e(B)
 295  (";" ?\e,Lg\e(B)
 296  ("'" ?\e,L{\e(B)
 297  ("\\" ?\e,LV\e(B)
 298  ("z" ?\e,Lu\e(B)
 299  ("x" ?\e,L\x7f\e(B)
 300  ("c" ?\e,Lf\e(B)
 301  ("v" ?\e,LR\e(B)
 302  ("b" ?\e,LQ\e(B)
 303  ("n" ?\e,L]\e(B)
 304  ("m" ?\e,L\\e(B)
 305  ("," ?,)
 306  ("." ?.)
 307  ("/" ?-)
 308
 309  ("!" ?!)
 310  ("@" ?\")
 311  ("#" ?#)
 312  ("$" ?$)
 313  ("%" ?%)
 314  ("^" ?&)
 315  ("&" ?')
 316  ("*" ?\()
 317  ("(" ?\))
 318  (")" ?=)
 319  ("_" ??)
 320  ("+" ?*)
 321  ("~" ?>)
 322  ("Q" ?\e,L)\e(B)
 323  ("W" ?\e,L*\e(B)
 324  ("E" ?\e,L5\e(B)
 325  ("R" ?\e,L@\e(B)
 326  ("T" ?\e,LB\e(B)
 327  ("Y" ?\e,L7\e(B)
 328  ("U" ?\e,LC\e(B)
 329  ("I" ?\e,L8\e(B)
 330  ("O" ?\e,L>\e(B)
 331  ("P" ?\e,L?\e(B)
 332  ("{" ?\e,LH\e(B)
 333  ("}" ?\e,L"\e(B)
 334  ("A" ?\e,L0\e(B)
 335  ("S" ?\e,LA\e(B)
 336  ("D" ?\e,L4\e(B)
 337  ("F" ?\e,LD\e(B)
 338  ("G" ?\e,L3\e(B)
 339  ("H" ?\e,LE\e(B)
 340  ("J" ?\e,L(\e(B)
 341  ("K" ?\e,L:\e(B)
 342  ("L" ?\e,L;\e(B)
 343  (":" ?\e,LG\e(B)
 344  ("\"" ?\e,L+\e(B)
 345  ("|" ?\e,L6\e(B)
 346  ("Z" ?\e,L%\e(B)
 347  ("X" ?\e,L/\e(B)
 348  ("C" ?\e,LF\e(B)
 349  ("V" ?\e,L2\e(B)
 350  ("B" ?\e,L1\e(B)
 351  ("N" ?\e,L=\e(B)
 352  ("M" ?\e,L<\e(B)
 353  ("<" ?\;)
 354  (">" ?:)
 355  ("?" ?_))
 356
 357 ;;
 358
 359 (quail-define-package
 360  "cyrillic-beylorussian" "Belarussian" "\e,L6\e(BB" nil
 361  "\e,L)*5@B7\e(B-\e,L&.\e(B BEYLORUSSIAN (ISO 8859-5 encoding)"
 362  nil t t t t nil nil nil nil nil t)
 363
 364 ;;  1! 2" 3# 4$ 5% 6& 7' 8( 9) 0= /? +* <>
 365 ;;   \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
 366 ;;    \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
 367 ;;     \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  ,; .: -_
 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" ?\e,Ly\e(B)
 384  ("w" ?\e,Lz\e(B)
 385  ("e" ?\e,LU\e(B)
 386  ("r" ?\e,L`\e(B)
 387  ("t" ?\e,Lb\e(B)
 388  ("y" ?\e,LW\e(B)
 389  ("u" ?\e,Lc\e(B)
 390  ("i" ?\e,LX\e(B)
 391  ("o" ?\e,L^\e(B)
 392  ("p" ?\e,L_\e(B)
 393  ("[" ?\e,Lh\e(B)
 394  ("]" ?\e,Lv\e(B)
 395  ("a" ?\e,LP\e(B)
 396  ("s" ?\e,La\e(B)
 397  ("d" ?\e,LT\e(B)
 398  ("f" ?\e,Ld\e(B)
 399  ("g" ?\e,LS\e(B)
 400  ("h" ?\e,Le\e(B)
 401  ("j" ?\e,Lx\e(B)
 402  ("k" ?\e,LZ\e(B)
 403  ("l" ?\e,L[\e(B)
 404  (";" ?\e,Lg\e(B)
 405  ("'" ?\e,L~\e(B)
 406  ("\\" ?\e,LV\e(B)
 407  ("z" ?\e,Lu\e(B)
 408  ("x" ?\e,L\x7f\e(B)
 409  ("c" ?\e,Lf\e(B)
 410  ("v" ?\e,LR\e(B)
 411  ("b" ?\e,LQ\e(B)
 412  ("n" ?\e,L]\e(B)
 413  ("m" ?\e,L\\e(B)
 414  ("," ?,)
 415  ("." ?.)
 416  ("/" ?-)
 417
 418  ("!" ?!)
 419  ("@" ?\")
 420  ("#" ?#)
 421  ("$" ?$)
 422  ("%" ?%)
 423  ("^" ?&)
 424  ("&" ?')
 425  ("*" ?\()
 426  ("(" ?\))
 427  (")" ?=)
 428  ("_" ??)
 429  ("+" ?*)
 430  ("~" ?>)
 431  ("Q" ?\e,L)\e(B)
 432  ("W" ?\e,L*\e(B)
 433  ("E" ?\e,L5\e(B)
 434  ("R" ?\e,L@\e(B)
 435  ("T" ?\e,LB\e(B)
 436  ("Y" ?\e,L7\e(B)
 437  ("U" ?\e,LC\e(B)
 438  ("I" ?\e,L8\e(B)
 439  ("O" ?\e,L>\e(B)
 440  ("P" ?\e,L?\e(B)
 441  ("{" ?\e,LH\e(B)
 442  ("}" ?\e,L&\e(B)
 443  ("A" ?\e,L0\e(B)
 444  ("S" ?\e,LA\e(B)
 445  ("D" ?\e,L4\e(B)
 446  ("F" ?\e,LD\e(B)
 447  ("G" ?\e,L3\e(B)
 448  ("H" ?\e,LE\e(B)
 449  ("J" ?\e,L(\e(B)
 450  ("K" ?\e,L:\e(B)
 451  ("L" ?\e,L;\e(B)
 452  (":" ?\e,LG\e(B)
 453  ("\"" ?\e,L.\e(B)
 454  ("|" ?\e,L6\e(B)
 455  ("Z" ?\e,L%\e(B)
 456  ("X" ?\e,L/\e(B)
 457  ("C" ?\e,LF\e(B)
 458  ("V" ?\e,L2\e(B)
 459  ("B" ?\e,L1\e(B)
 460  ("N" ?\e,L=\e(B)
 461  ("M" ?\e,L<\e(B)
 462  ("<" ?\;)
 463  (">" ?:)
 464  ("?" ?_))
 465
 466 ;;
 467
 468 (quail-define-package
 469  "cyrillic-ukrainian" "Ukrainian" "\e,L6\e(BU" nil
 470  "\e,L$'5@B7\e(B-\e,L&.\e(B UKRAINIAN (ISO 8859-5 encoding)
 471
 472 Sorry, but 'ghe with upturn' is not included in ISO 8859-5"
 473  nil t t t t nil nil nil nil nil t)
 474
 475 ;;  1! 2" 3# 4$ 5% 6& 7' 8( 9) 0= /? +* <>
 476 ;;   \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
 477 ;;    \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
 478 ;;     \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  ,; .: -_
 479
 480 (quail-define-rules
 481  ("1" ?1)
 482  ("2" ?2)
 483  ("3" ?3)
 484  ("4" ?4)
 485  ("5" ?5)
 486  ("6" ?6)
 487  ("7" ?7)
 488  ("8" ?8)
 489  ("9" ?9)
 490  ("0" ?0)
 491  ("-" ?/)
 492  ("=" ?+)
 493  ("`" ?<)
 494  ("q" ?\e,Lt\e(B)
 495  ("w" ?\e,Lw\e(B)
 496  ("e" ?\e,LU\e(B)
 497  ("r" ?\e,L`\e(B)
 498  ("t" ?\e,Lb\e(B)
 499  ("y" ?\e,LW\e(B)
 500  ("u" ?\e,Lc\e(B)
 501  ("i" ?\e,LX\e(B)
 502  ("o" ?\e,L^\e(B)
 503  ("p" ?\e,L_\e(B)
 504  ("[" ?\e,Lh\e(B)
 505  ("]" ?\e,Lv\e(B)
 506  ("a" ?\e,LP\e(B)
 507  ("s" ?\e,La\e(B)
 508  ("d" ?\e,LT\e(B)
 509  ("f" ?\e,Ld\e(B)
 510  ("g" ?\e,LS\e(B)
 511  ("h" ?\e,Le\e(B)
 512  ("j" ?\e,Lx\e(B)
 513  ("k" ?\e,LZ\e(B)
 514  ("l" ?\e,L[\e(B)
 515  (";" ?\e,Lg\e(B)
 516  ("'" ?\e,L~\e(B)
 517  ("\\" ?\e,LV\e(B)
 518  ("z" ?\e,Lu\e(B)
 519  ("x" ?\e,L\x7f\e(B)
 520  ("c" ?\e,Lf\e(B)
 521  ("v" ?\e,LR\e(B)
 522  ("b" ?\e,LQ\e(B)
 523  ("n" ?\e,L]\e(B)
 524  ("m" ?\e,L\\e(B)
 525  ("," ?,)
 526  ("." ?.)
 527  ("/" ?-)
 528
 529  ("!" ?!)
 530  ("@" ?\")
 531  ("#" ?#)
 532  ("$" ?$)
 533  ("%" ?%)
 534  ("^" ?&)
 535  ("&" ?')
 536  ("*" ?\()
 537  ("(" ?\))
 538  (")" ?=)
 539  ("_" ??)
 540  ("+" ?*)
 541  ("~" ?>)
 542  ("Q" ?\e,L$\e(B)
 543  ("W" ?\e,L'\e(B)
 544  ("E" ?\e,L5\e(B)
 545  ("R" ?\e,L@\e(B)
 546  ("T" ?\e,LB\e(B)
 547  ("Y" ?\e,L7\e(B)
 548  ("U" ?\e,LC\e(B)
 549  ("I" ?\e,L8\e(B)
 550  ("O" ?\e,L>\e(B)
 551  ("P" ?\e,L?\e(B)
 552  ("{" ?\e,LH\e(B)
 553  ("}" ?\e,L&\e(B)
 554  ("A" ?\e,L0\e(B)
 555  ("S" ?\e,LA\e(B)
 556  ("D" ?\e,L4\e(B)
 557  ("F" ?\e,LD\e(B)
 558  ("G" ?\e,L3\e(B)
 559  ("H" ?\e,LE\e(B)
 560  ("J" ?\e,L(\e(B)
 561  ("K" ?\e,L:\e(B)
 562  ("L" ?\e,L;\e(B)
 563  (":" ?\e,LG\e(B)
 564  ("\"" ?\e,L.\e(B)
 565  ("|" ?\e,L6\e(B)
 566  ("Z" ?\e,L%\e(B)
 567  ("X" ?\e,L/\e(B)
 568  ("C" ?\e,LF\e(B)
 569  ("V" ?\e,L2\e(B)
 570  ("B" ?\e,L1\e(B)
 571  ("N" ?\e,L=\e(B)
 572  ("M" ?\e,L<\e(B)
 573  ("<" ?\;)
 574  (">" ?:)
 575  ("?" ?_))
 576
 577 ;;
 578
 579 (quail-define-package
 580  "cyrillic-yawerty" "Cyrillic" "\e,L6O\e(B" nil
 581  "\e,LO25@BK\e(B Roman transcription (ISO 8859-5 encoding)
 582
 583 This layout is based on Roman transcription.
 584 When preceded by a '/', the second and the third rows (number key row) change
 585 as follows.
 586
 587   keytop | Q  W  E  R  T  Y  U  I  O  P  A  S  D
 588  --------+---------------------------------------
 589   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"
 590  nil t t t t nil nil nil nil nil t)
 591
 592 ;;  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
 593 ;;   \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
 594 ;;    \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
 595 ;;     \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  ,< .> /?
 596
 597 ;;  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
 598 ;;   \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
 599 ;;    \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
 600 ;;     \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  ,< .> /?
 601
 602 (quail-define-rules
 603  ("1" ?1)
 604  ("2" ?2)
 605  ("3" ?3)
 606  ("4" ?4)
 607  ("5" ?5)
 608  ("6" ?6)
 609  ("7" ?7)
 610  ("8" ?8)
 611  ("9" ?9)
 612  ("0" ?0)
 613  ("-" ?-)
 614  ("=" ?\e,Lg\e(B)
 615  ("`" ?\e,Ln\e(B)
 616  ("q" ?\e,Lo\e(B)
 617  ("w" ?\e,LR\e(B)
 618  ("e" ?\e,LU\e(B)
 619  ("r" ?\e,L`\e(B)
 620  ("t" ?\e,Lb\e(B)
 621  ("y" ?\e,Lk\e(B)
 622  ("u" ?\e,Lc\e(B)
 623  ("i" ?\e,LX\e(B)
 624  ("o" ?\e,L^\e(B)
 625  ("p" ?\e,L_\e(B)
 626  ("[" ?\e,Lh\e(B)
 627  ("]" ?\e,Li\e(B)
 628  ("a" ?\e,LP\e(B)
 629  ("s" ?\e,La\e(B)
 630  ("d" ?\e,LT\e(B)
 631  ("f" ?\e,Ld\e(B)
 632  ("g" ?\e,LS\e(B)
 633  ("h" ?\e,Le\e(B)
 634  ("j" ?\e,LY\e(B)
 635  ("k" ?\e,LZ\e(B)
 636  ("l" ?\e,L[\e(B)
 637  (";" ?\;)
 638  ("'" ?')
 639  ("\\" ?\e,Lm\e(B)
 640  ("z" ?\e,LW\e(B)
 641  ("x" ?\e,Ll\e(B)
 642  ("c" ?\e,Lf\e(B)
 643  ("v" ?\e,LV\e(B)
 644  ("b" ?\e,LQ\e(B)
 645  ("n" ?\e,L]\e(B)
 646  ("m" ?\e,L\\e(B)
 647  ("," ?,)
 648  ("." ?.)
 649  ("/" ?/)
 650
 651  ("!" ?!)
 652  ("@" ?\e,Lq\e(B)
 653  ("#" ?\e,Lj\e(B)
 654  ("$" ?\e,L!\e(B)
 655  ("%" ?%)
 656  ("^" ?^)
 657  ("&" ?&)
 658  ("*" ?*)
 659  ("(" ?\()
 660  (")" ?\))
 661  ("_" ?_)
 662  ("+" ?\e,LG\e(B)
 663  ("~" ?\e,LN\e(B)
 664  ("Q" ?\e,LO\e(B)
 665  ("W" ?\e,L2\e(B)
 666  ("E" ?\e,L5\e(B)
 667  ("R" ?\e,L@\e(B)
 668  ("T" ?\e,LB\e(B)
 669  ("Y" ?\e,LK\e(B)
 670  ("U" ?\e,LC\e(B)
 671  ("I" ?\e,L8\e(B)
 672  ("O" ?\e,L>\e(B)
 673  ("P" ?\e,L?\e(B)
 674  ("{" ?\e,LH\e(B)
 675  ("}" ?\e,LI\e(B)
 676  ("A" ?\e,L0\e(B)
 677  ("S" ?\e,LA\e(B)
 678  ("D" ?\e,L4\e(B)
 679  ("F" ?\e,LD\e(B)
 680  ("G" ?\e,L3\e(B)
 681  ("H" ?\e,LE\e(B)
 682  ("J" ?\e,L9\e(B)
 683  ("K" ?\e,L:\e(B)
 684  ("L" ?\e,L;\e(B)
 685  (":" ?:)
 686  ("\"" ?\")
 687  ("|" ?\e,LM\e(B)
 688  ("Z" ?\e,L7\e(B)
 689  ("X" ?\e,LL\e(B)
 690  ("C" ?\e,LF\e(B)
 691  ("V" ?\e,L6\e(B)
 692  ("B" ?\e,L1\e(B)
 693  ("N" ?\e,L=\e(B)
 694  ("M" ?\e,L<\e(B)
 695  ("<" ?<)
 696  (">" ?>)
 697  ("?" ??)
 698
 699  ("/q" ?\e,Lr\e(B)
 700  ("/w" ?\e,Ls\e(B)
 701  ("/e" ?\e,Lt\e(B)
 702  ("/r" ?\e,Lu\e(B)
 703  ("/t" ?\e,Lv\e(B)
 704  ("/y" ?\e,Lw\e(B)
 705  ("/u" ?\e,Lx\e(B)
 706  ("/i" ?\e,Ly\e(B)
 707  ("/o" ?\e,Lz\e(B)
 708  ("/p" ?\e,L{\e(B)
 709  ("/a" ?\e,L|\e(B)
 710  ("/s" ?\e,L~\e(B)
 711  ("/d" ?\e,L\x7f\e(B)
 712
 713  ("/Q" ?\e,L"\e(B)
 714  ("/W" ?\e,L#\e(B)
 715  ("/E" ?\e,L$\e(B)
 716  ("/R" ?\e,L%\e(B)
 717  ("/T" ?\e,L&\e(B)
 718  ("/Y" ?\e,L'\e(B)
 719  ("/U" ?\e,L(\e(B)
 720  ("/I" ?\e,L)\e(B)
 721  ("/O" ?\e,L*\e(B)
 722  ("/P" ?\e,L+\e(B)
 723  ("/A" ?\e,L,\e(B)
 724  ("/S" ?\e,L.\e(B)
 725  ("/D" ?\e,L/\e(B))
 726
 727 ;; This was provided by Valery Alexeev <valery@domovoy.math.uga.edu>.
 728
 729 (quail-define-package
 730  "cyrillic-translit" "Cyrillic" "\e,L6\e(Bt" nil
 731  "Intuitively transliterated keyboard layout.
 732 Most convenient for entering Russian but all cyrillic characters are included.
 733 Should handle most cases. However:
 734   for \e,Lf\e(B (TSE) use \"c\", never \"ts\"
 735   \e,Li\e(B (SHCHA = Bulgarian SHT) = \"shch\", \"sj\", \"/sht\" or \"/t\",
 736   \e,Lm\e(B (REVERSE ROUNDED E) = \"e'\" or \"e`\"
 737   \e,Le\e(B (KHA) when after \e,La\e(B (S) = \"x\" or \"kh\"
 738   \e,Lj\e(B (HARD SIGN) = \"~\", \e,LJ\e(B (CAPITAL HARD SIGN) = \"~~\",
 739   \e,Ll\e(B (SOFT SIGN) = \"'\", \e,LL\e(B (CAPITAL SOFT SIGN) = \"''\",
 740   \e,Lo\e(B (YA) = \"ya\", \"ja\" or \"q\".
 741
 742 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
 743 u f h=kh=x c ch sh shch=sj=/s=/sht ~ y ' e' yu=ju ya=ja=q
 744
 745 Also included are Ukrainian \e,Lt\e(B (YE) = \"/e\" and \e,Lw\e(B (YI) = \"yi\",
 746 Belorussian \e,L~\e(B (SHORT U) = \"u'\",
 747 Serbo-Croatian \e,Lr\e(B (DJE) = \"/d\", \e,L{\e(B (CHJE)= \"/ch\",
 748 Macedonian \e,Ls\e(B (GJE) = \"/g\", \e,Lu\e(B (DZE) = \"/s\", \e,L|\e(B (KJE) = \"/k\",
 749 cyrillic \e,Lv\e(B (I DECIMAL) = \"/i\", \e,Lx\e(B (JE) = \"/j\",
 750 \e,Ly\e(B (LJE) = \"/l\", \e,Lz\e(B (NJE) = \"/n\" and \e,L\x7f\e(B (DZE) =\"/z\"."
 751  nil t t t t nil nil nil nil nil t)
 752
 753 (quail-define-rules
 754  ("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)
 755  ("e" ?\e,LU\e(B) ("je" ?\e,LU\e(B)
 756  ("yo" ?\e,Lq\e(B) ("jo" ?\e,Lq\e(B)
 757  ("zh" ?\e,LV\e(B) ("z" ?\e,LW\e(B) ("i" ?\e,LX\e(B)
 758  ("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)
 759  ("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)
 760  ("f" ?\e,Ld\e(B) ("x" ?\e,Le\e(B) ("h" ?\e,Le\e(B) ("kh" ?\e,Le\e(B)
 761  ("c" ?\e,Lf\e(B) ("ch" ?\e,Lg\e(B)
 762  ("sh" ?\e,Lh\e(B)
 763  ("shch" ?\e,Li\e(B) ("sj" ?\e,Li\e(B)
 764  ("/sht" ?\e,Li\e(B) ("/t" ?\e,Li\e(B)
 765  ("~" ?\e,Lj\e(B) ("y" ?\e,Lk\e(B) ("'" ?\e,Ll\e(B) ("`" ?\e,Ll\e(B)
 766  ("e'" ?\e,Lm\e(B) ("e`" ?\e,Lm\e(B) ("@" ?\e,Lm\e(B)
 767  ("yu" ?\e,Ln\e(B) ("ju" ?\e,Ln\e(B)
 768  ("ya" ?\e,Lo\e(B) ("ja" ?\e,Lo\e(B) ("q" ?\e,Lo\e(B)
 769
 770  ("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)
 771  ("E" ?\e,L5\e(B) ("Je" ?\e,L5\e(B) ("JE" ?\e,L5\e(B)
 772  ("Yo" ?\e,L!\e(B) ("YO" ?\e,L!\e(B) ("Jo" ?\e,L!\e(B) ("JO" ?\e,L!\e(B)
 773  ("Zh" ?\e,L6\e(B) ("ZH" ?\e,L6\e(B) ("Z" ?\e,L7\e(B) ("I" ?\e,L8\e(B)
 774  ("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)
 775  ("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)
 776  ("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)
 777  ("C" ?\e,LF\e(B) ("Ch" ?\e,LG\e(B) ("CH" ?\e,LG\e(B)
 778  ("Sh" ?\e,LH\e(B) ("SH" ?\e,LH\e(B)
 779  ("Shch" ?\e,LI\e(B) ("SHCH" ?\e,LI\e(B) ("Sj" ?\e,LI\e(B) ("SJ" ?\e,LI\e(B)
 780  ("/Sht" ?\e,LI\e(B) ("/SHT" ?\e,LI\e(B) ("/T" ?\e,LI\e(B)
 781  ("~~" "\e,LJ\e(B") ("Y" ?\e,LK\e(B) ("''" "\e,LL\e(B") ("E'" ?\e,LM\e(B) ("E`" ?\e,LM\e(B)
 782  ("Yu" ?\e,LN\e(B) ("YU" ?\e,LN\e(B) ("Ju" ?\e,LN\e(B) ("JU" ?\e,LN\e(B)
 783  ("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)
 784
 785  ("/e" ?\e,Lt\e(B) ("yi" ?\e,Lw\e(B) ("u'" ?\e,L~\e(B)
 786  ("/d" ?\e,Lr\e(B) ("/ch" ?\e,L{\e(B)
 787  ("/g" ?\e,Ls\e(B) ("/s" ?\e,Lu\e(B) ("/k" ?\e,L|\e(B)
 788  ("/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)
 789  ("/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)
 790  ("/D" ?\e,L"\e(B) ("/Ch" ?\e,L+\e(B) ("/CH" ?\e,L+\e(B)
 791  ("/G" ?\e,L#\e(B) ("/S" ?\e,L%\e(B) ("/K" ?\e,L,\e(B)
 792  ("/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)
 793 )
 794
 795 (quail-define-package
 796  "cyrillic-translit-bulgarian" "Bulgarian" "\e,L6\e(Btb" nil
 797  "Intuitively transliterated keyboard layout optimized for Bulgarian.
 798 The only difference with cyrillic-translit is that \"sht\" translates as
 799 \e,Li\e(B (SHCHA = Bulgarian SHT) insteat of \e,Lhb\e(B (SH+T)."
 800  nil t t t t nil nil nil nil nil t)
 801
 802 (quail-define-rules
 803  ("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)
 804  ("e" ?\e,LU\e(B) ("je" ?\e,LU\e(B)
 805  ("yo" ?\e,Lq\e(B) ("jo" ?\e,Lq\e(B)
 806  ("zh" ?\e,LV\e(B) ("z" ?\e,LW\e(B) ("i" ?\e,LX\e(B)
 807  ("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)
 808  ("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)
 809  ("f" ?\e,Ld\e(B) ("x" ?\e,Le\e(B) ("h" ?\e,Le\e(B) ("kh" ?\e,Le\e(B)
 810  ("c" ?\e,Lf\e(B) ("ch" ?\e,Lg\e(B)
 811  ("sh" ?\e,Lh\e(B)
 812  ("shch" ?\e,Li\e(B) ("sj" ?\e,Li\e(B)
 813  ("/sht" ?\e,Li\e(B) ("/t" ?\e,Li\e(B) ("sht" ?\e,Li\e(B)
 814  ("~" ?\e,Lj\e(B) ("y" ?\e,Lk\e(B) ("'" ?\e,Ll\e(B) ("`" ?\e,Ll\e(B)
 815  ("e'" ?\e,Lm\e(B) ("e`" ?\e,Lm\e(B) ("@" ?\e,Lm\e(B)
 816  ("yu" ?\e,Ln\e(B) ("ju" ?\e,Ln\e(B)
 817  ("ya" ?\e,Lo\e(B) ("ja" ?\e,Lo\e(B) ("q" ?\e,Lo\e(B)
 818
 819  ("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)
 820  ("E" ?\e,L5\e(B) ("Je" ?\e,L5\e(B) ("JE" ?\e,L5\e(B)
 821  ("Yo" ?\e,L!\e(B) ("YO" ?\e,L!\e(B) ("Jo" ?\e,L!\e(B) ("JO" ?\e,L!\e(B)
 822  ("Zh" ?\e,L6\e(B) ("ZH" ?\e,L6\e(B) ("Z" ?\e,L7\e(B) ("I" ?\e,L8\e(B)
 823  ("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)
 824  ("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)
 825  ("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)
 826  ("C" ?\e,LF\e(B) ("Ch" ?\e,LG\e(B) ("CH" ?\e,LG\e(B)
 827  ("Sh" ?\e,LH\e(B) ("SH" ?\e,LH\e(B)
 828  ("Shch" ?\e,LI\e(B) ("SHCH" ?\e,LI\e(B) ("Sj" ?\e,LI\e(B) ("SJ" ?\e,LI\e(B)
 829  ("/Sht" ?\e,LI\e(B) ("/SHT" ?\e,LI\e(B) ("/T" ?\e,LI\e(B) ("Sht" ?\e,LI\e(B) ("SHT" ?\e,LI\e(B)
 830  ("~~" "\e,LJ\e(B") ("Y" ?\e,LK\e(B) ("''" "\e,LL\e(B") ("E'" ?\e,LM\e(B) ("E`" ?\e,LM\e(B)
 831  ("Yu" ?\e,LN\e(B) ("YU" ?\e,LN\e(B) ("Ju" ?\e,LN\e(B) ("JU" ?\e,LN\e(B)
 832  ("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)
 833
 834  ("/e" ?\e,Lt\e(B) ("yi" ?\e,Lw\e(B) ("u'" ?\e,L~\e(B)
 835  ("/d" ?\e,Lr\e(B) ("/ch" ?\e,L{\e(B)
 836  ("/g" ?\e,Ls\e(B) ("/s" ?\e,Lu\e(B) ("/k" ?\e,L|\e(B)
 837  ("/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)
 838  ("/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)
 839  ("/D" ?\e,L"\e(B) ("/Ch" ?\e,L+\e(B) ("/CH" ?\e,L+\e(B)
 840  ("/G" ?\e,L#\e(B) ("/S" ?\e,L%\e(B) ("/K" ?\e,L,\e(B)
 841  ("/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)
 842 )
 843
 844 ;; From Yudit's `Belarusian input table according to STB955-94
 845 ;; belarusian standard'.  Alexander Mikhailian <mikhailian@altern.org>
 846 (quail-define-package
 847  "belarusian" "Belarusian" "\e$,1(v\e(B" ; fixme
 848  nil
 849  "Belarusian STB955-94 input, producing Unicode"
 850  nil t t t t nil nil nil nil nil t)
 851
 852 (quail-define-rules
 853  ("<<" ?\e,A+\e(B)
 854  (">>" ?\e,A;\e(B)
 855  (",," ?\e$,1r}\e(B)
 856  ("``" ?\e$,1r|\e(B)
 857  ("C)" ?\e,A)\e(B)
 858  ("x)" ?\e$,1s"\e(B)
 859  (":)" ?\e$,2#:\e(B)
 860  (":(" ?\e$,2#9\e(B)
 861  ("C-" ?\e,A$\e(B)
 862  ("E-" ?\e$,1tL\e(B)
 863  ("L-" ?\e,A#\e(B)
 864
 865  ("~" ?\e$,1(!\e(B)
 866  ("!" ?!)
 867  ("@" ?\")
 868  ("#" ?\e$,1uV\e(B)
 869  ("$" ?\;)
 870  ("%" ?%)
 871  ("^" ?:)
 872  ("&" ??)
 873  ("*" ?*)
 874  ("(" ?\()
 875  (")" ?\))
 876  ("_" ?_)
 877  ("+" ?+)
 878  ("Q" ?\e$,1(9\e(B)
 879  ("W" ?\e$,1(F\e(B)
 880  ("E" ?\e$,1(C\e(B)
 881  ("R" ?\e$,1(:\e(B)
 882  ("T" ?\e$,1(5\e(B)
 883  ("Y" ?\e$,1(=\e(B)
 884  ("U" ?\e$,1(3\e(B)
 885  ("I" ?\e$,1(H\e(B)
 886  ("O" ?\e$,1(.\e(B)
 887  ("P" ?\e$,1(7\e(B)
 888  ("{" ?\e$,1(E\e(B)
 889  ("}" ?')
 890  ("A" ?\e$,1(D\e(B)
 891  ("S" ?\e$,1(K\e(B)
 892  ("D" ?\e$,1(2\e(B)
 893  ("F" ?\e$,1(0\e(B)
 894  ("G" ?\e$,1(?\e(B)
 895  ("H" ?\e$,1(@\e(B)
 896  ("J" ?\e$,1(>\e(B)
 897  ("K" ?\e$,1(;\e(B)
 898  ("L" ?\e$,1(4\e(B)
 899  (":" ?\e$,1(6\e(B)
 900  ("\"" ?\e$,1(M\e(B)
 901  ("|" ?/)
 902  ("Z" ?\e$,1(O\e(B)
 903  ("X" ?\e$,1(G\e(B)
 904  ("C" ?\e$,1(A\e(B)
 905  ("V" ?\e$,1(<\e(B)
 906  ("B" ?\e$,1(&\e(B)
 907  ("N" ?\e$,1(B\e(B)
 908  ("M" ?\e$,1(L\e(B)
 909  ("<" ?\e$,1(1\e(B)
 910  (">" ?\e$,1(N\e(B)
 911  ("?" ?,)
 912
 913  ("`" ?\e$,1(q\e(B)
 914  ("1" ?1)
 915  ("2" ?2)
 916  ("3" ?3)
 917  ("4" ?4)
 918  ("5" ?5)
 919  ("6" ?6)
 920  ("7" ?7)
 921  ("8" ?8)
 922  ("9" ?9)
 923  ("0" ?0)
 924  ("-" ?-)
 925  ("=" ?=)
 926  ("q" ?\e$,1(Y\e(B)
 927  ("w" ?\e$,1(f\e(B)
 928  ("e" ?\e$,1(c\e(B)
 929  ("r" ?\e$,1(Z\e(B)
 930  ("t" ?\e$,1(U\e(B)
 931  ("y" ?\e$,1(]\e(B)
 932  ("u" ?\e$,1(S\e(B)
 933  ("i" ?\e$,1(h\e(B)
 934  ("o" ?\e$,1(~\e(B)
 935  ("p" ?\e$,1(W\e(B)
 936  ("[" ?\e$,1(e\e(B)
 937  ("]" ?')
 938  ("a" ?\e$,1(d\e(B)
 939  ("s" ?\e$,1(k\e(B)
 940  ("d" ?\e$,1(R\e(B)
 941  ("f" ?\e$,1(P\e(B)
 942  ("g" ?\e$,1(_\e(B)
 943  ("h" ?\e$,1(`\e(B)
 944  ("j" ?\e$,1(^\e(B)
 945  ("k" ?\e$,1([\e(B)
 946  ("l" ?\e$,1(T\e(B)
 947  (";" ?\e$,1(V\e(B)
 948  ("'" ?\e$,1(m\e(B)
 949  ("\\" ?\\)
 950  ("z" ?\e$,1(o\e(B)
 951  ("x" ?\e$,1(g\e(B)
 952  ("c" ?\e$,1(a\e(B)
 953  ("v" ?\e$,1(\\e(B)
 954  ("b" ?\e$,1(v\e(B)
 955  ("n" ?\e$,1(b\e(B)
 956  ("m" ?\e$,1(l\e(B)
 957  ("," ?\e$,1(Q\e(B)
 958  ("." ?\e$,1(n\e(B)
 959  ("/" ?.)
 960
 961  ("D-" ?\e$,1("\e(B)
 962  ("G'" ?\e$,1(#\e(B)
 963  ("E>" ?\e$,1($\e(B)
 964  ("Z>" ?\e$,1(%\e(B)
 965  ("I/ " ?\e$,1(8\e(B)
 966  ("I:" ?\e$,1('\e(B)
 967  ("J<" ?\e$,1((\e(B)
 968  ("L>" ?\e$,1()\e(B)
 969  ("N>" ?\e$,1(*\e(B)
 970  ("C'" ?\e$,1(+\e(B)
 971  ("K'" ?\e$,1(,\e(B)
 972  ("D>" ?\e$,1(/\e(B)
 973
 974  ("d-" ?\e$,1(r\e(B)
 975  ("g'" ?\e$,1(s\e(B)
 976  ("e>" ?\e$,1(t\e(B)
 977  ("z>" ?\e$,1(u\e(B)
 978  ("i/ " ?\e$,1(X\e(B)
 979  ("i:" ?\e$,1(w\e(B)
 980  ("j<" ?\e$,1(x\e(B)
 981  ("l>" ?\e$,1(y\e(B)
 982  ("c'" ?\e$,1({\e(B)
 983  ("k'" ?\e$,1(|\e(B)
 984  ("d>" ?\e$,1(\x7f\e(B)
 985
 986  ("G`" ?\e$,1)P\e(B)
 987  ("g`" ?\e$,1)Q\e(B)
 988  ("E<" ?\e$,1)"\e(B)
 989  ("e<" ?\e$,1)#\e(B)
 990  ("A<" ?\e$,1)*\e(B)
 991  ("a<" ?\e$,1)+\e(B)
 992  ("F`" ?\e$,1)2\e(B)
 993  ("f`" ?\e$,1)3\e(B)
 994  ("Y`" ?\e$,1)4\e(B)
 995  ("y`" ?\e$,1)5\e(B))
 996
 997 ;; From `Bulgarian-PHO.kmap for Yudit', Alexander Shopov
 998 ;; <al_shopov@web.bg>.
 999
1000 ;; Extra commentary and the indicator from an independent
1001 ;; (cyrillic-iso8859-5) implementation by Ognyan Kulev
1002 ;; <ogi@fmi.uni-sofia.bg>.
1003 (quail-define-package
1004  "bulgarian-pho" "Bulgarian" "\e$,1(6(1(D\e(B"
1005  nil
1006  "Bulgarian Phonetic keyboard layout, producing Unicode
1007
1008 The layout is similar to `cyrillic-translit', but all Bulgarian
1009 characters are typed with a single key."
1010  nil t t t t nil nil nil nil nil t)
1011
1012 ;;   \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
1013 ;;    \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(G\e(B
1014 ;;  \e$,1(N\e(B  \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
1015
1016 (quail-define-rules
1017  ("A" ?\e$,1(0\e(B)
1018  ("B" ?\e$,1(1\e(B)
1019  ("W" ?\e$,1(2\e(B)
1020  ("G" ?\e$,1(3\e(B)
1021  ("D" ?\e$,1(4\e(B)
1022  ("E" ?\e$,1(5\e(B)
1023  ("V" ?\e$,1(6\e(B)
1024  ("Z" ?\e$,1(7\e(B)
1025  ("I" ?\e$,1(8\e(B)
1026  ("J" ?\e$,1(9\e(B)
1027  ("K" ?\e$,1(:\e(B)
1028  ("L" ?\e$,1(;\e(B)
1029  ("M" ?\e$,1(<\e(B)
1030  ("N" ?\e$,1(=\e(B)
1031  ("O" ?\e$,1(>\e(B)
1032  ("P" ?\e$,1(?\e(B)
1033  ("R" ?\e$,1(@\e(B)
1034  ("S" ?\e$,1(A\e(B)
1035  ("T" ?\e$,1(B\e(B)
1036  ("U" ?\e$,1(C\e(B)
1037  ("F" ?\e$,1(D\e(B)
1038  ("H" ?\e$,1(E\e(B)
1039  ("C" ?\e$,1(F\e(B)
1040  ("~" ?\e$,1(G\e(B)
1041  ("{" ?\e$,1(H\e(B)
1042  ("}" ?\e$,1(I\e(B)
1043  ("Y" ?\e$,1(J\e(B)
1044  ("X" ?\e$,1(L\e(B)
1045  ("|" ?\e$,1(N\e(B)
1046  ("Q" ?\e$,1(O\e(B)
1047  ("a" ?\e$,1(P\e(B)
1048  ("b" ?\e$,1(Q\e(B)
1049  ("w" ?\e$,1(R\e(B)
1050  ("g" ?\e$,1(S\e(B)
1051  ("d" ?\e$,1(T\e(B)
1052  ("e" ?\e$,1(U\e(B)
1053  ("v" ?\e$,1(V\e(B)
1054  ("z" ?\e$,1(W\e(B)
1055  ("i" ?\e$,1(X\e(B)
1056  ("j" ?\e$,1(Y\e(B)
1057  ("k" ?\e$,1(Z\e(B)
1058  ("l" ?\e$,1([\e(B)
1059  ("m" ?\e$,1(\\e(B)
1060  ("n" ?\e$,1(]\e(B)
1061  ("o" ?\e$,1(^\e(B)
1062  ("p" ?\e$,1(_\e(B)
1063  ("r" ?\e$,1(`\e(B)
1064  ("s" ?\e$,1(a\e(B)
1065  ("t" ?\e$,1(b\e(B)
1066  ("u" ?\e$,1(c\e(B)
1067  ("f" ?\e$,1(d\e(B)
1068  ("h" ?\e$,1(e\e(B)
1069  ("c" ?\e$,1(f\e(B)
1070  ("`" ?\e$,1(g\e(B)
1071  ("[" ?\e$,1(h\e(B)
1072  ("]" ?\e$,1(i\e(B)
1073  ("y" ?\e$,1(j\e(B)
1074  ("x" ?\e$,1(l\e(B)
1075  ("\\" ?\e$,1(n\e(B)
1076  ("q" ?\e$,1(o\e(B))
1077
1078 ;; Local Variables:
1079 ;; coding: iso-2022-7bit
1080 ;; End:
1081
1082 ;;; cyrillic.el ends here