70
|
1 ;; Copyright (C) 1992,1994 Free Software Foundation, Inc.
|
|
2 ;; This file is part of Mule (MULtilingual Enhancement of GNU Emacs).
|
|
3 ;; This file contains Korean symbol characters from KSC5601 code table
|
|
4 ;; for use in Korean documents.
|
|
5
|
|
6 ;; Mule is free software distributed in the form of patches to GNU Emacs.
|
|
7 ;; You can redistribute it and/or modify
|
|
8 ;; it under the terms of the GNU General Public License as published by
|
|
9 ;; the Free Software Foundation; either version 1, or (at your option)
|
|
10 ;; any later version.
|
|
11
|
|
12 ;; Mule is distributed in the hope that it will be useful,
|
|
13 ;; but WITHOUT ANY WARRANTY; without even the implied warranty of
|
|
14 ;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
|
|
15 ;; GNU General Public License for more details.
|
|
16
|
|
17 ;; You should have received a copy of the GNU General Public License
|
|
18 ;; along with GNU Emacs; see the file COPYING. If not, write to
|
|
19 ;; the Free Software Foundation, 675 Mass Ave, Cambridge, MA 02139, USA.
|
|
20
|
|
21 ;;; 94.10.24 Written for Mule Ver.2.0 (K.Un.)
|
|
22 ;;; <zraun01@hpserv.zdv.uni-tuebingen.de>
|
|
23 ;;; 94.11.04 Updated for Mule Ver.2.1 (K.Un.)
|
|
24 ;;; <zraun01@hpserv.zdv.uni-tuebingen.de>
|
|
25
|
|
26 ;; # Hangul symbol input table for Mule to be used in hangul document.
|
|
27 ;; ENCODE: KSC
|
|
28 ;; MULTICHOICE: YES
|
|
29 ;; PROMPT: ::$(C"^(B::
|
|
30 ;; #
|
|
31 ;; COMMENT
|
|
32 ;; COMMENT $(CGQ1[(B $(C=I:<(B $(C1[@Z(B
|
|
33 ;; COMMENT
|
|
34 ;; # define keys
|
|
35 ;; VALIDINPUTKEY: (_)abcdefghijklmnopqrstuvwxyzCDEGKMNOPQRSTUW
|
|
36 ;; SELECTKEY: 1\040
|
|
37 ;; SELECTKEY: 2
|
|
38 ;; SELECTKEY: 3
|
|
39 ;; SELECTKEY: 4
|
|
40 ;; SELECTKEY: 5
|
|
41 ;; SELECTKEY: 6
|
|
42 ;; SELECTKEY: 7
|
|
43 ;; SELECTKEY: 8
|
|
44 ;; SELECTKEY: 9
|
|
45 ;; SELECTKEY: 0
|
|
46 ;; BACKSPACE: \010\177
|
|
47 ;; DELETEALL: \015\025
|
|
48 ;; MOVERIGHT: .>
|
|
49 ;; MOVELEFT: ,<
|
|
50 ;; REPEATKEY: \020\022
|
|
51 ;; # the following line must not be removed
|
|
52 ;; BEGINDICTIONARY
|
|
53 ;; #
|
|
54
|
|
55 (require 'quail)
|
|
56
|
|
57 (quail-define-package
|
|
58 "hsymbol" "$(C"^(B" t
|
|
59 "$(CGQ1[=I:<@T7BG%(B:
|
|
60 $(C!<(B($(C!=0}H#?-1b!<(B)$(C!=0}H#4]1b(B $(C!<(Bwon$(C!=57(B $(C!<(Bpic$(C!=;sG|9.@Z(B $(C!<(Bxtext$(C!=!W!X"R"."/(B
|
|
61 $(C!<(Bmusic$(C!=@=>G!<(Bquot$(C!=5{?HG%!<(Bdot$(C!=A!(B $(C!<(Barrow$(C!=H-;l(B $(C!<(Bmath$(C!=<vGP1bH#(B
|
|
62 $(C!<(Bindex$(C!=C7@Z!<(Bunit$(C!=4\@'(B $(C!<(Bsex$(C!=!N!O!<(Baccent$(C!=>G<>F.!<(BUnit$(C!=!I!J!K"5(B
|
|
63 $(C!<(Bwn$(C!="_!<(Bks$(C!="^!<(BNo$(C!="`!<"a!="a(B $(C!<(Bpercent$(C!="6!<(Bline$(C!=<19.@Z(B
|
|
64 $(C!<(Bam$(C!="c!<(Bpm$(C!="d!<"b!="b!<(BTel$(C!="e!<(Bdag$(C!="S"T(B $(C!<(Bfrac$(C!=:P<v(B
|
|
65 $(C!<(Btextline$(C!=!)!*!+!,!-(B $(C!<(BScan$(C!=("(#($!&(B $(C!<(Bscan$(C!=)")#)$!&(B
|
|
66 $(C!<(Benum$(C!=#0#1#2!&!<(BEng$(C!=#A#B#C!&(B $(C!<(Beng$(C!=#a#b#c!&(B $(C!<(Beasc$(C!=?5>n(BASCII
|
|
67 $(C!<(BRom$(C!=%0%1%2!&(B $(C!<(Brom$(C!=%!%"%#!&(B $(C!<(BGreek$(C!=%A%B%C!&!<(Bgreek$(C!=%a%b%c!&(B
|
|
68 $(C!<(Bojaso$(C!=(1!-(>(B $(C!<(Bogana$(C!=(?!-(L(B $(C!<(Boeng$(C!=(M!-(f(B $(C!<(Bonum$(C!=(g!-(u(B
|
|
69 $(C!<(Bpjaso$(C!=)1!-)>(B $(C!<(Bpgana$(C!=)?!-)L(B $(C!<(Bpeng$(C!=)M!-)f(B $(C!<(Bpnum$(C!=)g!-)u(B
|
|
70 $(C!<(Bhira$(C!=*"*#*$(B $(C!<(Bkata$(C!=+"+#+$(B $(C!<(BRuss$(C!=,",#,$!&(B $(C!<(Bruss$(C!=,Q,R,S!&(B
|
|
71 $(C!<@Z<R!=(B2$(C9z=D(B + $(C$U(B(S) $(C$o(B(t_) $(C$p(B(DD) $(C$q(B(D) $(C$v(B(G) $(C$u(B(GG) $(C$}(B(uk)"
|
|
72 '(
|
|
73 ("," . quail-prev-candidate-block)
|
|
74 ("<" . quail-prev-candidate-block)
|
|
75 ("." . quail-next-candidate-block)
|
|
76 (">" . quail-next-candidate-block)
|
|
77 (" " . quail-select-current)
|
|
78 )
|
|
79 )
|
|
80
|
|
81 (qdv "(" "$(C!2!4!6!8!:!<(B")
|
|
82 (qdv ")" "$(C!3!5!7!9!;!=(B")
|
|
83 (qdv "math" "$(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(B")
|
|
84 (qdv "pic" "$(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(B")
|
|
85 (qdv "arrow" "$(C!f!g!h!i!j"U"V"W"X"Y(B")
|
|
86 (qdv "music" "$(C"["Z"\"](B")
|
|
87 (qdv "won" "$(C#\!M!L(B")
|
|
88 (qdv "xtext" "$(C!W!X"R"."/(B")
|
|
89 (qdv "dot" "$(C!$!%!&!'"0(B")
|
|
90 (qdv "quot" "$(C!"!#!(!.!/!0!1!F!G!H"%")(B")
|
|
91 (qdv "textline" "$(C!)!*!+!,!-(B")
|
|
92 (qdv "Unit" "$(C!I!J!K"5(B")
|
|
93 (qdv "sex" "$(C!N!O(B")
|
|
94 (qdv "accent" "$(C"&"'"("*"+","-(B")
|
|
95 (qdv "percent" "$(C"6(B")
|
|
96 (qdv "dag" "$(C"S"T(B")
|
|
97 (qdv "wn" "$(C"_(B")
|
|
98 (qdv "ks" "$(C"^(B")
|
|
99 (qdv "No" "$(C"`(B")
|
|
100 (qdv "Co" "$(C"a(B")
|
|
101 (qdv "TM" "$(C"b(B")
|
|
102 (qdv "am" "$(C"c(B")
|
|
103 (qdv "pm" "$(C"d(B")
|
|
104 (qdv "Tel" "$(C"e(B")
|
|
105 (qdv "easc" "$(C#"###$#%#&#'#(#)#*#+#,#-#.#/#:#;#<#=#>#?#@#[#]#^#_#`#{#|#}#~(B")
|
|
106 (qdv "enum" "$(C#0#1#2#3#4#5#6#7#8#9(B")
|
|
107 (qdv "Eng" "$(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(B")
|
|
108 (qdv "eng" "$(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(B")
|
|
109 (qdv "r" "$(C$!(B")
|
|
110 (qdv "R" "$(C$"(B")
|
|
111 (qdv "rt" "$(C$#(B")
|
|
112 (qdv "s" "$(C$$(B")
|
|
113 (qdv "sw" "$(C$%(B")
|
|
114 (qdv "sg" "$(C$&(B")
|
|
115 (qdv "e" "$(C$'(B")
|
|
116 (qdv "E" "$(C$((B")
|
|
117 (qdv "f" "$(C$)(B")
|
|
118 (qdv "fr" "$(C$*(B")
|
|
119 (qdv "fa" "$(C$+(B")
|
|
120 (qdv "fq" "$(C$,(B")
|
|
121 (qdv "ft" "$(C$-(B")
|
|
122 (qdv "fx" "$(C$.(B")
|
|
123 (qdv "fv" "$(C$/(B")
|
|
124 (qdv "fg" "$(C$0(B")
|
|
125 (qdv "a" "$(C$1(B")
|
|
126 (qdv "q" "$(C$2(B")
|
|
127 (qdv "Q" "$(C$3(B")
|
|
128 (qdv "qt" "$(C$4(B")
|
|
129 (qdv "t" "$(C$5(B")
|
|
130 (qdv "T" "$(C$6(B")
|
|
131 (qdv "d" "$(C$7(B")
|
|
132 (qdv "w" "$(C$8(B")
|
|
133 (qdv "W" "$(C$9(B")
|
|
134 (qdv "c" "$(C$:(B")
|
|
135 (qdv "z" "$(C$;(B")
|
|
136 (qdv "x" "$(C$<(B")
|
|
137 (qdv "v" "$(C$=(B")
|
|
138 (qdv "g" "$(C$>(B")
|
|
139 (qdv "k" "$(C$?(B")
|
|
140 (qdv "o" "$(C$@(B")
|
|
141 (qdv "i" "$(C$A(B")
|
|
142 (qdv "I" "$(C$B(B")
|
|
143 (qdv "j" "$(C$C(B")
|
|
144 (qdv "p" "$(C$D(B")
|
|
145 (qdv "u" "$(C$E(B")
|
|
146 (qdv "P" "$(C$F(B")
|
|
147 (qdv "h" "$(C$G(B")
|
|
148 (qdv "hk" "$(C$H(B")
|
|
149 (qdv "ho" "$(C$I(B")
|
|
150 (qdv "hl" "$(C$J(B")
|
|
151 (qdv "y" "$(C$K(B")
|
|
152 (qdv "n" "$(C$L(B")
|
|
153 (qdv "nh" "$(C$M(B")
|
|
154 (qdv "np" "$(C$N(B")
|
|
155 (qdv "nl" "$(C$O(B")
|
|
156 (qdv "b" "$(C$P(B")
|
|
157 (qdv "m" "$(C$Q(B")
|
|
158 (qdv "ml" "$(C$R(B")
|
|
159 (qdv "l" "$(C$S(B")
|
|
160 (qdv "S" "$(C$U(B")
|
|
161 (qdv "se" "$(C$V(B")
|
|
162 (qdv "st" "$(C$W(B")
|
|
163 (qdv "st_" "$(C$X(B")
|
|
164 (qdv "frt" "$(C$Y(B")
|
|
165 (qdv "fqt" "$(C$[(B")
|
|
166 (qdv "fe" "$(C$Z(B")
|
|
167 (qdv "ft_" "$(C$\(B")
|
|
168 (qdv "fG" "$(C$](B")
|
|
169 (qdv "aq" "$(C$^(B")
|
|
170 (qdv "at" "$(C$_(B")
|
|
171 (qdv "at_" "$(C$`(B")
|
|
172 (qdv "aD" "$(C$a(B")
|
|
173 (qdv "qr" "$(C$b(B")
|
|
174 (qdv "qe" "$(C$c(B")
|
|
175 (qdv "qtr" "$(C$d(B")
|
|
176 (qdv "qte" "$(C$e(B")
|
|
177 (qdv "qw" "$(C$f(B")
|
|
178 (qdv "qx" "$(C$g(B")
|
|
179 (qdv "qD" "$(C$h(B")
|
|
180 (qdv "QD" "$(C$i(B")
|
|
181 (qdv "tr" "$(C$j(B")
|
|
182 (qdv "ts" "$(C$k(B")
|
|
183 (qdv "te" "$(C$l(B")
|
|
184 (qdv "tq" "$(C$m(B")
|
|
185 (qdv "tw" "$(C$n(B")
|
|
186 (qdv "t_" "$(C$o(B")
|
|
187 (qdv "DD" "$(C$p(B")
|
|
188 (qdv "D" "$(C$q(B")
|
|
189 (qdv "Dw" "$(C$r(B")
|
|
190 (qdv "Dt_" "$(C$s(B")
|
|
191 (qdv "vD" "$(C$t(B")
|
|
192 (qdv "GG" "$(C$u(B")
|
|
193 (qdv "G" "$(C$v(B")
|
|
194 (qdv "yi" "$(C$w(B")
|
|
195 (qdv "yO" "$(C$x(B")
|
|
196 (qdv "yl" "$(C$y(B")
|
|
197 (qdv "bu" "$(C$z(B")
|
|
198 (qdv "bP" "$(C${(B")
|
|
199 (qdv "bl" "$(C$|(B")
|
|
200 (qdv "uk" "$(C$}(B")
|
|
201 (qdv "ukl" "$(C$~(B")
|
|
202 (qdv "Rom" "$(C%0%1%2%3%4%5%6%7%8%9(B")
|
|
203 (qdv "rom" "$(C%!%"%#%$%%%&%'%(%)%*(B")
|
|
204 (qdv "Greek" "$(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(B")
|
|
205 (qdv "greek" "$(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(B")
|
|
206 (qdv "line" "$(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(B")
|
|
207 (qdv "unit" "$(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(B")
|
|
208 (qdv "Scan" "$(C("(#($(&((()(*(+(,(-(.(/(B")
|
|
209 (qdv "ojaso" "$(C(1(2(3(4(5(6(7(8(9(:(;(<(=(>(B")
|
|
210 (qdv "ogana" "$(C(?(@(A(B(C(D(E(F(G(H(I(J(K(L(B")
|
|
211 (qdv "oeng" "$(C(M(N(O(P(Q(R(S(T(U(V(W(X(Y([(Z(\(](^(_(`(a(b(c(d(e(f(B")
|
|
212 (qdv "onum" "$(C(g(h(i(j(k(l(m(n(o(p(q(r(s(t(u(B")
|
|
213 (qdv "frac" "$(C(v(w(x(y(z({(|(}(~(B")
|
|
214 (qdv "scan" "$(C)")#)$)%)&)')()))*)+),)-).)/)0(B")
|
|
215 (qdv "pjaso" "$(C)1)2)3)4)5)6)7)8)9):);)<)=)>(B>")
|
|
216 (qdv "pgana" "$(C)?)@)A)B)C)D)E)F)G)H)I)J)K)L(B")
|
|
217 (qdv "peng" "$(C)M)N)O)P)Q)R)S)T)U)V)W)X)Y)[)Z)\)])^)_)`)a)b)c)d)e)f(B")
|
|
218 (qdv "pnum" "$(C)g)h)i)j)k)l)m)n)o)p)q)r)s)t)u(B")
|
|
219 (qdv "index" "$(C)v)w)x)y)z){)|)})~(B")
|
|
220 (qdv "hira" "$(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(B")
|
|
221 (qdv "kata" "$(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(B")
|
|
222 (qdv "Russ" "$(C,",#,$,%,&,',(,),*,+,,,-,.,/,0,1,2,3,4,5,6,7,8,9,:,;,<,=,>,?,@,A(B")
|
|
223 (qdv "russ" "$(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(B")
|
|
224
|
|
225 (quail-setup-current-package)
|