leim/quail/hebrew.el

   1 ;;; hebrew.el --- Quail package for inputting Hebrew characters  -*-coding: iso-2022-7bit;-*-
   2
   3 ;; Copyright (C) 1999, 2000, 2001, 2002, 2003, 2004, 2005, 2006, 2007,
   4 ;;   2008
   5 ;;   National Institute of Advanced Industrial Science and Technology (AIST)
   6 ;;   Registration Number H14PRO021
   7
   8 ;; Keywords: mule, input method, Hebrew
   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 3, 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., 51 Franklin Street, Fifth Floor,
  25 ;; Boston, MA 02110-1301, USA.
  26
  27 ;;; Commentary:
  28
  29 ;;; Code:
  30
  31 (require 'quail)
  32
  33 (quail-define-package
  34  "hebrew" "Hebrew" "\e,Hr\e(B" nil "Hebrew (ISO 8859-8) input method.
  35
  36 Based on Hebrew typewriter keys.
  37 Hebrew letters are assigned to lowercases.
  38 " nil t t t t nil nil nil nil nil t)
  39
  40 ;;  1! 2@ 3# 4$ 5% 6^ 7& 8* 9( 0) -_ =+ ;~
  41 ;;   /Q 'W \e,Hw\e(BE \e,Hx\e(BR \e,H`\e(BT \e,Hh\e(BY \e,He\e(BU \e,Ho\e(BI \e,Hm\e(BO \e,Ht\e(BP [{ ]}
  42 ;;    \e,Hy\e(BA \e,Hc\e(BS \e,Hb\e(BD \e,Hk\e(BF \e,Hr\e(BG \e,Hi\e(BH \e,Hg\e(BJ \e,Hl\e(BK \e,Hj\e(BL \e,Hs\e(B: ," \|
  43 ;;     \e,Hf\e(BZ \e,Hq\e(BX \e,Ha\e(BC \e,Hd\e(BV \e,Hp\e(BB \e,Hn\e(BN \e,Hv\e(BM \e,Hz\e(B< \e,Hu\e(B> .?
  44 ;;
  45
  46 (quail-define-rules
  47  ("`" ?\;)
  48  ("q" ?/)
  49  ("w" ?')
  50  ("e" ?\e,Hw\e(B)
  51  ("r" ?\e,Hx\e(B)
  52  ("t" ?\e,H`\e(B)
  53  ("y" ?\e,Hh\e(B)
  54  ("u" ?\e,He\e(B)
  55  ("i" ?\e,Ho\e(B)
  56  ("o" ?\e,Hm\e(B)
  57  ("p" ?\e,Ht\e(B)
  58  ("a" ?\e,Hy\e(B)
  59  ("s" ?\e,Hc\e(B)
  60  ("d" ?\e,Hb\e(B)
  61  ("f" ?\e,Hk\e(B)
  62  ("g" ?\e,Hr\e(B)
  63  ("h" ?\e,Hi\e(B)
  64  ("j" ?\e,Hg\e(B)
  65  ("k" ?\e,Hl\e(B)
  66  ("l" ?\e,Hj\e(B)
  67  (";" ?\e,Hs\e(B)
  68  ("z" ?\e,Hf\e(B)
  69  ("x" ?\e,Hq\e(B)
  70  ("c" ?\e,Ha\e(B)
  71  ("v" ?\e,Hd\e(B)
  72  ("b" ?\e,Hp\e(B)
  73  ("n" ?\e,Hn\e(B)
  74  ("m" ?\e,Hv\e(B)
  75  ("," ?\e,Hz\e(B)
  76  ("." ?\e,Hu\e(B)
  77  ("/" ?.)
  78  ("'" ?,))
  79
  80 ;;; arch-tag: 771b887d-15af-4a4d-b4ce-a4a86f5ca0cf
  81 ;;; hebrew.el ends here