leim/quail/hebrew.el

   1 ;; Quail package for inputting Hebrew characters.
   2
   3 ;; Copyright (C) 1998 Electrotechnical Laboratory, JAPAN.
   4 ;; Licensed to the Free Software Foundation.
   5
   6 ;; Keywords: mule, input method, Hebrew
   7
   8 ;; This file is part of GNU Emacs.
   9
  10 ;; GNU Emacs is free software; you can redistribute it and/or modify
  11 ;; it under the terms of the GNU General Public License as published by
  12 ;; the Free Software Foundation; either version 2, or (at your option)
  13 ;; any later version.
  14
  15 ;; GNU Emacs is distributed in the hope that it will be useful,
  16 ;; but WITHOUT ANY WARRANTY; without even the implied warranty of
  17 ;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  18 ;; GNU General Public License for more details.
  19
  20 ;; You should have received a copy of the GNU General Public License
  21 ;; along with GNU Emacs; see the file COPYING.  If not, write to the
  22 ;; Free Software Foundation, Inc., 59 Temple Place - Suite 330,
  23 ;; Boston, MA 02111-1307, USA.
  24
  25 (require 'quail)
  26
  27 (quail-define-package
  28  "hebrew" "Hebrew" "\e,Hr\e(B" nil "Hebrew (ISO 8859-8) input method.
  29
  30 Based on Hebrew typewriter keys.
  31 Hebrew letters are assigned to lowercases.
  32 " nil t t t t nil nil nil nil nil t)
  33
  34 ;;  1! 2@ 3# 4$ 5% 6^ 7& 8* 9( 0) _- += ~;
  35 ;;   /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 {[ {]
  36 ;;    \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 ", |\
  37 ;;     \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 ?.
  38 ;;
  39
  40 (quail-define-rules
  41  ("`" ?\;)
  42  ("q" ?/)
  43  ("w" ?')
  44  ("e" ?\e,Hw\e(B)
  45  ("r" ?\e,Hx\e(B)
  46  ("t" ?\e,H`\e(B)
  47  ("y" ?\e,Hh\e(B)
  48  ("u" ?\e,He\e(B)
  49  ("i" ?\e,Ho\e(B)
  50  ("o" ?\e,Hm\e(B)
  51  ("p" ?\e,Ht\e(B)
  52  ("a" ?\e,Hy\e(B)
  53  ("s" ?\e,Hc\e(B)
  54  ("d" ?\e,Hb\e(B)
  55  ("f" ?\e,Hk\e(B)
  56  ("g" ?\e,Hr\e(B)
  57  ("h" ?\e,Hi\e(B)
  58  ("j" ?\e,Hg\e(B)
  59  ("k" ?\e,Hl\e(B)
  60  ("l" ?\e,Hj\e(B)
  61  (";" ?\e,Hs\e(B)
  62  ("z" ?\e,Hf\e(B)
  63  ("x" ?\e,Hq\e(B)
  64  ("c" ?\e,Ha\e(B)
  65  ("v" ?\e,Hd\e(B)
  66  ("b" ?\e,Hp\e(B)
  67  ("n" ?\e,Hn\e(B)
  68  ("m" ?\e,Hv\e(B)
  69  ("," ?\e,Hz\e(B)
  70  ("." ?\e,Hu\e(B)
  71  ("/" ?.)
  72  ("'" ?,)
  73  )