1;;; cyril-jis.el --- Quail package for inputting JISX0208 Cyrillic letters 2 3;; Copyright (C) 2001, 2002, 2003, 2004, 2005, 2006, 2007 4;; Free Software Foundation, Inc. 5;; Copyright (C) 1997, 1998, 1999, 2000, 2001, 2002, 2003, 2004, 2005, 6;; 2006, 2007 7;; National Institute of Advanced Industrial Science and Technology (AIST) 8;; Registration Number H14PRO021 9 10;; Keywords: multilingual, input method, Cyrillic 11 12;; This file is part of GNU Emacs. 13 14;; GNU Emacs is free software; you can redistribute it and/or modify 15;; it under the terms of the GNU General Public License as published by 16;; the Free Software Foundation; either version 2, or (at your option) 17;; any later version. 18 19;; GNU Emacs is distributed in the hope that it will be useful, 20;; but WITHOUT ANY WARRANTY; without even the implied warranty of 21;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the 22;; GNU General Public License for more details. 23 24;; You should have received a copy of the GNU General Public License 25;; along with GNU Emacs; see the file COPYING. If not, write to the 26;; Free Software Foundation, Inc., 51 Franklin Street, Fifth Floor, 27;; Boston, MA 02110-1301, USA. 28 29;;; Commentary: 30 31;; This Quail package is for inputting Cyrillic letters of Japanese 32;; character set JISX0208, not for inputting Cyrillic letters of 33;; ISO-8859-5. For the latter, use packages in quail/cyrillic.el. 34 35;;; Code: 36 37(quail-define-package 38 "cyrillic-jis-russian" "Cyrillic" "$B'('+(B" nil 39 "$B'+'8'5','&'/(B keyboard layout same as JCUKEN (JIS X0208.1983 encoding)" 40 nil t t t t nil nil nil nil nil t) 41 42;; 1! 2@ 3# 4" 5: 6, 7. 8* 9( 0) -_ =+ ,L!(B 43;; ,L9(B ,LF(B ,LC(B ,L:(B ,L5(B ,L=(B ,L3(B ,LH(B ,LI(B ,L7(B ,LE(B ,Lj(B 44;; ,LD(B ,LK(B ,L2(B ,L0(B ,L?(B ,L@(B ,L>(B ,L;(B ,L4(B ,L6(B ,LM(B 45;; ,LO(B ,LG(B ,LA(B ,L<(B ,L8(B ,LB(B ,LL(B ,L1(B ,LN(B /? 46 47(quail-define-rules 48 ("1" ?$B#1(B) 49 ("2" ?$B#2(B) 50 ("3" ?$B#3(B) 51 ("4" ?$B#4(B) 52 ("5" ?$B#5(B) 53 ("6" ?$B#6(B) 54 ("7" ?$B#7(B) 55 ("8" ?$B#8(B) 56 ("9" ?$B#9(B) 57 ("0" ?$B#0(B) 58 ("-" ?$B!](B) 59 ("=" ?$B!a(B) 60 ("`" ?$B'W(B) 61 ("q" ?$B'[(B) 62 ("w" ?$B'h(B) 63 ("e" ?$B'e(B) 64 ("r" ?$B'\(B) 65 ("t" ?$B'V(B) 66 ("y" ?$B'_(B) 67 ("u" ?$B'T(B) 68 ("i" ?$B'j(B) 69 ("o" ?$B'k(B) 70 ("p" ?$B'Y(B) 71 ("[" ?$B'g(B) 72 ("]" ?$B'l(B) 73 ("a" ?$B'f(B) 74 ("s" ?$B'm(B) 75 ("d" ?$B'S(B) 76 ("f" ?$B'Q(B) 77 ("g" ?$B'a(B) 78 ("h" ?$B'b(B) 79 ("j" ?$B'`(B) 80 ("k" ?$B'](B) 81 ("l" ?$B'U(B) 82 (";" ?$B'X(B) 83 ("'" ?$B'o(B) 84 ("\\" ?$B!@(B) 85 ("z" ?$B'q(B) 86 ("x" ?$B'i(B) 87 ("c" ?$B'c(B) 88 ("v" ?$B'^(B) 89 ("b" ?$B'Z(B) 90 ("n" ?$B'd(B) 91 ("m" ?$B'n(B) 92 ("," ?$B'R(B) 93 ("." ?$B'p(B) 94 ("/" ?$B!?(B) 95 96 ("!" ?$B!*(B) 97 ("@" ?$B!w(B) 98 ("#" ?$B!t(B) 99 ("$" ?$B!I(B) 100 ("%" ?$B!'(B) 101 ("^" ?$B!$(B) 102 ("&" ?$B!%(B) 103 ("*" ?$B!v(B) 104 ("(" ?$B!J(B) 105 (")" ?$B!K(B) 106 ("_" ?$B!2(B) 107 ("+" ?$B!\(B) 108 ("~" ?$B''(B) 109 ("Q" ?$B'+(B) 110 ("W" ?$B'8(B) 111 ("E" ?$B'5(B) 112 ("R" ?$B',(B) 113 ("T" ?$B'&(B) 114 ("Y" ?$B'/(B) 115 ("U" ?$B'$(B) 116 ("I" ?$B':(B) 117 ("O" ?$B';(B) 118 ("P" ?$B')(B) 119 ("{" ?$B'7(B) 120 ("}" ?$B'<(B) 121 ("A" ?$B'6(B) 122 ("S" ?$B'=(B) 123 ("D" ?$B'#(B) 124 ("F" ?$B'!(B) 125 ("G" ?$B'1(B) 126 ("H" ?$B'2(B) 127 ("J" ?$B'0(B) 128 ("K" ?$B'-(B) 129 ("L" ?$B'%(B) 130 (":" ?$B'((B) 131 ("\"" ?$B'?(B) 132 ("|" ?$B!C(B) 133 ("Z" ?$B'A(B) 134 ("X" ?$B'9(B) 135 ("C" ?$B'3(B) 136 ("V" ?$B'.(B) 137 ("B" ?$B'*(B) 138 ("N" ?$B'4(B) 139 ("M" ?$B'>(B) 140 ("<" ?$B'"(B) 141 (">" ?$B'@(B) 142 ("?" ?$B!)(B)) 143 144;; Local Variables: 145;; coding: iso-2022-7bit 146;; End: 147 148;;; arch-tag: 3a0cc2ac-de48-42fe-9e80-05d8aa6faa36 149;;; cyril-jis.el ends here 150