diff options
Diffstat (limited to 'lisp/language/viet-util.el')
| -rw-r--r-- | lisp/language/viet-util.el | 292 | 
1 files changed, 146 insertions, 146 deletions
diff --git a/lisp/language/viet-util.el b/lisp/language/viet-util.el index a0487df9ea8..a4e7ff564e0 100644 --- a/lisp/language/viet-util.el +++ b/lisp/language/viet-util.el @@ -1,4 +1,4 @@ -;;; viet-util.el --- utilities for Vietnamese  -*- coding: iso-2022-7bit; -*- +;;; viet-util.el --- utilities for Vietnamese  -*- coding: utf-8; -*-  ;; Copyright (C) 1998, 2001-2013 Free Software Foundation, Inc.  ;; Copyright (C) 1995, 1996, 1997, 1998, 1999, 2000, 2001, 2002, 2003, 2004, @@ -52,159 +52,159 @@  ;; ------------+----------+--------  ;;     mark    | mnemonic | example  ;; ------------+----------+--------- -;;    breve    |    (     | a( -> ,1e(B -;;  circumflex |    ^     | a^ -> ,1b(B -;;    horn     |    +     | o+ -> ,1=(B +;;    breve    |    (     | a( -> ă +;;  circumflex |    ^     | a^ -> â +;;    horn     |    +     | o+ -> ơ  ;; ------------+----------+--------- -;;    acute    |    '     | a' -> ,1a(B -;;    grave    |    `     | a` -> ,1`(B -;;  hook above |    ?     | a? -> ,1d(B -;;    tilde    |    ~     | a~ -> ,1c(B -;;   dot below |    .     | a. -> ,1U(B +;;    acute    |    '     | a' -> á +;;    grave    |    `     | a` -> à +;;  hook above |    ?     | a? -> ả +;;    tilde    |    ~     | a~ -> ã +;;   dot below |    .     | a. -> ạ  ;; ------------+----------+--------- -;;    d bar    |   dd     | dd -> ,1p(B +;;    d bar    |   dd     | dd -> đ  ;; ------------+----------+---------  (defvar viet-viqr-alist    '(;; lowercase -    (?,1!(B . "a('")			; 161 -    (?,1"(B . "a(`")			; 162 -    (?,1#(B . "a(.")			; 163 -    (?,1$(B . "a^'")			; 164 -    (?,1%(B . "a^`")			; 165 -    (?,1&(B . "a^?")			; 166 -    (?,1'(B . "a^.")			; 167 -    (?,1((B . "e~")				; 168 -    (?,1)(B . "e.")				; 169 -    (?,1*(B . "e^'")			; 170 -    (?,1+(B . "e^`")			; 171 -    (?,1,(B . "e^?")			; 172 -    (?,1-(B . "e^~")			; 173 -    (?,1.(B . "e^.")			; 174 -    (?,1/(B . "o^'")			; 175 -    (?,10(B . "o^`")			; 176 -    (?,11(B . "o^?")			; 177 -    (?,12(B . "o^~")			; 178 -    (?,15(B . "o^.")			; 181 -    (?,16(B . "o+`")			; 182 -    (?,17(B . "o+?")			; 183 -    (?,18(B . "i.")				; 184 -    (?,1=(B . "o+")				; 189 -    (?,1>(B . "o+'")			; 190 -    (?,1F(B . "a(?")			; 198 -    (?,1G(B . "a(~")			; 199 -    (?,1O(B . "y`")				; 207 -    (?,1Q(B . "u+'")			; 209 -    (?,1U(B . "a.")				; 213 -    (?,1V(B . "y?")				; 214 -    (?,1W(B . "u+`")			; 215 -    (?,1X(B . "u+?")			; 216 -    (?,1[(B . "y~")				; 219 -    (?,1\(B . "y.")				; 220 -    (?,1^(B . "o+~")			; 222 -    (?,1_(B . "u+")				; 223 -    (?,1`(B . "a`")				; 224 -    (?,1a(B . "a'")				; 225 -    (?,1b(B . "a^")				; 226 -    (?,1c(B . "a~")				; 227 -    (?,1d(B . "a?")				; 228 -    (?,1e(B . "a(")				; 229 -    (?,1f(B . "u+~")			; 230 -    (?,1g(B . "a^~")			; 231 -    (?,1h(B . "e`")				; 232 -    (?,1i(B . "e'")				; 233 -    (?,1j(B . "e^")				; 234 -    (?,1k(B . "e?")				; 235 -    (?,1l(B . "i`")				; 236 -    (?,1m(B . "i'")				; 237 -    (?,1n(B . "i~")				; 238 -    (?,1o(B . "i?")				; 239 -    (?,1p(B . "dd")				; 240 -    (?,1q(B . "u+.")			; 241 -    (?,1r(B . "o`")				; 242 -    (?,1s(B . "o'")				; 243 -    (?,1t(B . "o^")				; 244 -    (?,1u(B . "o~")				; 245 -    (?,1v(B . "o?")				; 246 -    (?,1w(B . "o.")				; 247 -    (?,1x(B . "u.")				; 248 -    (?,1y(B . "u`")				; 249 -    (?,1z(B . "u'")				; 250 -    (?,1{(B . "u~")				; 251 -    (?,1|(B . "u?")				; 252 -    (?,1}(B . "y'")				; 253 -    (?,1~(B . "o+.")			; 254 +    (?ắ . "a('")			; 161 +    (?ằ . "a(`")			; 162 +    (?ặ . "a(.")			; 163 +    (?ấ . "a^'")			; 164 +    (?ầ . "a^`")			; 165 +    (?ẩ . "a^?")			; 166 +    (?ậ . "a^.")			; 167 +    (?ẽ . "e~")				; 168 +    (?ẹ . "e.")				; 169 +    (?ế . "e^'")			; 170 +    (?ề . "e^`")			; 171 +    (?ể . "e^?")			; 172 +    (?ễ . "e^~")			; 173 +    (?ệ . "e^.")			; 174 +    (?ố . "o^'")			; 175 +    (?ồ . "o^`")			; 176 +    (?ổ . "o^?")			; 177 +    (?ỗ . "o^~")			; 178 +    (?ộ . "o^.")			; 181 +    (?ờ . "o+`")			; 182 +    (?ở . "o+?")			; 183 +    (?ị . "i.")				; 184 +    (?ơ . "o+")				; 189 +    (?ớ . "o+'")			; 190 +    (?ẳ . "a(?")			; 198 +    (?ẵ . "a(~")			; 199 +    (?ỳ . "y`")				; 207 +    (?ứ . "u+'")			; 209 +    (?ạ . "a.")				; 213 +    (?ỷ . "y?")				; 214 +    (?ừ . "u+`")			; 215 +    (?ử . "u+?")			; 216 +    (?ỹ . "y~")				; 219 +    (?ỵ . "y.")				; 220 +    (?ỡ . "o+~")			; 222 +    (?ư . "u+")				; 223 +    (?à . "a`")				; 224 +    (?á . "a'")				; 225 +    (?â . "a^")				; 226 +    (?ã . "a~")				; 227 +    (?ả . "a?")				; 228 +    (?ă . "a(")				; 229 +    (?ữ . "u+~")			; 230 +    (?ẫ . "a^~")			; 231 +    (?è . "e`")				; 232 +    (?é . "e'")				; 233 +    (?ê . "e^")				; 234 +    (?ẻ . "e?")				; 235 +    (?ì . "i`")				; 236 +    (?í . "i'")				; 237 +    (?ĩ . "i~")				; 238 +    (?ỉ . "i?")				; 239 +    (?đ . "dd")				; 240 +    (?ự . "u+.")			; 241 +    (?ò . "o`")				; 242 +    (?ó . "o'")				; 243 +    (?ô . "o^")				; 244 +    (?õ . "o~")				; 245 +    (?ỏ . "o?")				; 246 +    (?ọ . "o.")				; 247 +    (?ụ . "u.")				; 248 +    (?ù . "u`")				; 249 +    (?ú . "u'")				; 250 +    (?ũ . "u~")				; 251 +    (?ủ . "u?")				; 252 +    (?ý . "y'")				; 253 +    (?ợ . "o+.")			; 254      ;; upper case -    (?,2!(B . "A('")			; 161 -    (?,2"(B . "A(`")			; 162 -    (?,2#(B . "A(.")			; 163 -    (?,2$(B . "A^'")			; 164 -    (?,2%(B . "A^`")			; 165 -    (?,2&(B . "A^?")			; 166 -    (?,2'(B . "A^.")			; 167 -    (?,2((B . "E~")				; 168 -    (?,2)(B . "E.")				; 169 -    (?,2*(B . "E^'")			; 170 -    (?,2+(B . "E^`")			; 171 -    (?,2,(B . "E^?")			; 172 -    (?,2-(B . "E^~")			; 173 -    (?,2.(B . "E^.")			; 174 -    (?,2/(B . "O^'")			; 175 -    (?,20(B . "O^`")			; 176 -    (?,21(B . "O^?")			; 177 -    (?,22(B . "O^~")			; 178 -    (?,25(B . "O^.")			; 181 -    (?,26(B . "O+`")			; 182 -    (?,27(B . "O+?")			; 183 -    (?,28(B . "I.")				; 184 -    (?,2=(B . "O+")				; 189 -    (?,2>(B . "O+'")			; 190 -    (?,2F(B . "A(?")			; 198 -    (?,2G(B . "A(~")			; 199 -    (?,2O(B . "Y`")				; 207 -    (?,2Q(B . "U+'")			; 209 -    (?,2U(B . "A.")				; 213 -    (?,2V(B . "Y?")				; 214 -    (?,2W(B . "U+`")			; 215 -    (?,2X(B . "U+?")			; 216 -    (?,2[(B . "Y~")				; 219 -    (?,2\(B . "Y.")				; 220 -    (?,2^(B . "O+~")			; 222 -    (?,2_(B . "U+")				; 223 -    (?,2`(B . "A`")				; 224 -    (?,2a(B . "A'")				; 225 -    (?,2b(B . "A^")				; 226 -    (?,2c(B . "A~")				; 227 -    (?,2d(B . "A?")				; 228 -    (?,2e(B . "A(")				; 229 -    (?,2f(B . "U+~")			; 230 -    (?,2g(B . "A^~")			; 231 -    (?,2h(B . "E`")				; 232 -    (?,2i(B . "E'")				; 233 -    (?,2j(B . "E^")				; 234 -    (?,2k(B . "E?")				; 235 -    (?,2l(B . "I`")				; 236 -    (?,2m(B . "I'")				; 237 -    (?,2n(B . "I~")				; 238 -    (?,2o(B . "I?")				; 239 -    (?,2p(B . "DD")				; 240 -    (?,2p(B . "dD")				; 240 -    (?,2p(B . "Dd")				; 240 -    (?,2q(B . "U+.")			; 241 -    (?,2r(B . "O`")				; 242 -    (?,2s(B . "O'")				; 243 -    (?,2t(B . "O^")				; 244 -    (?,2u(B . "O~")				; 245 -    (?,2v(B . "O?")				; 246 -    (?,2w(B . "O.")				; 247 -    (?,2x(B . "U.")				; 248 -    (?,2y(B . "U`")				; 249 -    (?,2z(B . "U'")				; 250 -    (?,2{(B . "U~")				; 251 -    (?,2|(B . "U?")				; 252 -    (?,2}(B . "Y'")				; 253 -    (?,2~(B . "O+.")			; 254 +    (?Ắ . "A('")			; 161 +    (?Ằ . "A(`")			; 162 +    (?Ặ . "A(.")			; 163 +    (?Ấ . "A^'")			; 164 +    (?Ầ . "A^`")			; 165 +    (?Ẩ . "A^?")			; 166 +    (?Ậ . "A^.")			; 167 +    (?Ẽ . "E~")				; 168 +    (?Ẹ . "E.")				; 169 +    (?Ế . "E^'")			; 170 +    (?Ề . "E^`")			; 171 +    (?Ể . "E^?")			; 172 +    (?Ễ . "E^~")			; 173 +    (?Ệ . "E^.")			; 174 +    (?Ố . "O^'")			; 175 +    (?Ồ . "O^`")			; 176 +    (?Ổ . "O^?")			; 177 +    (?Ỗ . "O^~")			; 178 +    (?Ộ . "O^.")			; 181 +    (?Ờ . "O+`")			; 182 +    (?Ở . "O+?")			; 183 +    (?Ị . "I.")				; 184 +    (?Ơ . "O+")				; 189 +    (?Ớ . "O+'")			; 190 +    (?Ẳ . "A(?")			; 198 +    (?Ẵ . "A(~")			; 199 +    (?Ỳ . "Y`")				; 207 +    (?Ứ . "U+'")			; 209 +    (?Ạ . "A.")				; 213 +    (?Ỷ . "Y?")				; 214 +    (?Ừ . "U+`")			; 215 +    (?Ử . "U+?")			; 216 +    (?Ỹ . "Y~")				; 219 +    (?Ỵ . "Y.")				; 220 +    (?Ỡ . "O+~")			; 222 +    (?Ư . "U+")				; 223 +    (?À . "A`")				; 224 +    (?Á . "A'")				; 225 +    (? . "A^")				; 226 +    (?à . "A~")				; 227 +    (?Ả . "A?")				; 228 +    (?Ă . "A(")				; 229 +    (?Ữ . "U+~")			; 230 +    (?Ẫ . "A^~")			; 231 +    (?È . "E`")				; 232 +    (?É . "E'")				; 233 +    (?Ê . "E^")				; 234 +    (?Ẻ . "E?")				; 235 +    (?Ì . "I`")				; 236 +    (?Í . "I'")				; 237 +    (?Ĩ . "I~")				; 238 +    (?Ỉ . "I?")				; 239 +    (?Đ . "DD")				; 240 +    (?Đ . "dD")				; 240 +    (?Đ . "Dd")				; 240 +    (?Ự . "U+.")			; 241 +    (?Ò . "O`")				; 242 +    (?Ó . "O'")				; 243 +    (?Ô . "O^")				; 244 +    (?Õ . "O~")				; 245 +    (?Ỏ . "O?")				; 246 +    (?Ọ . "O.")				; 247 +    (?Ụ . "U.")				; 248 +    (?Ù . "U`")				; 249 +    (?Ú . "U'")				; 250 +    (?Ũ . "U~")				; 251 +    (?Ủ . "U?")				; 252 +    (?Ý . "Y'")				; 253 +    (?Ợ . "O+.")			; 254      ;; escape from composition      (?\( . "\\(")			; breve (left parenthesis)  | 
