Mercurial > hg > xemacs-beta
comparison lisp/leim/quail/tibetan.el @ 197:acd284d43ca1 r20-3b25
Import from CVS: tag r20-3b25
author | cvs |
---|---|
date | Mon, 13 Aug 2007 10:00:02 +0200 |
parents | |
children |
comparison
equal
deleted
inserted
replaced
196:58e0786448ca | 197:acd284d43ca1 |
---|---|
1 ;;; quail/tibetan.el -- Quail package for inputting Tibetan characters | |
2 | |
3 ;; Copyright (C) 1995 Free Software Foundation, Inc. | |
4 ;; Copyright (C) 1995 Electrotechnical Laboratory, JAPAN. | |
5 | |
6 ;; Keywords: multilingual, input method, Tibetan | |
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 | |
22 ;; the Free Software Foundation, 675 Mass Ave, Cambridge, MA 02139, USA. | |
23 | |
24 ;; Author: Toru TOMABECHI, <Toru.Tomabechi@orient.unil.ch> | |
25 | |
26 ;; Created: Feb. 17. 1997 | |
27 | |
28 ;; History: | |
29 ;; 1997.03.13 Support for inputting special signs and punctuations added. | |
30 ;; (Only Ext. Wylie input) | |
31 | |
32 ;;; Code: | |
33 | |
34 (require 'quail) | |
35 | |
36 ;;; | |
37 ;;; Functions for making some composite punctuations. | |
38 ;;; | |
39 | |
40 (defun tibetan-quail-bzhi-shad (&rest ignore) | |
41 (quail-delete-region) | |
42 (quail-delete-overlays) | |
43 (insert (compose-chars ?$(7!>(B '(mr . ml) ?\x20 '(mr . ml) ?$(7!>(B)) | |
44 (throw 'quail-tag nil)) | |
45 | |
46 (defun tibetan-quail-nyi-zla (&rest ignore) | |
47 (quail-delete-region) | |
48 (quail-delete-overlays) | |
49 (insert (compose-chars ?$(7#R(B '(mr . ml) ?$(7#S(B)) | |
50 (throw 'quail-tag nil)) | |
51 | |
52 (defun tibetan-quail-nyi-zla-phur-shad (&rest ignore) | |
53 (quail-delete-region) | |
54 (quail-delete-overlays) | |
55 (insert (compose-chars ?$(7#R(B '(mr . ml) ?$(7#S(B '(bc . tl) ?$(7!I(B)) | |
56 (throw 'quail-tag nil)) | |
57 | |
58 (defun tibetan-quail-nyi-zla-double (&rest ignore) | |
59 (quail-delete-region) | |
60 (quail-delete-overlays) | |
61 (insert (compose-chars ?$(7#R(B '(mr . ml) ?$(7#S(B '(mr . ml) ?$(7#S(B)) | |
62 (throw 'quail-tag nil)) | |
63 | |
64 (defun tibetan-quail-nyi-zla-triple (&rest ignore) | |
65 (quail-delete-region) | |
66 (quail-delete-overlays) | |
67 (insert (compose-chars ?$(7#R(B '(mr . ml) ?$(7#S(B '(mr . ml) ?$(7#S(B '(mr . ml) ?$(7#S(B)) | |
68 (throw 'quail-tag nil)) | |
69 | |
70 ;;; | |
71 ;;; Setting-ups for Extended Wylie input. | |
72 ;;; | |
73 | |
74 (defun quail-tibetan-input-wylie (key &rest ignore) | |
75 (let (pc) | |
76 (quail-delete-region) | |
77 (quail-delete-overlays) | |
78 (setq pc (preceding-char)) | |
79 (if (not (eq (point) (point-min))) | |
80 (delete-backward-char 1 nil)) | |
81 (insert (tibetan-composition pc key)) | |
82 (throw 'quail-tag nil))) | |
83 | |
84 | |
85 (quail-define-package "tibetan-wylie" "Tibetan" "TIBw" t | |
86 "Tibetan character input by Extended Wylie key assignment. | |
87 | |
88 +-------------------------------------+ | |
89 |2$(7"!`#T1$(8!;(B k |2$(7""`#T1$(8!;(B kh |2$(7"#`#T1$(8!;(B g |2$(7"$`#T1$(8!;(B gh |2$(7"%`#T1$(8!;(B ng| $(7"S(B i $(8!=(B / | |
90 |2$(7"&`#T1$(8!;(B c |2$(7"'`#T1$(8!;(B ch |2$(7"(`#T1$(8!;(B j | |$(7"*$(8!;(B ny| $(7"U(B u $(7!>(B // | |
91 |$(7"+$(8!;(B T |$(7",$(8!;(B TH |$(7"-$(8!;(B D |$(7".$(8!;(B DH |$(7"/$(8!;(B N | $(7"[(B e 2$(7!>P(B P$(7!>1(B //// | |
92 |$(7"0$(8!;(B t |$(7"1$(8!;(B th |$(7"2$(8!;(B d |$(7"3$(8!;(B dh |$(7"4$(8!;(B n | $(7"](B o $(7!A(B ; | |
93 |$(7"5$(8!;(B p |$(7"6$(8!;(B ph |$(7"7$(8!;(B b |$(7"8$(8!;(B bh |$(7"9$(8!;(B m | $(7"\(B ai (ee, E) $(8!?(B $ | |
94 |$(7":$(8!;(B ts|$(7";$(8!;(B tsh|$(7"<$(8!;(B dz |$(7"=$(8!;(B dzh|$(7">$(8!;(B w | $(7"^(B au (oo, O) $(8!@(B & | |
95 |$(7"?$(8!;(B zh|$(7"@$(8!;(B z |$(7"A$(8!;(B ' | |$(7"B$(8!;(B y | $(7"a(B I 2$(7#RP#SP#S1(B * | |
96 |$(7"C$(8!;(B r |$(7"D$(8!;(B l |$(7"E$(8!;(B sh |$(7"F$(8!;(B SH |$(7"G$(8!;(B s | $(7"`(B : 2$(7#RP#SP#SP#S1(B # | |
97 |$(7"H$(8!;(B h |$(7"I$(8!;(B A |$(7"J$(8!;(B kSH| | | $(7"_(B M $(7!l(B $(7!m(B < > | |
98 +-------------------------------------+ $(8!D(B % | |
99 (The consonant $(7"I$(8!;(B must be typed explicitly.) | |
100 | |
101 NOT SPECIFIED IN EXT. WYLIE: | |
102 +--------------------------------------------------------+ | |
103 |$(7"c(B = ~ |$(7"d(B = ` |$(7"e(B = , |$(7"f(B = @ |$(7!g(B = _o|$(7!e(B = _O|2$(7#RP#S_!I1(B = ^| | |
104 +--------------------------------------------------------+ | |
105 |$(7"i(B = x |$(7"j(B = X |$(7"g(B = v |$(7"h(B = V |$(7"k(B = q |$(7"l(B = Q | | |
106 +-----------------------------------------------+ | |
107 | |
108 SPECIAL KEYS | |
109 + : Consonant Stacking | |
110 \(Consonant stacking for ordinary Tibetan is done automatically) | |
111 - : No Consonant Stacking | |
112 \(To suppress automatic stacking for \"g-y\", | |
113 and to get da-drag in -r-d, -l-d .) | |
114 | : Special signs. | |
115 | |
116 Tsheg is assigned to SPC. Space is assigned to period '.'. | |
117 " | |
118 nil nil nil) | |
119 | |
120 (quail-define-rules | |
121 ("." ?\x20) | |
122 ("k" quail-tibetan-input-wylie) | |
123 ("g" quail-tibetan-input-wylie) | |
124 ("c" quail-tibetan-input-wylie) | |
125 ("j" quail-tibetan-input-wylie) | |
126 ("T" quail-tibetan-input-wylie) | |
127 ("D" quail-tibetan-input-wylie) | |
128 ("N" quail-tibetan-input-wylie) | |
129 ("t" quail-tibetan-input-wylie) | |
130 ("d" quail-tibetan-input-wylie) | |
131 ("n" quail-tibetan-input-wylie) | |
132 ("p" quail-tibetan-input-wylie) | |
133 ("b" quail-tibetan-input-wylie) | |
134 ("m" quail-tibetan-input-wylie) | |
135 ("w" quail-tibetan-input-wylie) | |
136 ("z" quail-tibetan-input-wylie) | |
137 ("'" quail-tibetan-input-wylie) | |
138 ("y" quail-tibetan-input-wylie) | |
139 ("r" quail-tibetan-input-wylie) | |
140 ("l" quail-tibetan-input-wylie) | |
141 ("SH" quail-tibetan-input-wylie) | |
142 ("s" quail-tibetan-input-wylie) | |
143 ("h" quail-tibetan-input-wylie) | |
144 ("H" quail-tibetan-input-wylie) | |
145 ("A" quail-tibetan-input-wylie) | |
146 ("+k" quail-tibetan-input-wylie) | |
147 ("+g" quail-tibetan-input-wylie) | |
148 ("+c" quail-tibetan-input-wylie) | |
149 ("+j" quail-tibetan-input-wylie) | |
150 ("+T" quail-tibetan-input-wylie) | |
151 ("+D" quail-tibetan-input-wylie) | |
152 ("+N" quail-tibetan-input-wylie) | |
153 ("+t" quail-tibetan-input-wylie) | |
154 ("+d" quail-tibetan-input-wylie) | |
155 ("+n" quail-tibetan-input-wylie) | |
156 ("+p" quail-tibetan-input-wylie) | |
157 ("+b" quail-tibetan-input-wylie) | |
158 ("+m" quail-tibetan-input-wylie) | |
159 ("+w" quail-tibetan-input-wylie) | |
160 ("+z" quail-tibetan-input-wylie) | |
161 ("+'" quail-tibetan-input-wylie) | |
162 ("+y" quail-tibetan-input-wylie) | |
163 ("+r" quail-tibetan-input-wylie) | |
164 ("+l" quail-tibetan-input-wylie) | |
165 ("+SH" quail-tibetan-input-wylie) | |
166 ("+s" quail-tibetan-input-wylie) | |
167 ("+h" quail-tibetan-input-wylie) | |
168 ("+H" quail-tibetan-input-wylie) | |
169 ("+A" quail-tibetan-input-wylie) | |
170 ("-d" ?$(7"2(B) ; To avoid default stacking | |
171 ("-y" ?$(7"B(B) ; Idem. | |
172 ("a" quail-tibetan-input-wylie) ; invisible vowel sign | |
173 ("i" quail-tibetan-input-wylie) | |
174 ("u" quail-tibetan-input-wylie) | |
175 ("e" quail-tibetan-input-wylie) | |
176 ("o" quail-tibetan-input-wylie) | |
177 ("I" quail-tibetan-input-wylie) | |
178 ("E" quail-tibetan-input-wylie) | |
179 ("O" quail-tibetan-input-wylie) | |
180 ("M" quail-tibetan-input-wylie) | |
181 ("~" quail-tibetan-input-wylie) | |
182 ("`" quail-tibetan-input-wylie) | |
183 ("," quail-tibetan-input-wylie) | |
184 ("x" quail-tibetan-input-wylie) | |
185 ("X" quail-tibetan-input-wylie) | |
186 ("v" quail-tibetan-input-wylie) | |
187 ("V" quail-tibetan-input-wylie) | |
188 ("q" quail-tibetan-input-wylie) | |
189 ("Q" quail-tibetan-input-wylie) | |
190 ("_o" quail-tibetan-input-wylie) | |
191 ("_O" quail-tibetan-input-wylie) | |
192 ;;; ("_/" quail-tibetan-input-wylie) | |
193 (":" ?$(8"`(B) | |
194 (" " ?$(8!;(B) | |
195 ("/" ?$(8!=(B) | |
196 ("//" ?$(7!>(B) | |
197 ("////" tibetan-quail-bzhi-shad) | |
198 ("$" ?$(8!?(B) | |
199 ("/\"" ?$(8!@(B) ; Not defined in Ext. Wylie. | |
200 ("&" ?$(8!@(B) | |
201 (";" ?$(8!A(B) | |
202 ("%" ?$(8!D(B) | |
203 ("!" ?$(7!8(B) | |
204 ("<" ?$(7!l(B) | |
205 (">" ?$(7!m(B) | |
206 ("@" ?$(7"f(B) | |
207 ("*" tibetan-quail-nyi-zla-double) | |
208 ("#" tibetan-quail-nyi-zla-triple) | |
209 ("^" tibetan-quail-nyi-zla-phur-shad) | |
210 ("0" ?$(7!P(B) | |
211 ("1" ?$(7!Q(B) | |
212 ("2" ?$(7!R(B) | |
213 ("3" ?$(7!S(B) | |
214 ("4" ?$(7!T(B) | |
215 ("5" ?$(7!U(B) | |
216 ("6" ?$(7!V(B) | |
217 ("7" ?$(7!W(B) | |
218 ("8" ?$(7!X(B) | |
219 ("9" ?$(7!Y(B) | |
220 ("-0" ?$(7!c(B) | |
221 ("-1" ?$(7!Z(B) | |
222 ("-2" ?$(7![(B) | |
223 ("-3" ?$(7!\(B) | |
224 ("-4" ?$(7!](B) | |
225 ("-5" ?$(7!^(B) | |
226 ("-6" ?$(7!_(B) | |
227 ("-7" ?$(7!`(B) | |
228 ("-8" ?$(7!a(B) | |
229 ("-9" ?$(7!b(B) | |
230 ("|" "$(7!1!2!3!9!:!B!C!E!F!G!H!I!J!K!L!M!N!O!d!f!h!j!k!n!o(B") | |
231 ) | |
232 | |
233 ;;; | |
234 ;;; Setting-ups for TibKey input | |
235 ;;; | |
236 | |
237 (defconst tibetan-tibkey-to-transcription-alist | |
238 '( | |
239 ("`" . "`") ; sna ldan | |
240 ("~" . "~") ; sna ldan + nada | |
241 ("q" . "k") ; ka | |
242 ("Q" ."kSH") ; kSHa | |
243 ("w" . "kh") ; kha | |
244 ("e" . "g") ; ga | |
245 ("r" . "ng") ; nga | |
246 ("t" . "c") ; ca | |
247 ("T" . "I") ; gi gu log | |
248 ("y" . "ch") ; cha | |
249 ("u" . "j") ; ja | |
250 ("i" . "ny") ; nya | |
251 ("o" . "t") ; ta | |
252 ("O" . "T") ; Ta | |
253 ("p" . "th") ; tha | |
254 ("P" . "TH") ; THa | |
255 ("[" . "d") ; da | |
256 ("{" . "D") ; Da | |
257 ("]" . "n") ; na | |
258 ("}" . "N") ; Na | |
259 ("a" . "p") ; pa | |
260 ("A" . "a") ; Vowel a (not used in original TibKey) | |
261 ("s" . "ph") ; pha | |
262 ("d" . "b") ; ba | |
263 ("f" . "m") ; ma | |
264 ("F" . "M") ; anusvara | |
265 ("g" . "u") ; zhabs kyu | |
266 ("G" . "i") ; gi gu | |
267 ("H" . ",") ; viraama | |
268 ("j" . "o") ; naro | |
269 ("J" . "e") ; 'greng bu | |
270 ("k" . "ts") ; tsa | |
271 ("l" . "tsh") ; tsha | |
272 (";" . "dz") ; dza | |
273 ("'" . "w") ; wa | |
274 ("\"" . "+w") ; wa zur | |
275 ("z" . "zh") ; zha | |
276 ("x" . "z") ; za | |
277 ("c" . "'") ; 'a | |
278 ("C" . "+'") ; 'a chung | |
279 ("v" . "y") ; ya | |
280 ("V" . "+y") ; ya btags | |
281 ("b" . "r") ; ra | |
282 ("B" . "+r") ; ra btags | |
283 ("n" . "l") ; la | |
284 ("N" . "+l") ; la btags | |
285 ("m" . "sh") ; sha | |
286 ("M" . "SH") ; SHa | |
287 ("," . "s") ; sa | |
288 ("." . "h") ; ha | |
289 ("/" . "A") ; Aa | |
290 ;;subjoined | |
291 ("hq" . "+k") ; ka | |
292 ("hQ" ."+kSH") ; kSHa | |
293 ("hw" . "+kh") ; kha | |
294 ("he" . "+g") ; ga | |
295 ("hr" . "+ng") ; nga | |
296 ("ht" . "+c") ; ca | |
297 ("hy" . "+ch") ; cha | |
298 ("hu" . "+j") ; ja | |
299 ("hi" . "+ny") ; nya | |
300 ("ho" . "+t") ; ta | |
301 ("hO" . "+T") ; Ta | |
302 ("hp" . "+th") ; tha | |
303 ("hP" . "+TH") ; THa | |
304 ("h[" . "+d") ; da | |
305 ("h{" . "+D") ; Da | |
306 ("h]" . "+n") ; na | |
307 ("h}" . "+N") ; Na | |
308 ("ha" . "+p") ; pa | |
309 ("hs" . "+ph") ; pha | |
310 ("hd" . "+b") ; ba | |
311 ("hf" . "+m") ; ma | |
312 ("hk" . "+ts") ; tsa | |
313 ("hl" . "+tsh") ; tsha | |
314 ("h;" . "+dz") ; dza | |
315 ("h'" . "+w") ; wa | |
316 ("hz" . "+zh") ; zha | |
317 ("hx" . "+z") ; za | |
318 ("hc" . "+'") ; 'a | |
319 ("hv" . "+y") ; ya | |
320 ("hb" . "+r") ; ra | |
321 ("hn" . "+l") ; la | |
322 ("hm" . "+sh") ; sha | |
323 ("hM" . "+SH") ; SHa | |
324 ("h," . "+s") ; sa | |
325 ("h." . "+h") ; ha | |
326 ("h/" . "+A") ; Aa | |
327 )) | |
328 | |
329 (defun quail-tibetan-input-tibkey (key &rest ignore) | |
330 (let (trans pc) | |
331 (setq trans (cdr (assoc key tibetan-tibkey-to-transcription-alist))) | |
332 (quail-delete-region) | |
333 (quail-delete-overlays) | |
334 (setq pc (preceding-char)) | |
335 (if (not (eq (point) (point-min))) | |
336 (delete-backward-char 1 nil)) | |
337 (insert (tibetan-composition pc trans)) | |
338 (throw 'quail-tag nil))) | |
339 | |
340 | |
341 | |
342 (quail-define-package "tibetan-tibkey" "Tibetan" "TIBt" t | |
343 "Tibetan character input by TibKey key assignment. | |
344 | |
345 (This implementation is still incomplete. | |
346 Therefore, the following key assignment is a provisional one.) | |
347 | |
348 [NOT SHIFTED] | |
349 | |
350 +-------------------------------------------------------+ | |
351 |`$(7"d(B|1$(7!Q(B|2$(7!R(B|3$(7!S(B|4$(7!T(B|5$(7!U(B|6$(7!V(B|7$(7!W(B|8$(7!X(B|9$(7!Y(B|0$(7!P(B|- |= |\\$(7!8(B| | |
352 +-------------------------------------------------------+ | |
353 |q$(7"!(B|w$(7""(B|e$(7"#(B|r$(7"%(B|t$(7"&(B|y$(7"'(B|u$(7"((B|i$(7"*(B|o$(7"0(B|p$(7"1(B|[$(7"2(B|]$(7"4(B| | |
354 +-----------------------------------------------+ | |
355 |a$(7"5(B| s$(7"6(B| d$(7"7(B|f$(7"9(B|g$(7"U(B|h |j$(7"](B|k$(7":(B|l$(7";(B|;$(7"<(B|'$(7">(B| | |
356 +---------------------------------------------+ | |
357 |z$(7"?(B|x$(7"@(B|c$(7"A(B|v$(7"B(B|b$(7"C(B|n$(7"D(B|m$(7"E(B|,$(7"G(B|.$(7"H(B|/$(7"I(B| | |
358 +---------------------------------------+ | |
359 The key 'h' is used for consonant stacking. | |
360 | |
361 [SHIFTED] | |
362 | |
363 +----------------------------------------------------------+ | |
364 |~$(7"c(B|!2$(7#RP#S1(B|@$(7#S(B|# |$ |%$(8!D(B |^$(7!1(B|& |* |($(7!l(B|)$(7!m(B|_ |+$(7!A(B| |$(7!8(B| | |
365 +----------------------------------------------------------+ | |
366 |Q$(7"J(B|W$(7#T(B|E |R |T$(7"a(B|Y |U |I$(7"f(B|O$(7"+(B|P$(7",(B|{$(7"-(B|}$(7"/(B| | |
367 +-----------------------------------------------+ | |
368 |A |S |D |F$(7"_(B|G$(7"S(B|H$(7"e(B|J$(7"[(B|K |L |:$(7"`(B|\"$(7#>(B| | |
369 +-------------------------------------------+ | |
370 |Z |X |C$(7#A(B|V$(7#B(B|B$(7#C(B|N$(7#D(B|M$(7"F(B|< |> |?$(8!=(B | | |
371 +---------------------------------------+ | |
372 | |
373 DIFFERENCE FROM THE ORIGINAL TIBKEY: | |
374 | |
375 1. Vowel 'a' should be typed explicitly by the key 'A'. | |
376 This is really inconvenient. But to make the coding | |
377 scheme clear, it is desirable to have an explicite | |
378 vowel sign for 'a'. | |
379 2. Tsheg is assigned to SPC key. You can input a space | |
380 by typing '>'. | |
381 4. To avoid the default stacking $(7$B(B and to obtain $(7"#"B(B, | |
382 type 'E' instead of 'v' (=$(7"B(B). | |
383 3. There are many characters that are not supported in the | |
384 current implementation (especially special signs). I hope | |
385 I'll complete in a future revision. | |
386 " | |
387 nil t) | |
388 | |
389 (quail-define-rules | |
390 ("`" quail-tibetan-input-tibkey) ; sna ldan, not supported yet | |
391 ("~" quail-tibetan-input-tibkey) ; sna ldan + nada | |
392 ("1" ?$(7!Q(B) | |
393 ("!" tibetan-quail-nyi-zla) ; nyi zla long | |
394 ("2" ?$(7!R(B) | |
395 ("@" ?$(7#S(B) ; nyi zla simple | |
396 ("3" ?$(7!S(B) | |
397 ;;; ("#" ) | |
398 ("4" ?$(7!T(B) | |
399 ;;; ("$" ) | |
400 ("5" ?$(7!U(B) | |
401 ("%" ?$(8!D(B) | |
402 ("6" ?$(7!V(B) | |
403 ("^" ?$(7!1(B) | |
404 ("7" ?$(7!W(B) | |
405 ("8" ?$(7!X(B) | |
406 ;;; ("*" ) ; avagraha, not supported yet | |
407 ("9" ?$(7!Y(B) | |
408 ("(" ?$(7!l(B) | |
409 ("0" ?$(7!P(B) | |
410 (")" ?$(7!m(B) | |
411 ;;; ("-" ) ; enphatic, not yet supported | |
412 ;;; ("_" ) ; id. | |
413 ;;; ("=" ) ; special sign, not yet supported | |
414 ("+" ?$(8!A(B) | |
415 ("\\" ?$(8!?(B) | |
416 ("|" ?$(7!8(B) | |
417 ("q" quail-tibetan-input-tibkey) ; ka | |
418 ("Q" quail-tibetan-input-tibkey) ; kSHa | |
419 ("w" quail-tibetan-input-tibkey) ; kha | |
420 ("e" quail-tibetan-input-tibkey) ; ga | |
421 ("E" ?$(7"B(B) | |
422 ("r" quail-tibetan-input-tibkey) ; nga | |
423 ("t" quail-tibetan-input-tibkey) ; ca | |
424 ("T" quail-tibetan-input-tibkey) ; gi gu log | |
425 ("y" quail-tibetan-input-tibkey) ; cha | |
426 ("u" quail-tibetan-input-tibkey) ; ja | |
427 ("i" quail-tibetan-input-tibkey) ; nya | |
428 ("I" ?$(7"f(B) ; avagraha | |
429 ("o" quail-tibetan-input-tibkey) ; ta | |
430 ("O" quail-tibetan-input-tibkey) ; Ta | |
431 ("p" quail-tibetan-input-tibkey) ; tha | |
432 ("P" quail-tibetan-input-tibkey) ; THa | |
433 ("[" quail-tibetan-input-tibkey) ; da | |
434 ("{" quail-tibetan-input-tibkey) ; Da | |
435 ("]" quail-tibetan-input-tibkey) ; na | |
436 ("}" quail-tibetan-input-tibkey) ; Na | |
437 ("a" quail-tibetan-input-tibkey) ; pa | |
438 ("A" quail-tibetan-input-tibkey) ; Vowel sign a | |
439 ("s" quail-tibetan-input-tibkey) ; pha | |
440 ("d" quail-tibetan-input-tibkey) ; ba | |
441 ;;; ("D" ) ; special sign, not supported yet | |
442 ("f" quail-tibetan-input-tibkey) ; ma | |
443 ("F" quail-tibetan-input-tibkey) ; anusvara | |
444 ("g" quail-tibetan-input-tibkey) ; zhabs kyu | |
445 ("G" quail-tibetan-input-tibkey) ; gi gu | |
446 ("H" quail-tibetan-input-tibkey) ; viraama | |
447 ("j" quail-tibetan-input-tibkey) ; naro | |
448 ("J" quail-tibetan-input-tibkey) ; 'greng bu | |
449 ("k" quail-tibetan-input-tibkey);;tsa | |
450 ;;; ("K" ) ; tsadru, not supported yet | |
451 ("l" quail-tibetan-input-tibkey) ; tsha | |
452 (";" quail-tibetan-input-tibkey) ; dza | |
453 (":" ?$(8"`(B) | |
454 ("'" quail-tibetan-input-tibkey) ; wa | |
455 ("\"" quail-tibetan-input-tibkey) ; wa zur | |
456 ("z" quail-tibetan-input-tibkey) ; zha | |
457 ("x" quail-tibetan-input-tibkey) ; za | |
458 ("c" quail-tibetan-input-tibkey) ; 'a | |
459 ("C" quail-tibetan-input-tibkey) ; 'a chung | |
460 ("v" quail-tibetan-input-tibkey) ; ya | |
461 ("V" quail-tibetan-input-tibkey) ; ya btags | |
462 ("b" quail-tibetan-input-tibkey) ; ra | |
463 ("B" quail-tibetan-input-tibkey) ; ra btags | |
464 ("n" quail-tibetan-input-tibkey) ; la | |
465 ("N" quail-tibetan-input-tibkey) ; la btags | |
466 ("m" quail-tibetan-input-tibkey) ; sha | |
467 ("M" quail-tibetan-input-tibkey) ; SHa | |
468 ("," quail-tibetan-input-tibkey) ; sa | |
469 ("." quail-tibetan-input-tibkey) ; ha | |
470 ;;; (">" ?$(8!;(B) ; to be assigned to SPC | |
471 (">" ?\x20) | |
472 ("/" quail-tibetan-input-tibkey) ; Aa | |
473 ("?" ?$(8!=(B) | |
474 ("??" ?$(7!>(B) | |
475 ("????" tibetan-quail-bzhi-shad) | |
476 (" " ?$(8!;(B) | |
477 ;;subjoined | |
478 ("hq" quail-tibetan-input-tibkey) ; ka | |
479 ("hQ" quail-tibetan-input-tibkey) ; kSHa | |
480 ("hw" quail-tibetan-input-tibkey) ; kha | |
481 ("he" quail-tibetan-input-tibkey) ; ga | |
482 ("hr" quail-tibetan-input-tibkey) ; nga | |
483 ("ht" quail-tibetan-input-tibkey) ; ca | |
484 ("hy" quail-tibetan-input-tibkey) ; cha | |
485 ("hu" quail-tibetan-input-tibkey) ; ja | |
486 ("hi" quail-tibetan-input-tibkey) ; nya | |
487 ("ho" quail-tibetan-input-tibkey) ; ta | |
488 ("hO" quail-tibetan-input-tibkey) ; Ta | |
489 ("hp" quail-tibetan-input-tibkey) ; tha | |
490 ("hP" quail-tibetan-input-tibkey) ; THa | |
491 ("h[" quail-tibetan-input-tibkey) ; da | |
492 ("h{" quail-tibetan-input-tibkey) ; Da | |
493 ("h]" quail-tibetan-input-tibkey) ; na | |
494 ("h}" quail-tibetan-input-tibkey) ; Na | |
495 ("ha" quail-tibetan-input-tibkey) ; pa | |
496 ("hs" quail-tibetan-input-tibkey) ; pha | |
497 ("hd" quail-tibetan-input-tibkey) ; ba | |
498 ("hf" quail-tibetan-input-tibkey) ; ma | |
499 ("hk" quail-tibetan-input-tibkey) ; tsa | |
500 ("hl" quail-tibetan-input-tibkey) ; tsha | |
501 ("h;" quail-tibetan-input-tibkey) ; dza | |
502 ("h'" quail-tibetan-input-tibkey) ; wa | |
503 ("hz" quail-tibetan-input-tibkey) ; zha | |
504 ("hx" quail-tibetan-input-tibkey) ; za | |
505 ("hc" quail-tibetan-input-tibkey) ; 'a | |
506 ("hv" quail-tibetan-input-tibkey) ; ya | |
507 ("hb" quail-tibetan-input-tibkey) ; ra | |
508 ("hn" quail-tibetan-input-tibkey) ; la | |
509 ("hm" quail-tibetan-input-tibkey) ; sha | |
510 ("hM" quail-tibetan-input-tibkey) ; SHa | |
511 ("h," quail-tibetan-input-tibkey) ; sa | |
512 ("h." quail-tibetan-input-tibkey) ; ha | |
513 ("h/" quail-tibetan-input-tibkey) ; Aa | |
514 ) | |
515 | |
516 ;;; quail/tibetan.el ends here. | |
517 | |
518 | |
519 |