Commit | Line | Data |
---|---|---|
be567141 | 1 | ;;; symbol-ksc.el --- Quail-package for Korean Symbol (KSC5601) |
24b31c88 KH |
2 | |
3 | ;; Copyright (C) 1997 Electrotechnical Laboratory, JAPAN. | |
4 | ;; Licensed to the Free Software Foundation. | |
5 | ||
6 | ;; Keywords: multilingual, input method, Korean, Hangul | |
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 | ;;; 94.10.24 Written for Mule Ver.2.0 (koaunghi.un@zdv.uni-tuebingen.de) | |
26 | ;;; 94.11.04 Updated for Mule Ver.2.1 (koaunghi.un@zdv.uni-tuebingen.de) | |
27 | ;;; 96.09.23 Updated for emacs-19.33-beta (koaunghi.un@zdv.uni-tuebingen.de) | |
28 | ||
be567141 | 29 | ;;; Commentary: |
24b31c88 KH |
30 | |
31 | ;;; Code: | |
32 | ||
33 | (require 'quail) | |
d71da2a6 | 34 | (require 'korea-util) |
24b31c88 KH |
35 | |
36 | (quail-define-package | |
d71da2a6 | 37 | "korean-symbol" "Korean" "\e$(C=I9z\e(B" t |
24b31c88 KH |
38 | "\e$(CGQ1[=I9z@T7BG%\e(B: |
39 | \e$(C!<\e(B(\e$(C!=0}H#?-1b!<\e(Barrow\e$(C!=H-;l!<\e(Bsex\e$(C!=!N!O!<\e(Bindex\e$(C!=C7@Z\e(B \e$(C!<\e(Baccent\e$(C!=>G<>F.\e(B | |
40 | \e$(C!<\e(B)\e$(C!=0}H#4]1b!<\e(Bmusic\e$(C!=@=>G!<\e(Bdot\e$(C!=A!\e(B \e$(C!<\e(Bquote\e$(C!=5{?HG%!<\e(Bxtext\e$(C!=!W!X"R"."/\e(B | |
41 | \e$(C!<\e(BUnit\e$(C!=!I!J!K"5!<\e(Bmath\e$(C!=<vGP1bH#!<\e(Bpic\e$(C!=;sG|9.@Z!<\e(Bline\e$(C!=<19.@Z\e(B | |
42 | \e$(C!<\e(Bunit\e$(C!=4\@'\e(B \e$(C!<\e(Bfrac\e$(C!=:P<v\e(B \e$(C!<\e(Btextline\e$(C!=!)!*!+!,!-\e(B | |
43 | \e$(C!<\e(Bwn\e$(C!="_!<\e(Bks\e$(C!="^!<\e(BNo\e$(C!="`!<"a!="a\e(B \e$(C!<\e(Bdag\e$(C!="S\e(B \e$(C!<\e(Bddag\e$(C!="T!<\e(Bpercent\e$(C!="6\e(B | |
44 | \e$(C!<\e(Bam\e$(C!="c!<\e(Bpm\e$(C!="d!<"b!="b!<\e(BTel\e$(C!="e!<\e(Bwon\e$(C!=#\\e(B \e$(C!<\e(Byen\e$(C!=!M\e(B \e$(C!<\e(Bpound\e$(C!=!L\e(B | |
45 | \e$(C!<\e(BEng\e$(C!=#A#B#C!&\e(B \e$(C!<\e(Benum\e$(C!=#0#1#2!&\e(B \e$(C!<\e(BRuss\e$(C!=,",#,$!&!<\e(BGreek\e$(C!=%A%B%C!&\e(B | |
46 | \e$(C!<\e(Beng\e$(C!=#a#b#c!&\e(B \e$(C!<\e(Beasc\e$(C!=?5>n\e(BASCII\e$(C!<\e(Bruss\e$(C!=,Q,R,S!&!<\e(Bgreek\e$(C!=%a%b%c!&\e(B | |
47 | \e$(C!<\e(BRom\e$(C!=%0%1%2!&\e(B \e$(C!<\e(BScan\e$(C!=("(#($!&\e(B \e$(C!<\e(Bhira\e$(C!=*"*#*$\e(B | |
48 | \e$(C!<\e(Brom\e$(C!=%!%"%#!&\e(B \e$(C!<\e(Bscan\e$(C!=)")#)$!&\e(B \e$(C!<\e(Bkata\e$(C!=+"+#+$\e(B | |
49 | \e$(C!<\e(Bojaso\e$(C!=(1!-(>!<\e(Bpjaso\e$(C!=)1!-)>!<\e(Boeng\e$(C!=(M!-(f!<\e(Bpeng\e$(C!=)M!-)f\e(B | |
50 | \e$(C!<\e(Bogana\e$(C!=(?!-(L!<\e(Bpgana\e$(C!=)?!-)L!<\e(Bonum\e$(C!=(g!-(u!<\e(Bpnum\e$(C!=)g!-)u\e(B | |
20b5aff9 | 51 | \e$(C!<@Z<R!=\e(B2\e$(C9z=D\e(B + \e$(C$U\e(B(S) \e$(C$o\e(B(t_) \e$(C$q\e(B(D) \e$(C$p\e(B(DD) \e$(C$a\e(B(aD) \e$(C$v\e(B(_d) \e$(C$u\e(B(G) \e$(C$}\e(B(uk)") |
24b31c88 KH |
52 | |
53 | (quail-define-rules | |
24b31c88 KH |
54 | ("(" "\e$(C!2!4!6!8!:!<\e(B") |
55 | (")" "\e$(C!3!5!7!9!;!=\e(B") | |
56 | ("math" "\e$(C!>!?!@!A!B!C!D!E!P!Q!R!S!T!U!V!k!l!m!n!o!p!q!r!s!t!u!v!w!x!y!z!{!|!}!~"""#"$"1"2"3\e(B") | |
57 | ("pic" "\e$(C!Y![!Z!\!]!^!_!`!a!b!c!d!e"7"8"9":";"<"=">"?"@"A"B"C"D"E"F"G"H"I"J"K"L"M"N"O"P"Q"4\e(B") | |
58 | ("arrow" "\e$(C!f!g!h!i!j"U"V"W"X"Y\e(B") | |
59 | ("music" "\e$(C"["Z"\"]\e(B") | |
60 | ("won" "\e$(C#\\e(B") | |
61 | ("yen" "\e$(C!M\e(B") | |
62 | ("pound" "\e$(C!L\e(B") | |
63 | ("xtext" "\e$(C!W!X"R"."/\e(B") | |
64 | ("dot" "\e$(C!$!%!&!'"0\e(B") | |
65 | ("quote" "\e$(C!"!#!(!.!/!0!1!F!G!H"%")\e(B") | |
66 | ("textline" "\e$(C!)!*!+!,!-\e(B") | |
67 | ("Unit" "\e$(C!I!J!K"5\e(B") | |
68 | ("sex" "\e$(C!N!O\e(B") | |
69 | ("accent" "\e$(C"&"'"("*"+","-\e(B") | |
70 | ("percent" "\e$(C"6\e(B") | |
71 | ("dag" "\e$(C"S\e(B") | |
72 | ("ddag" "\e$(C"T\e(B") | |
73 | ("wn" "\e$(C"_\e(B") | |
74 | ("ks" "\e$(C"^\e(B") | |
75 | ("No" "\e$(C"`\e(B") | |
76 | ("Co" "\e$(C"a\e(B") | |
77 | ("TM" "\e$(C"b\e(B") | |
78 | ("am" "\e$(C"c\e(B") | |
79 | ("pm" "\e$(C"d\e(B") | |
80 | ("Tel" "\e$(C"e\e(B") | |
81 | ("easc" "\e$(C#"###$#%#&#'#(#)#*#+#,#-#.#/#:#;#<#=#>#?#@#[#]#^#_#`#{#|#}#~\e(B") | |
82 | ("enum" "\e$(C#0#1#2#3#4#5#6#7#8#9\e(B") | |
83 | ("Eng" "\e$(C#A#B#C#D#E#F#G#H#I#J#K#L#M#N#O#P#Q#R#S#T#U#V#W#X#Y#Z\e(B") | |
84 | ("eng" "\e$(C#a#b#c#d#e#f#g#h#i#j#k#l#m#n#o#p#q#r#s#t#u#v#w#x#y#z\e(B") | |
85 | ("r" "\e$(C$!\e(B") | |
86 | ("R" "\e$(C$"\e(B") | |
87 | ("rt" "\e$(C$#\e(B") | |
88 | ("s" "\e$(C$$\e(B") | |
89 | ("sw" "\e$(C$%\e(B") | |
90 | ("sg" "\e$(C$&\e(B") | |
91 | ("e" "\e$(C$'\e(B") | |
92 | ("E" "\e$(C$(\e(B") | |
93 | ("f" "\e$(C$)\e(B") | |
94 | ("fr" "\e$(C$*\e(B") | |
95 | ("fa" "\e$(C$+\e(B") | |
96 | ("fq" "\e$(C$,\e(B") | |
97 | ("ft" "\e$(C$-\e(B") | |
98 | ("fx" "\e$(C$.\e(B") | |
99 | ("fv" "\e$(C$/\e(B") | |
100 | ("fg" "\e$(C$0\e(B") | |
101 | ("a" "\e$(C$1\e(B") | |
102 | ("q" "\e$(C$2\e(B") | |
103 | ("Q" "\e$(C$3\e(B") | |
104 | ("qt" "\e$(C$4\e(B") | |
105 | ("t" "\e$(C$5\e(B") | |
106 | ("T" "\e$(C$6\e(B") | |
107 | ("d" "\e$(C$7\e(B") | |
108 | ("w" "\e$(C$8\e(B") | |
109 | ("W" "\e$(C$9\e(B") | |
110 | ("c" "\e$(C$:\e(B") | |
111 | ("z" "\e$(C$;\e(B") | |
112 | ("x" "\e$(C$<\e(B") | |
113 | ("v" "\e$(C$=\e(B") | |
114 | ("g" "\e$(C$>\e(B") | |
115 | ("k" "\e$(C$?\e(B") | |
116 | ("o" "\e$(C$@\e(B") | |
117 | ("i" "\e$(C$A\e(B") | |
20b5aff9 | 118 | ("O" "\e$(C$B\e(B") |
24b31c88 KH |
119 | ("j" "\e$(C$C\e(B") |
120 | ("p" "\e$(C$D\e(B") | |
121 | ("u" "\e$(C$E\e(B") | |
122 | ("P" "\e$(C$F\e(B") | |
123 | ("h" "\e$(C$G\e(B") | |
124 | ("hk" "\e$(C$H\e(B") | |
125 | ("ho" "\e$(C$I\e(B") | |
126 | ("hl" "\e$(C$J\e(B") | |
127 | ("y" "\e$(C$K\e(B") | |
128 | ("n" "\e$(C$L\e(B") | |
20b5aff9 | 129 | ("nj" "\e$(C$M\e(B") |
24b31c88 KH |
130 | ("np" "\e$(C$N\e(B") |
131 | ("nl" "\e$(C$O\e(B") | |
132 | ("b" "\e$(C$P\e(B") | |
133 | ("m" "\e$(C$Q\e(B") | |
134 | ("ml" "\e$(C$R\e(B") | |
135 | ("l" "\e$(C$S\e(B") | |
136 | ("S" "\e$(C$U\e(B") | |
137 | ("se" "\e$(C$V\e(B") | |
138 | ("st" "\e$(C$W\e(B") | |
139 | ("st_" "\e$(C$X\e(B") | |
140 | ("frt" "\e$(C$Y\e(B") | |
141 | ("fqt" "\e$(C$[\e(B") | |
142 | ("fe" "\e$(C$Z\e(B") | |
143 | ("ft_" "\e$(C$\\e(B") | |
20b5aff9 | 144 | ("f_d" "\e$(C$]\e(B") |
24b31c88 KH |
145 | ("aq" "\e$(C$^\e(B") |
146 | ("at" "\e$(C$_\e(B") | |
147 | ("at_" "\e$(C$`\e(B") | |
148 | ("aD" "\e$(C$a\e(B") | |
149 | ("qr" "\e$(C$b\e(B") | |
150 | ("qe" "\e$(C$c\e(B") | |
151 | ("qtr" "\e$(C$d\e(B") | |
152 | ("qte" "\e$(C$e\e(B") | |
153 | ("qw" "\e$(C$f\e(B") | |
154 | ("qx" "\e$(C$g\e(B") | |
155 | ("qD" "\e$(C$h\e(B") | |
156 | ("QD" "\e$(C$i\e(B") | |
157 | ("tr" "\e$(C$j\e(B") | |
158 | ("ts" "\e$(C$k\e(B") | |
159 | ("te" "\e$(C$l\e(B") | |
160 | ("tq" "\e$(C$m\e(B") | |
161 | ("tw" "\e$(C$n\e(B") | |
162 | ("t_" "\e$(C$o\e(B") | |
163 | ("DD" "\e$(C$p\e(B") | |
164 | ("D" "\e$(C$q\e(B") | |
20b5aff9 | 165 | ("Dt" "\e$(C$r\e(B") |
24b31c88 KH |
166 | ("Dt_" "\e$(C$s\e(B") |
167 | ("vD" "\e$(C$t\e(B") | |
20b5aff9 KH |
168 | ("G" "\e$(C$u\e(B") |
169 | ("_d" "\e$(C$v\e(B") | |
24b31c88 KH |
170 | ("yi" "\e$(C$w\e(B") |
171 | ("yO" "\e$(C$x\e(B") | |
172 | ("yl" "\e$(C$y\e(B") | |
173 | ("bu" "\e$(C$z\e(B") | |
174 | ("bP" "\e$(C${\e(B") | |
175 | ("bl" "\e$(C$|\e(B") | |
176 | ("uk" "\e$(C$}\e(B") | |
177 | ("ukl" "\e$(C$~\e(B") | |
178 | ("Rom" "\e$(C%0%1%2%3%4%5%6%7%8%9\e(B") | |
179 | ("rom" "\e$(C%!%"%#%$%%%&%'%(%)%*\e(B") | |
180 | ("Greek" "\e$(C%A%B%C%D%E%F%G%H%I%J%K%L%M%N%O%P%Q%R%S%T%U%V%W%X\e(B") | |
181 | ("greek" "\e$(C%a%b%c%d%e%f%g%h%i%j%k%l%m%n%o%p%q%r%s%t%u%v%w%x\e(B") | |
182 | ("line" "\e$(C&"&#&$&%&&&'&(&)&*&+&,&-&.&/&0&1&2&3&4&5&6&7&8&9&:&;&<&=&>&?&@&A&B&C&D&E&F&G&H&I&J&K&L&M&N&O&P&Q&R&S&T&U&V&W&X&Y&[&Z&\&]&^&_&`&a&b&c&d\e(B") | |
183 | ("unit" "\e$(C'"'#'$'%'&'''(')'*'+','-'.'/'0'1'2'3'4'5'6'7'8'9':';'<'='>'?'@'A'B'C'D'E'F'G'H'I'J'K'L'M'N'O'P'Q'R'S'T'U'V'W'X'Y'['Z'\']'^'_'`'a'b'c'd'e'f'g'h'i'j'k'l'm'n'o\e(B") | |
184 | ("Scan" "\e$(C("(#($(&((()(*(+(,(-(.(/\e(B") | |
185 | ("ojaso" "\e$(C(1(2(3(4(5(6(7(8(9(:(;(<(=(>\e(B") | |
186 | ("ogana" "\e$(C(?(@(A(B(C(D(E(F(G(H(I(J(K(L\e(B") | |
187 | ("oeng" "\e$(C(M(N(O(P(Q(R(S(T(U(V(W(X(Y(Z([(\(](^(_(`(a(b(c(d(e(f\e(B") | |
188 | ("onum" "\e$(C(g(h(i(j(k(l(m(n(o(p(q(r(s(t(u\e(B") | |
189 | ("frac" "\e$(C(v(w(x(y(z({(|(}(~\e(B") | |
190 | ("scan" "\e$(C)")#)$)%)&)')()))*)+),)-).)/)0\e(B") | |
191 | ("pjaso" "\e$(C)1)2)3)4)5)6)7)8)9):);)<)=)>\e(B>") | |
192 | ("pgana" "\e$(C)?)@)A)B)C)D)E)F)G)H)I)J)K)L\e(B") | |
193 | ("peng" "\e$(C)M)N)O)P)Q)R)S)T)U)V)W)X)Y)Z)[)\)])^)_)`)a)b)c)d)e)f\e(B") | |
194 | ("pnum" "\e$(C)g)h)i)j)k)l)m)n)o)p)q)r)s)t)u\e(B") | |
195 | ("index" "\e$(C)v)w)x)y)z){)|)})~\e(B") | |
196 | ("hira" "\e$(C*"*#*$*%*&*'*(*)***+*,*-*.*/*0*1*2*3*4*5*6*7*8*9*:*;*<*=*>*?*@*A*B*C*D*E*F*G*H*I*J*K*L*M*N*O*P*Q*R*S*T*U*V*W*X*Y*[*Z*\*]*^*_*`*a*b*c*d*e*f*g*h*i*j*k*l*m*n*o*p*q*r*s\e(B") | |
197 | ("kata" "\e$(C+"+#+$+%+&+'+(+)+*+++,+-+.+/+0+1+2+3+4+5+6+7+8+9+:+;+<+=+>+?+@+A+B+C+D+E+F+G+H+I+J+K+L+M+N+O+P+Q+R+S+T+U+V+W+X+Y+[+Z+\+]+^+_+`+a+b+c+d+e+f+g+h+i+j+k+l+m+n+o+p+q+r+s+t+u+v\e(B") | |
198 | ("Russ" "\e$(C,",#,$,%,&,',(,),*,+,,,-,.,/,0,1,2,3,4,5,6,7,8,9,:,;,<,=,>,?,@,A\e(B") | |
199 | ("russ" "\e$(C,Q,R,S,T,U,V,W,X,Y,[,Z,\,],^,_,`,a,b,c,d,e,f,g,h,i,j,k,l,m,n,o,p,q\e(B")) | |
be567141 PJ |
200 | |
201 | ;;; symbol-ksc.el ends here |