Add input-method and descrition elements.
[m17n/m17n-db.git] / km-yannis.mim
1 ;; km-yannis.mim -- Khmer input method suggested by Dr. Yannis Haralambous
2 ;; Copyright (C) 2003, 2004, 2005
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 (input-method km yannis)
25
26 (description "Khmer input method suggested by Dr. Yannis Haralambous.
27 ")
28
29 (title "ក")
30 (map
31  (consonant
32   ("k" "ក")
33   ("kh" "ខ")
34   ("K" "គ")
35   ("Kh" "ឃ")
36   ("KH" "ឃ")
37   ("g" "ង")
38   ("c" "ច")
39   ("ch" "ឆ")
40   ("C" "ជ")
41   ("Ch" "ឈ")
42   ("CH" "ឈ")
43   ("j" "ញ")
44   ("d" "ដ")
45   ("dh" "ឋ")
46   ("D" "ឌ")
47   ("Dh" "ឍ")
48   ("DH" "ឍ")
49   ("N" "ណ")
50   ("t" "ត")
51   ("th" "ថ")
52   ("T" "ទ")
53   ("Th" "ធ")
54   ("TH" "ធ")
55   ("n" "ន")
56   ("b" "ប")
57   ("ph" "ផ")
58   ("P" "ព")
59   ("Ph" "ភ")
60   ("PH" "ភ")
61   ("m" "ម")
62   ("y" "យ")
63   ("r" "រ")
64   ("l" "ល")
65   ("v" "វ")
66   ("sh" "ឝ")
67   ("S" "ឞ")
68   ("s" "ស")
69   ("h" "ហ")
70   ("L" "ឡ")
71   ("'" "អ"))
72
73  (wirama
74   ("/" "្"))
75
76  (vowel
77   ("A" "ា")
78   ("e" "ិ")
79   ("ey" "ី")
80   ("u" "ឹ")
81   ("ui" "ឺ")
82   ("o" "ុ")
83   ("ou" "ូ")
84   ("ua" "ួ")
85   ("au" "ើ")
86   ("Iu" "ឿ")
87   ("Ie" "ៀ")
88   ("ei" "េ")
89   ("ae" "ែ")
90   ("ay" "ៃ")
91   ("Ao" "ោ")
92   ("Aw" "ៅ"))
93
94  (quality
95   ("q1" "៉")
96   ("q2" "៊"))
97
98  (diacritic
99   ("M" "ំ")
100   ("H" "ះ")
101   (":" "ៈ")
102   ("D1" "់")
103   ("D2" "៌")
104   ("D3" "៍")
105   ("D4" "៎")
106   ("D5" "៏")
107   ("D6" "័"))
108
109  (ind-vowel
110   ("V1" "ឥ")
111   ("V2" "ឦ")
112   ("V3" "ឧ")
113   ("V4" "ឨ")
114   ("V5" "ឩ")
115   ("V6" "ឪ")
116   ("V7" "ឫ")
117   ("V8" "ឬ")
118   ("V9" "ឭ")
119   ("VA" "ឮ")
120   ("VB" "ឯ")
121   ("VC" "ឰ")
122   ("VD" "ឱ")
123   ("VE" "ឲ")
124   ("VF" "ឳ"))
125
126  (misc
127   ("." "។")
128   ("=" "៕")
129   ("%" "៖")
130   ("]" "ៗ")
131   ("_" "៘")
132   ("@" "៙")
133   (">" "៛")
134   ("$" "ៜ")
135   ("/" "្"))
136
137  (space
138   (" " "")))
139
140 (state
141  (init
142   (consonant (shift c-state))
143   (vowel)
144   (quality)
145   (diacritic)
146   (ind-vowel)
147   (misc))
148
149  (c-state
150   (wirama (shift cw-state))
151   (space (shift init)))
152
153  (cw-state
154   (consonant (shift cwc-state))
155   (space (shift init)))
156
157  (cwc-state
158   (wirama (shift cwcw-state))
159   (space (shift init)))
160
161  (cwcw-state
162   (consonant (shift init))))
163
164 ;; Local Variables:
165 ;; mode: lisp
166 ;; End: