From a2ac524f20df2a70e899fa6c9280783c88dbb927 Mon Sep 17 00:00:00 2001 From: Kenichi Handa Date: Tue, 5 Aug 1997 01:18:21 +0000 Subject: [PATCH] Initial revision --- leim/quail/cyril-jis.el | 142 ++++++++++++++++++++++++++++++++++++++++ 1 file changed, 142 insertions(+) create mode 100644 leim/quail/cyril-jis.el diff --git a/leim/quail/cyril-jis.el b/leim/quail/cyril-jis.el new file mode 100644 index 00000000000..fc574264b88 --- /dev/null +++ b/leim/quail/cyril-jis.el @@ -0,0 +1,142 @@ +;;; quail/cyril-jis.el -- Quail package for inputting JISX0208 Cyrillic letters + +;; Copyright (C) 1997 Electrotechnical Laboratory, JAPAN. +;; Licensed to the Free Software Foundation. + +;; Keywords: multilingual, input method, Cyrillic + +;; This file is part of GNU Emacs. + +;; GNU Emacs is free software; you can redistribute it and/or modify +;; it under the terms of the GNU General Public License as published by +;; the Free Software Foundation; either version 2, or (at your option) +;; any later version. + +;; GNU Emacs is distributed in the hope that it will be useful, +;; but WITHOUT ANY WARRANTY; without even the implied warranty of +;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the +;; GNU General Public License for more details. + +;; You should have received a copy of the GNU General Public License +;; along with GNU Emacs; see the file COPYING. If not, write to the +;; Free Software Foundation, Inc., 59 Temple Place - Suite 330, +;; Boston, MA 02111-1307, USA. + +;;; Commentary: + +;; This Quail package is for inputting Cyrillic letters of Japanese +;; character set JISX0208, not for inputting Cyrillic letters of +;; ISO-8859-5. For the latter, use packages in quail/cyrillic.el. + +;;; Code: + +(quail-define-package + "cyrillic-jis-russian" "Cyrillic" "ЖЙ" nil + "ЙЦУКЕН keyboard layout same as JCUKEN (JIS X0208.1983 encoding)" + nil t t t t) + +;; 1! 2@ 3# 4" 5: 6, 7. 8* 9( 0) -_ =+ ,L! +;; ,L9 ,LF ,LC ,L: ,L5 ,L= ,L3 ,LH ,LI ,L7 ,LE ,Lj +;; ,LD ,LK ,L2 ,L0 ,L? ,L@ ,L> ,L; ,L4 ,L6 ,LM +;; ,LO ,LG ,LA ,L< ,L8 ,LB ,LL ,L1 ,LN /? + +(quail-define-rules + ("1" ?1) + ("2" ?2) + ("3" ?3) + ("4" ?4) + ("5" ?5) + ("6" ?6) + ("7" ?7) + ("8" ?8) + ("9" ?9) + ("0" ?0) + ("-" ?−) + ("=" ?=) + ("`" ?ё) + ("q" ?й) + ("w" ?ц) + ("e" ?у) + ("r" ?к) + ("t" ?е) + ("y" ?н) + ("u" ?г) + ("i" ?ш) + ("o" ?щ) + ("p" ?з) + ("[" ?х) + ("]" ?ъ) + ("a" ?ф) + ("s" ?ы) + ("d" ?в) + ("f" ?а) + ("g" ?п) + ("h" ?р) + ("j" ?о) + ("k" ?л) + ("l" ?д) + (";" ?ж) + ("'" ?э) + ("\\" ?\) + ("z" ?я) + ("x" ?ч) + ("c" ?с) + ("v" ?м) + ("b" ?и) + ("n" ?т) + ("m" ?ь) + ("," ?б) + ("." ?ю) + ("/" ?/) + + ("!" ?!) + ("@" ?@) + ("#" ?#) + ("$" ?”) + ("%" ?:) + ("^" ?,) + ("&" ?.) + ("*" ?*) + ("(" ?() + (")" ?)) + ("_" ?_) + ("+" ?+) + ("~" ?Ё) + ("Q" ?Й) + ("W" ?Ц) + ("E" ?У) + ("R" ?К) + ("T" ?Е) + ("Y" ?Н) + ("U" ?Г) + ("I" ?Ш) + ("O" ?Щ) + ("P" ?З) + ("{" ?Х) + ("}" ?Ъ) + ("A" ?Ф) + ("S" ?Ы) + ("D" ?В) + ("F" ?А) + ("G" ?П) + ("H" ?Р) + ("J" ?О) + ("K" ?Л) + ("L" ?Д) + (":" ?Ж) + ("\"" ?Э) + ("|" ?|) + ("Z" ?Я) + ("X" ?Ч) + ("C" ?С) + ("V" ?М) + ("B" ?И) + ("N" ?Т) + ("M" ?Ь) + ("<" ?Б) + (">" ?Ю) + ("?" ??)) + +;; Local Variables: +;; buffer-file-coding-system: iso-2022-7bit +;; End: -- 2.39.2