hr-kbd.mim

   1 ;; hr-kdb.mim -- Croatian input method with Croatian keyboard layout
   2 ;; Copyright (C) 2004
   3 ;;   National Institute of Advanced Industrial Science and Technology (AIST)
   4 ;;   Registration Number H15PRO112
   5
   6 ;; This file is part of the m17n database; a sub-part of the m17n
   7 ;; library.
   8
   9 ;; The m17n library is free software; you can redistribute it and/or
  10 ;; modify it under the terms of the GNU Lesser General Public License
  11 ;; as published by the Free Software Foundation; either version 2.1 of
  12 ;; the License, or (at your option) any later version.
  13
  14 ;; The m17n library is distributed in the hope that it will be useful,
  15 ;; but WITHOUT ANY WARRANTY; without even the implied warranty of
  16 ;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
  17 ;; Lesser General Public License for more details.
  18
  19 ;; You should have received a copy of the GNU Lesser General Public
  20 ;; License along with the m17n library; if not, write to the Free
  21 ;; Software Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA
  22 ;; 02111-1307, USA.
  23
  24 ;;; <li> hr-kdb.mim
  25 ;;;
  26 ;;; Input method for Croatian.
  27 ;;; Simulating Croatian Latin keyboard on American keyboard.
  28 ;;; @image html hr-kbd.png "Keyboard Layout"
  29
  30 ;; 1!  2"  3#  4$  5%  6&  7/  8(  9)  0=  '?  +*  ¸¨
  31 ;;   qQ  wW  rR  eE  tT  zZ  uU  iI  oO  pP  šŠ  đĐ
  32 ;;    aA  sS  dD  fF  gG  hH  jJ  kK  lL  čČ  ćĆ  žŽ
  33 ;;      yY  xX  cC  vV  bB  nN  mM  ,;  .:  -_
  34
  35 (title "HR")
  36
  37 (map
  38  (map
  39                 ("@" ?\")
  40                 ("^" ?&)
  41                 ("&" ?/)
  42                 ("*" ?\()
  43                 ("\(" ?\))
  44                 ("\)" ?=)
  45   ("-" ?')      ("_" ??)
  46   ("=" ?+)      ("+" ?*)
  47   ("`" ?¸)     ("~" ?¨)
  48
  49   ("y" ?z)      ("Y" ?Z)
  50   ("[" ?š)     ("{" ?Š)
  51   ("]" ?đ)     ("}" ?Đ)
  52
  53   (";" ?č)     (":" ?Č)
  54   ("'" ?ć)     ("\"" ?Ć)
  55   ("\\" ?ž)    ("|" ?Ž)
  56
  57   ("z" ?y)      ("Z" ?Y)
  58                 ("<" ?;)
  59                 (">" ?:)
  60   ("/" ?-)      ("?" ?_)
  61
  62   ("`c" ?ç)    ("`C" ?Ç)
  63   ("`s" ?ş)    ("`S" ?Ş)
  64   ("~a" ?ä)    ("~A" ?Ä)
  65   ("~e" ?ë)    ("~E" ?Ë)
  66   ("~o" ?ö)    ("~O" ?Ö)
  67   ("~u" ?ü)    ("~U" ?Ü)
  68   ))
  69
  70 (state
  71  (init
  72   (map)))
  73
  74 ;; Local Variables:
  75 ;; coding: utf-8
  76 ;; mode: lisp
  77 ;; End: