|
70
|
1 ;; Basic ZhuYin Translation Table for Egg+Takana+cWnn
|
|
|
2 ;; Coded by Hiroshi Kuribayashi (kuri@nff.ncl.omron.co.jp)
|
|
|
3
|
|
|
4 ;; (0A(B! (0B(B" (0C(B# (0D(B$ 5% 6& (0Q(B' (0b(B( (0c(B) (0d(B (0e$A!*(B (0f(B~ \|
|
|
|
5 ;; (0_(B (0](B (0g(B (0\(B (0J(B (0a(B (0i(B (0^(B (0[(B (0F(B @` $A!0!.(B
|
|
|
6 ;; (0Z(B (0Y(B (0I(B (0H(B (0P(B (0O(B (0V(B (0N(B (0L(B (0W$A#;(B (0X$A#:(B $A!1!/(B
|
|
|
7 ;; (0`(B (0h(B (0R(B (0M(B (0E(B (0K(B (0G(B (0S$A#,(B (0T$A!#(B (0U$A#?(B $A!"(B
|
|
|
8
|
|
|
9 (its-define-mode "zhuyin" "$AW"(B" t)
|
|
|
10
|
|
|
11 (let ((its:make-terminal-state 'its:make-terminal-state-hangul))
|
|
|
12
|
|
|
13 (its-defrule "b" "(0E(B") ;;; B
|
|
|
14 (its-defrule "p" "(0F(B") ;;; P
|
|
|
15 (its-defrule "m" "(0G(B") ;;; M
|
|
|
16 (its-defrule "f" "(0H(B") ;;; F
|
|
|
17
|
|
|
18 (its-defrule "d" "(0I(B") ;;; D
|
|
|
19 (its-defrule "t" "(0J(B") ;;; T
|
|
|
20 (its-defrule "n" "(0K(B") ;;; N
|
|
|
21 (its-defrule "l" "(0L(B") ;;; L
|
|
|
22
|
|
|
23 (its-defrule "v" "(0M(B") ;;; G
|
|
|
24 (its-defrule "k" "(0N(B") ;;; K
|
|
|
25 (its-defrule "h" "(0O(B") ;;; H
|
|
|
26
|
|
|
27 (its-defrule "g" "(0P(B") ;;; J
|
|
|
28 (its-defrule "7" "(0Q(B") ;;; Q
|
|
|
29 (its-defrule "c" "(0R(B") ;;; X
|
|
|
30
|
|
|
31 (its-defrule "," "(0S(B") ;;; Zh
|
|
|
32 (its-defrule "." "(0T(B") ;;; Ch
|
|
|
33 (its-defrule "/" "(0U(B") ;;; Sh
|
|
|
34 (its-defrule "j" "(0V(B") ;;; R
|
|
|
35
|
|
|
36 (its-defrule ";" "(0W(B") ;;; Z
|
|
|
37 (its-defrule ":" "(0X(B") ;;; C
|
|
|
38 (its-defrule "s" "(0Y(B") ;;; S
|
|
|
39
|
|
|
40 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
|
|
|
41 (its-defrule "a" "(0Z@(B") ;;; a
|
|
|
42 (its-defrule "a1" "(0ZA(B")
|
|
|
43 (its-defrule "a2" "(0ZB(B")
|
|
|
44 (its-defrule "a3" "(0ZC(B")
|
|
|
45 (its-defrule "a4" "(0ZD(B")
|
|
|
46
|
|
|
47 (its-defrule "i" "(0^@(B") ;;; ai
|
|
|
48 (its-defrule "i1" "(0^A(B")
|
|
|
49 (its-defrule "i2" "(0^B(B")
|
|
|
50 (its-defrule "i3" "(0^C(B")
|
|
|
51 (its-defrule "i4" "(0^D(B")
|
|
|
52
|
|
|
53 (its-defrule "8" "(0b@(B") ;;; an
|
|
|
54 (its-defrule "81" "(0bA(B")
|
|
|
55 (its-defrule "82" "(0bB(B")
|
|
|
56 (its-defrule "83" "(0bC(B")
|
|
|
57 (its-defrule "84" "(0bD(B")
|
|
|
58
|
|
|
59 (its-defrule "0" "(0d@(B") ;;; ang
|
|
|
60 (its-defrule "01" "(0dA(B")
|
|
|
61 (its-defrule "02" "(0dB(B")
|
|
|
62 (its-defrule "03" "(0dC(B")
|
|
|
63 (its-defrule "04" "(0dD(B")
|
|
|
64
|
|
|
65 (its-defrule "z" "(0`@(B") ;;; ao
|
|
|
66 (its-defrule "z1" "(0`A(B")
|
|
|
67 (its-defrule "z2" "(0`B(B")
|
|
|
68 (its-defrule "z3" "(0`C(B")
|
|
|
69 (its-defrule "z4" "(0`D(B")
|
|
|
70
|
|
|
71 (its-defrule "r" "(0\@(B") ;;; e
|
|
|
72 (its-defrule "r1" "(0\A(B")
|
|
|
73 (its-defrule "r2" "(0\B(B")
|
|
|
74 (its-defrule "r3" "(0\C(B")
|
|
|
75 (its-defrule "r4" "(0\D(B")
|
|
|
76
|
|
|
77 (its-defrule "w" "(0]@(B") ;;; (0:(B
|
|
|
78 (its-defrule "w1" "(0]A(B")
|
|
|
79 (its-defrule "w2" "(0]B(B")
|
|
|
80 (its-defrule "w3" "(0]C(B")
|
|
|
81 (its-defrule "w4" "(0]D(B")
|
|
|
82
|
|
|
83 (its-defrule "q" "(0_@(B") ;;; ei
|
|
|
84 (its-defrule "q1" "(0_A(B")
|
|
|
85 (its-defrule "q2" "(0_B(B")
|
|
|
86 (its-defrule "q3" "(0_C(B")
|
|
|
87 (its-defrule "q4" "(0_D(B")
|
|
|
88
|
|
|
89 (its-defrule "9" "(0c@(B") ;;; en
|
|
|
90 (its-defrule "91" "(0cA(B")
|
|
|
91 (its-defrule "92" "(0cB(B")
|
|
|
92 (its-defrule "93" "(0cC(B")
|
|
|
93 (its-defrule "94" "(0cD(B")
|
|
|
94
|
|
|
95 (its-defrule "-" "(0e@(B") ;;; eng
|
|
|
96 (its-defrule "-1" "(0eA(B")
|
|
|
97 (its-defrule "-2" "(0eB(B")
|
|
|
98 (its-defrule "-3" "(0eC(B")
|
|
|
99 (its-defrule "-4" "(0eD(B")
|
|
|
100
|
|
|
101 (its-defrule "o" "(0[@(B") ;;; o
|
|
|
102 (its-defrule "o1" "(0[A(B")
|
|
|
103 (its-defrule "o2" "(0[B(B")
|
|
|
104 (its-defrule "o3" "(0[C(B")
|
|
|
105 (its-defrule "o4" "(0[D(B")
|
|
|
106
|
|
|
107 (its-defrule "y" "(0a@(B") ;;; ou
|
|
|
108 (its-defrule "y1" "(0aA(B")
|
|
|
109 (its-defrule "y2" "(0aB(B")
|
|
|
110 (its-defrule "y3" "(0aC(B")
|
|
|
111 (its-defrule "y4" "(0aD(B")
|
|
|
112
|
|
|
113 (its-defrule "^" "(0f@(B") ;;; er
|
|
|
114 (its-defrule "^1" "(0fA(B")
|
|
|
115 (its-defrule "^2" "(0fB(B")
|
|
|
116 (its-defrule "^3" "(0fC(B")
|
|
|
117 (its-defrule "^4" "(0fD(B")
|
|
|
118
|
|
|
119 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
|
|
|
120 (its-defrule "e" "(0g@(B") ;;; i
|
|
|
121 (its-defrule "e1" "(0gA(B")
|
|
|
122 (its-defrule "e2" "(0gB(B")
|
|
|
123 (its-defrule "e3" "(0gC(B")
|
|
|
124 (its-defrule "e4" "(0gD(B")
|
|
|
125
|
|
|
126 (its-defrule "ea" "(0gZ@(B") ;;; ia
|
|
|
127 (its-defrule "ea1" "(0gZA(B")
|
|
|
128 (its-defrule "ea2" "(0gZB(B")
|
|
|
129 (its-defrule "ea3" "(0gZC(B")
|
|
|
130 (its-defrule "ea4" "(0gZD(B")
|
|
|
131
|
|
|
132 (its-defrule "e8" "(0gb@(B") ;;; ian
|
|
|
133 (its-defrule "e81" "(0gbA(B")
|
|
|
134 (its-defrule "e82" "(0gbB(B")
|
|
|
135 (its-defrule "e83" "(0gbC(B")
|
|
|
136 (its-defrule "e84" "(0gbD(B")
|
|
|
137
|
|
|
138 (its-defrule "e0" "(0gd@(B") ;;; iang
|
|
|
139 (its-defrule "e01" "(0gdA(B")
|
|
|
140 (its-defrule "e02" "(0gdB(B")
|
|
|
141 (its-defrule "e03" "(0gdC(B")
|
|
|
142 (its-defrule "e04" "(0gdD(B")
|
|
|
143
|
|
|
144 (its-defrule "ez" "(0g`@(B") ;;; iao
|
|
|
145 (its-defrule "ez1" "(0g`A(B")
|
|
|
146 (its-defrule "ez2" "(0g`B(B")
|
|
|
147 (its-defrule "ez3" "(0g`C(B")
|
|
|
148 (its-defrule "ez4" "(0g`D(B")
|
|
|
149
|
|
|
150 (its-defrule "ew" "(0g]@(B") ;;; ie
|
|
|
151 (its-defrule "ew1" "(0g]A(B")
|
|
|
152 (its-defrule "ew2" "(0g]B(B")
|
|
|
153 (its-defrule "ew3" "(0g]C(B")
|
|
|
154 (its-defrule "ew4" "(0g]D(B")
|
|
|
155
|
|
|
156 (its-defrule "e9" "(0gc@(B") ;;; in
|
|
|
157 (its-defrule "e91" "(0gcA(B")
|
|
|
158 (its-defrule "e92" "(0gcB(B")
|
|
|
159 (its-defrule "e93" "(0gcC(B")
|
|
|
160 (its-defrule "e94" "(0gcD(B")
|
|
|
161
|
|
|
162 (its-defrule "e-" "(0ge@(B") ;;; ing
|
|
|
163 (its-defrule "e-1" "(0geA(B")
|
|
|
164 (its-defrule "e-2" "(0geB(B")
|
|
|
165 (its-defrule "e-3" "(0geC(B")
|
|
|
166 (its-defrule "e-4" "(0geD(B")
|
|
|
167
|
|
|
168 (its-defrule "u-" "(0ie@(B") ;;; iong
|
|
|
169 (its-defrule "u-1" "(0ieA(B")
|
|
|
170 (its-defrule "u-2" "(0ieB(B")
|
|
|
171 (its-defrule "u-3" "(0ieC(B")
|
|
|
172 (its-defrule "u-4" "(0ieD(B")
|
|
|
173
|
|
|
174 (its-defrule "ey" "(0ga@(B") ;;; iou
|
|
|
175 (its-defrule "ey1" "(0gaA(B")
|
|
|
176 (its-defrule "ey2" "(0gaB(B")
|
|
|
177 (its-defrule "ey3" "(0gaC(B")
|
|
|
178 (its-defrule "ey4" "(0gaD(B")
|
|
|
179
|
|
|
180 (its-defrule "x-" "(0he@(B") ;;; ong
|
|
|
181 (its-defrule "x-1" "(0heA(B")
|
|
|
182 (its-defrule "x-2" "(0heB(B")
|
|
|
183 (its-defrule "x-3" "(0heC(B")
|
|
|
184 (its-defrule "x-4" "(0heD(B")
|
|
|
185
|
|
|
186 (its-defrule "x" "(0h@(B") ;;; u
|
|
|
187 (its-defrule "x1" "(0hA(B")
|
|
|
188 (its-defrule "x2" "(0hB(B")
|
|
|
189 (its-defrule "x3" "(0hC(B")
|
|
|
190 (its-defrule "x4" "(0hD(B")
|
|
|
191
|
|
|
192 (its-defrule "xa" "(0hZ@(B") ;;; ua
|
|
|
193 (its-defrule "xa1" "(0hZA(B")
|
|
|
194 (its-defrule "xa2" "(0hZB(B")
|
|
|
195 (its-defrule "xa3" "(0hZC(B")
|
|
|
196 (its-defrule "xa4" "(0hZD(B")
|
|
|
197
|
|
|
198 (its-defrule "xi" "(0h^@(B") ;;; uai
|
|
|
199 (its-defrule "xi1" "(0h^A(B")
|
|
|
200 (its-defrule "xi2" "(0h^B(B")
|
|
|
201 (its-defrule "xi3" "(0h^C(B")
|
|
|
202 (its-defrule "xi4" "(0h^D(B")
|
|
|
203
|
|
|
204 (its-defrule "x8" "(0hb@(B") ;;; uan
|
|
|
205 (its-defrule "x81" "(0hbA(B")
|
|
|
206 (its-defrule "x82" "(0hbB(B")
|
|
|
207 (its-defrule "x83" "(0hbC(B")
|
|
|
208 (its-defrule "x84" "(0hbD(B")
|
|
|
209
|
|
|
210 (its-defrule "x0" "(0hd@(B") ;;; uang
|
|
|
211 (its-defrule "x01" "(0hdA(B")
|
|
|
212 (its-defrule "x02" "(0hdB(B")
|
|
|
213 (its-defrule "x03" "(0hdC(B")
|
|
|
214 (its-defrule "x04" "(0hdD(B")
|
|
|
215
|
|
|
216 (its-defrule "xq" "(0h_@(B") ;;; uei
|
|
|
217 (its-defrule "xq1" "(0h_A(B")
|
|
|
218 (its-defrule "xq2" "(0h_B(B")
|
|
|
219 (its-defrule "xq3" "(0h_C(B")
|
|
|
220 (its-defrule "xq4" "(0h_D(B")
|
|
|
221
|
|
|
222 (its-defrule "x9" "(0hc@(B") ;;; uen
|
|
|
223 (its-defrule "x91" "(0hcA(B")
|
|
|
224 (its-defrule "x92" "(0hcB(B")
|
|
|
225 (its-defrule "x93" "(0hcC(B")
|
|
|
226 (its-defrule "x94" "(0hcD(B")
|
|
|
227
|
|
|
228 (its-defrule "xo" "(0h[@(B") ;;; uo
|
|
|
229 (its-defrule "xo1" "(0h[A(B")
|
|
|
230 (its-defrule "xo2" "(0h[B(B")
|
|
|
231 (its-defrule "xo3" "(0h[C(B")
|
|
|
232 (its-defrule "xo4" "(0h[D(B")
|
|
|
233
|
|
|
234 (its-defrule "u" "(0i@(B") ;;; (09(B
|
|
|
235 (its-defrule "u1" "(0iA(B")
|
|
|
236 (its-defrule "u2" "(0iB(B")
|
|
|
237 (its-defrule "u3" "(0iC(B")
|
|
|
238 (its-defrule "u4" "(0iD(B")
|
|
|
239
|
|
|
240 (its-defrule "u8" "(0ib@(B") ;;; (09(Ban
|
|
|
241 (its-defrule "u81" "(0ibA(B")
|
|
|
242 (its-defrule "u82" "(0ibB(B")
|
|
|
243 (its-defrule "u83" "(0ibC(B")
|
|
|
244 (its-defrule "u84" "(0ibD(B")
|
|
|
245
|
|
|
246 (its-defrule "uw" "(0i]@(B") ;;; (09(Be
|
|
|
247 (its-defrule "uw1" "(0i]A(B")
|
|
|
248 (its-defrule "uw2" "(0i]B(B")
|
|
|
249 (its-defrule "uw3" "(0i]C(B")
|
|
|
250 (its-defrule "uw4" "(0i]D(B")
|
|
|
251
|
|
|
252 (its-defrule "u9" "(0ic@(B") ;;; (09(Bn
|
|
|
253 (its-defrule "u91" "(0icA(B")
|
|
|
254 (its-defrule "u92" "(0icB(B")
|
|
|
255 (its-defrule "u93" "(0icC(B")
|
|
|
256 (its-defrule "u94" "(0icD(B")
|
|
|
257
|
|
|
258 ;;(its-defrule "ei" "(0g^@(B") ;;; iai
|
|
|
259 ;;(its-defrule "ei1" "(0g^A(B")
|
|
|
260 ;;(its-defrule "ei2" "(0g^B(B")
|
|
|
261 ;;(its-defrule "ei3" "(0g^C(B")
|
|
|
262 ;;(its-defrule "ei4" "(0g^D(B")
|
|
|
263
|
|
|
264 ;;(its-defrule "eo" "(0g[@(B") ;;; io
|
|
|
265 ;;(its-defrule "eo1" "(0g[A(B")
|
|
|
266 ;;(its-defrule "eo2" "(0g[B(B")
|
|
|
267 ;;(its-defrule "eo3" "(0g[C(B")
|
|
|
268 ;;(its-defrule "eo4" "(0g[D(B")
|
|
|
269
|
|
|
270 (its-defrule "m1" "(0GA(B") ;;; M
|
|
|
271 (its-defrule "hm" "(0OGA(B") ;;; Hm
|
|
|
272 (its-defrule "h@" "(0O(B@(0A(B") ;;; Hng
|
|
|
273 (its-defrule "@1" "@(0A(B") ;;; Ng
|
|
|
274 (its-defrule "n1" "(0KA(B") ;;; N
|
|
|
275
|
|
|
276 (its-defrule "<" "$A#,(B")
|
|
|
277 (its-defrule ">" "$A!#(B")
|
|
|
278 (its-defrule "+" "$A#;(B")
|
|
|
279 (its-defrule "*" "$A#:(B")
|
|
|
280 (its-defrule "?" "$A#?(B")
|
|
|
281 (its-defrule "_" "$A!"(B")
|
|
|
282 (its-defrule "!" "$A#!(B")
|
|
|
283 (its-defrule "[" "$A!0(B")
|
|
|
284 (its-defrule "]" "$A!1(B")
|
|
|
285 (its-defrule "{" "$A!.(B")
|
|
|
286 (its-defrule "}" "$A!/(B")
|
|
|
287 (its-defrule "=" "$A!*(B")
|
|
|
288
|
|
|
289 )
|
