X-Git-Url: http://git.chise.org/gitweb/?a=blobdiff_plain;f=lisp%2Fmule%2Fmule-conf.el;h=e47d79a1eee413232ac8a86283179d6cc7a529ec;hb=4226319e9e4757782a0b50917434344f33f6b63b;hp=ca67838e2e36a66bab61c2f091e250a823bc83a4;hpb=9a9b329149fb87076360f9154f5d265831a90970;p=chise%2Fxemacs-chise.git- diff --git a/lisp/mule/mule-conf.el b/lisp/mule/mule-conf.el index ca67838..e47d79a 100644 --- a/lisp/mule/mule-conf.el +++ b/lisp/mule/mule-conf.el @@ -3,7 +3,7 @@ ;; Copyright (C) 1995,1999 Electrotechnical Laboratory, JAPAN. ;; Licensed to the Free Software Foundation. ;; Copyright (C) 1997, 1999, 2000, 2002, 2003, 2004, 2005, 2006, 2008, -;; 2009, 2010 MORIOKA Tomohiko +;; 2009, 2010, 2011, 2012 MORIOKA Tomohiko ;; Keywords: mule, multilingual, character set, coding system @@ -321,7 +321,7 @@ (make-charset '=>>>jis-x0208 - "JIS X 0208 abstract glyph-images (unchanged part)." + "JIS X 0208 abstract glyph-forms (unchanged part)." '(registry "jisx0208\\.1990" dimension 2 chars 94 @@ -330,8 +330,27 @@ ;; final ?B graphic 0)) (make-charset + '=>>>jis-x0208@1978 + "JIS X 0208:1978 abstract glyph-forms." + '(registry "jisx0208\\.1978" + dimension 2 + chars 94 + mother =>>>jis-x0208 + =>iso-ir 42 + ;; final ?@ + graphic 0)) + (make-charset + '=>>>jis-x0208@1983 + "JIS X 0208:1983 abstract glyph-forms." + '(registry "jisx0208\\.1983" + dimension 2 + chars 94 + mother =>>>jis-x0208 + =>iso-ir 87 + graphic 0)) + (make-charset '=>>>jis-x0208@1990 - "JIS X 0208:1990 abstract glyph-images." + "JIS X 0208:1990 abstract glyph-forms." '(registry "jisx0208\\.1990" dimension 2 chars 94 @@ -341,7 +360,7 @@ graphic 0)) (make-charset '=>>>jis-x0213-1 - "JIS X 0213 Plain 1 abstract glyph-images (unchanged part)" + "JIS X 0213 Plain 1 abstract glyph-forms (unchanged part)" '(registry "jisx0213\\(\\.[0-9]+\\)?-1" dimension 2 chars 94 @@ -351,6 +370,36 @@ graphic 0 ;; partial t )) + (make-charset + '=>>>jis-x0213-1@2000 + "JIS X 0213:2000 Plain 1 abstract glyph-forms" + '(registry "jisx0213\\(\\.2000\\)-1" + dimension 2 + chars 94 + mother =>>>jis-x0213-1 + =>iso-ir 228 + ;; final ?O + graphic 0 + ;; partial t + )) + (make-charset + '=>>>jis-x0213-1@2004 + "JIS X 0213:2004 Plain 1 abstract glyph-forms" + '(mother =>>>jis-x0213-1 + =>iso-ir 233 + ;; registry "jisx0213\\(\\.2004\\)-1" + dimension 2 + chars 94 + graphic 0)) + (make-charset + '=>>>jis-x0213-2 + "JIS X 0213 Plain 2 abstract glyph-forms" + '(mother =jis-x0213-2 + =>iso-ir 229 + registry "jisx0213\\(\\.\\(2000\\|2004\\)\\)?-2" + dimension 2 + chars 94 + graphic 0)) (make-charset '=>>jis-x0208 @@ -364,7 +413,7 @@ graphic 0)) (make-charset '=>>jis-x0208@1978 - "JIS X 0208:1978 abstract glyphs (unchanged part)." + "JIS X 0208:1978 abstract glyphs." '(registry "jisx0208\\.1978" dimension 2 chars 94 @@ -372,6 +421,24 @@ =>iso-ir 42 ;; final ?@ graphic 0)) + (make-charset + '=>>jis-x0208@1983 + "JIS X 0208:1983 abstract glyphs." + '(registry "jisx0208\\.1983" + dimension 2 + chars 94 + mother =>>jis-x0208 + =>iso-ir 87 + graphic 0)) + (make-charset + '=>>jis-x0208@1990 + "JIS X 0208:1990 abstract glyphs." + '(registry "jisx0208\\.1990" + dimension 2 + chars 94 + mother =>>jis-x0208 + =>iso-ir 168 + graphic 0)) (make-charset '=>>jis-x0213-1 @@ -403,7 +470,7 @@ '(registry "jisx0213\\(\\.\\(2000\\|2004\\)\\)?-2" dimension 2 chars 94 - mother =jis-x0213-2 + mother =>>>jis-x0213-2 =>iso-ir 229 ;; final ?P graphic 0)) @@ -421,124 +488,861 @@ )) (make-charset - '=>jis-x0208@usual - "JIS X 0208 based on usual unification." - '(registry "jisx0208\\.1990" - dimension 2 - chars 94 - mother =>>jis-x0208 - =>iso-ir 168 - ;; final ?B - graphic 0)) + '=+>jis-x0208 + "JIS X 0208 based on usual unification." + '(registry "jisx0208\\.1990" + dimension 2 + chars 94 + mother =>>jis-x0208 + =>iso-ir 168 + ;; final ?B + graphic 0)) + (define-charset-alias '=>jis-x0208@usual '=+>jis-x0208) + (make-charset + '=+>jis-x0208@1978 + "JIS X 0208:1978 unified abstract glyphs." + '(registry "jisx0208\\.1978" + dimension 2 + chars 94 + mother =+>jis-x0208 + =>iso-ir 42 + ;; final ?@ + graphic 0)) + (make-charset + '=+>jis-x0208@1983 + "JIS X 0208:1983 unified abstract glyphs." + '(registry "jisx0208\\.1983" + dimension 2 + chars 94 + mother =+>jis-x0208 + =>iso-ir 87 + graphic 0)) + (make-charset + '=+>jis-x0208@1990 + "JIS X 0208:1990 unified abstract glyphs." + '(registry "jisx0208\\.1990" + dimension 2 + chars 94 + mother =+>jis-x0208 + =>iso-ir 168 + graphic 0)) + (make-charset + '=+>jis-x0213-1 + "JIS X 0213 Plain 1 unified abstract glyphs (unchanged part)" + '(registry "jisx0213\\(\\.[0-9]+\\)?-1" + dimension 2 + chars 94 + mother =>>jis-x0213-1 + =>iso-ir 228 + ;; final ?O + graphic 0 + ;; partial t + )) + (make-charset + '=+>jis-x0213-1@2000 + "JIS X 0213:2000 Plain 1 unified abstract glyphs" + '(registry "jisx0213\\(\\.2000\\)-1" + dimension 2 + chars 94 + mother =+>jis-x0213-1 + =>iso-ir 228 + ;; final ?O + graphic 0 + ;; partial t + )) + + (make-charset + '=>jis-x0208 + "JIS X 0208 based on the unchanged unification rules." + '(registry "jisx0208\\.1990" + dimension 2 + chars 94 + mother =+>jis-x0208 + =>iso-ir 168 + ;; final ?B + graphic 0)) + (define-charset-alias '<=>jis-x0208 '=>jis-x0208) + (make-charset + '=>jis-x0208@1997 + "JIS X 0208 based on the unification rule of 1997 edition." + '(registry "jisx0208\\.1990" + dimension 2 + chars 94 + mother =>jis-x0208 + =>iso-ir 168 + ;; final ?B + graphic 0)) + (define-charset-alias '<=>jis-x0208@1997 '=>jis-x0208@1997) + (define-charset-alias ' =jis-x0208@1997 '=>jis-x0208@1997) + + (make-charset + '=>jis-x0213-1 + "JIS X 0213 Plain 1 abstract characters (unchanged part)" + '(registry "jisx0213\\(\\.[0-9]+\\)?-1" + dimension 2 + chars 94 + mother =+>jis-x0213-1 + =>iso-ir 228 + ;; final ?O + graphic 0 + ;; partial t + )) + (define-charset-alias '<=>jis-x0213-1 '=>jis-x0213-1) + (make-charset + '=>jis-x0213-1@2000 + "JIS X 0213:2000 Plain 1 abstract characters" + '(registry "jisx0213\\(\\.2000\\)-1" + dimension 2 + chars 94 + mother =>jis-x0213-1 + =>iso-ir 228 + ;; final ?O + graphic 0 + ;; partial t + )) + (define-charset-alias '<=>jis-x0213-1@2000 '=>jis-x0213-1@2000) + (make-charset + '=>jis-x0213-1@2004 + "JIS X 0213:2004 Plain 1 abstract characters" + '(registry "jisx0213\\(\\.2004\\)-1" + dimension 2 + chars 94 + mother =>jis-x0213-1 + =>iso-ir 233 + ;; final ?Q + graphic 0 + ;; partial t + )) + (define-charset-alias '<=>jis-x0213-1@2004 '=>jis-x0213-1@2004) + (make-charset + '=+>jis-x0213-2 + "JIS X 0213 Plain 2 based on usual unification." + '(registry "jisx0213\\(\\.\\(2000\\|2004\\)\\)?-2" + dimension 2 + chars 94 + mother =>>jis-x0213-2 + =>iso-ir 229 + ;; final ?P + graphic 0)) + (define-charset-alias '=>jis-x0213-2@usual '=+>jis-x0213-2) + (make-charset + '=>jis-x0213-2 + "JIS X 0213 Plain 2 abstract characters" + '(registry "jisx0213\\(\\.\\(2000\\|2004\\)\\)?-2" + dimension 2 + chars 94 + mother =+>jis-x0213-2 + =>iso-ir 229 + ;; final ?P + graphic 0)) + + (make-charset + '=>>cns11643-4 + "CNS 11643 Plane 4 abstract glyphs." + '(registry "CNS11643[.-]\\(.*[.-]\\)?4$" + dimension 2 + chars 94 + mother =cns11643-4 + =>iso-ir 184 + graphic 0)) + + (make-charset + '=>cns11643-2 + "CNS 11643 Plane 2 abstract characters." + '(registry "CNS11643[.-]\\(.*[.-]\\)?2$" + dimension 2 + chars 94 + mother =cns11643-2 + =>iso-ir 172 + graphic 0)) + (make-charset + '=>cns11643-7 + "CNS 11643 Plane 7 abstract characters." + '(registry "CNS11643[.-]\\(.*[.-]\\)?7$" + dimension 2 + chars 94 + mother =cns11643-7 + =>iso-ir 187 + graphic 0)) + + (make-charset '=big5-eten + "Big5 ETEN" + '(long-name "Big5-ETEN" + chars 256 + dimension 2 + columns 2 + graphic 2 + direction l2r + mother chinese-big5 + min-code #x8140 + max-code #xFEFE + registry "Big5\\.ETEN")) + (define-charset-alias 'chinese-big5-eten '=big5-eten) + (make-charset 'chinese-big5-eten-a + "Big5 ETEN (#xF9D6 .. #xF9FE)" + '(long-name "Big5-ETEN-a" + chars 256 + dimension 2 + columns 2 + graphic 2 + direction l2r + mother chinese-big5 + min-code #xF9D6 + max-code #xF9FE + registry "Big5\\.ETEN")) + (make-charset 'chinese-big5-eten-b + "Big5 ETEN (#xC6A1 .. #xC8FE)" + '(long-name "Big5-ETEN-b" + chars 256 + dimension 2 + columns 2 + graphic 2 + direction l2r + mother chinese-big5 + min-code #xC6A1 + max-code #xC8FE + registry "Big5\\.ETEN")) + + (make-charset + '=adobe-japan1-base + "Adobe-Japan1 Character Collection for CID-Keyed Fonts" + `(long-name "Adobe-Japan1" + chars 256 + dimension 2 + columns 2 + graphic 2 + direction l2r + registry "AdobeJapan1-[0-6]$" + min-code ,(lsh #x6300 16) + max-code ,(+ (lsh #x6300 16) 23057) + code-offset ,(lsh #x6300 16))) + (make-charset + '=adobe-japan1-0 + "Adobe-Japan1-0 Character Collection for CID-Keyed Fonts" + '(long-name "Adobe-Japan1-0" + chars 256 + dimension 2 + columns 2 + graphic 2 + direction l2r + mother =adobe-japan1-base + min-code 0 + max-code 8283 + registry "AdobeJapan1-0$")) + (make-charset + '=adobe-japan1-1 + "Adobe-Japan1-1 Character Collection for CID-Keyed Fonts" + '(long-name "Adobe-Japan1-1" + chars 256 + dimension 2 + columns 2 + graphic 2 + direction l2r + mother =adobe-japan1-0 + min-code 0 + max-code 8358 + registry "AdobeJapan1-1$")) + (make-charset + '=adobe-japan1-2 + "Adobe-Japan1-2 Character Collection for CID-Keyed Fonts" + '(long-name "Adobe-Japan1-2" + chars 256 + dimension 2 + columns 2 + graphic 2 + direction l2r + mother =adobe-japan1-1 + min-code 0 + max-code 8719 + registry "AdobeJapan1-2$")) + (make-charset + '=adobe-japan1-3 + "Adobe-Japan1-3 Character Collection for CID-Keyed Fonts" + '(long-name "Adobe-Japan1-3" + chars 256 + dimension 2 + columns 2 + graphic 2 + direction l2r + mother =adobe-japan1-2 + min-code 0 + max-code 9353 + registry "AdobeJapan1-3$")) + (make-charset + '=adobe-japan1-4 + "Adobe-Japan1-4 Character Collection for CID-Keyed Fonts" + '(long-name "Adobe-Japan1-4" + chars 256 + dimension 2 + columns 2 + graphic 2 + direction l2r + mother =adobe-japan1-3 + min-code 0 + max-code 15443 + registry "AdobeJapan1-4$")) + (make-charset + '=adobe-japan1-5 + "Adobe-Japan1-5 Character Collection for CID-Keyed Fonts" + '(long-name "Adobe-Japan1-5" + chars 256 + dimension 2 + columns 2 + graphic 2 + direction l2r + mother =adobe-japan1-4 + min-code 0 + max-code 20316 + registry "AdobeJapan1-5$")) + (make-charset + '=adobe-japan1-6 + "Adobe-Japan1-6 Character Collection for CID-Keyed Fonts" + '(long-name "Adobe-Japan1-6" + chars 256 + dimension 2 + columns 2 + graphic 2 + direction l2r + mother =adobe-japan1-5 + min-code 0 + max-code 23057 + registry "AdobeJapan1-6$")) + (define-charset-alias '=adobe-japan1 '=adobe-japan1-6) + + (make-charset + '=>>>adobe-japan1-0 + "Adobe-Japan1-0 abstract glyph-forms" + '(long-name "Adobe-Japan1-0 abstract glyph-forms" + chars 256 + dimension 2 + columns 2 + graphic 2 + direction l2r + mother =adobe-japan1-0 + registry "AdobeJapan1-0$")) + (make-charset + '=>>>adobe-japan1-1 + "Adobe-Japan1-1 abstract glyph-forms" + '(long-name "Adobe-Japan1-1 abstract glyph-forms" + chars 256 + dimension 2 + columns 2 + graphic 2 + direction l2r + mother =>>>adobe-japan1-0 + registry "AdobeJapan1-1$")) + (make-charset + '=>>>adobe-japan1-2 + "Adobe-Japan1-2 abstract glyph-forms" + '(long-name "Adobe-Japan1-2 abstract glyph-forms" + chars 256 + dimension 2 + columns 2 + graphic 2 + direction l2r + mother =>>>adobe-japan1-1 + registry "AdobeJapan1-2$")) + (make-charset + '=>>>adobe-japan1-3 + "Adobe-Japan1-3 abstract glyph-forms" + '(long-name "Adobe-Japan1-3 abstract glyph-forms" + chars 256 + dimension 2 + columns 2 + graphic 2 + direction l2r + mother =>>>adobe-japan1-2 + registry "AdobeJapan1-3$")) + (make-charset + '=>>>adobe-japan1-4 + "Adobe-Japan1-4 abstract glyph-forms" + '(long-name "Adobe-Japan1-4 abstract glyph-forms" + chars 256 + dimension 2 + columns 2 + graphic 2 + direction l2r + mother =>>>adobe-japan1-3 + registry "AdobeJapan1-4$")) + (make-charset + '=>>>adobe-japan1-5 + "Adobe-Japan1-5 abstract glyph-forms" + '(long-name "Adobe-Japan1-5 abstract glyph-forms" + chars 256 + dimension 2 + columns 2 + graphic 2 + direction l2r + mother =>>>adobe-japan1-4 + registry "AdobeJapan1-5$")) + (make-charset + '=>>>adobe-japan1-6 + "Adobe-Japan1-6 abstract glyph-forms" + '(long-name "Adobe-Japan1-6 abstract glyph-forms" + chars 256 + dimension 2 + columns 2 + graphic 2 + direction l2r + mother =>>>adobe-japan1-5 + registry "AdobeJapan1-6$")) + (define-charset-alias '=>>>adobe-japan1 '=>>>adobe-japan1-6) + + (make-charset + '=>>adobe-japan1-0 + "Adobe-Japan1-0 abstract glyphs" + '(long-name "Adobe-Japan1-0 abstract glyphs" + chars 256 + dimension 2 + columns 2 + graphic 2 + direction l2r + mother =>>>adobe-japan1 + registry "AdobeJapan1-0$")) + (make-charset + '=>>adobe-japan1-1 + "Adobe-Japan1-1 abstract glyphs" + '(long-name "Adobe-Japan1-1 abstract glyphs" + chars 256 + dimension 2 + columns 2 + graphic 2 + direction l2r + mother =>>adobe-japan1-0 + registry "AdobeJapan1-1")) + (make-charset + '=>>adobe-japan1-2 + "Adobe-Japan1-2 abstract glyphs" + '(long-name "Adobe-Japan1-2 abstract glyphs" + chars 256 + dimension 2 + columns 2 + graphic 2 + direction l2r + mother =>>adobe-japan1-1 + registry "AdobeJapan1-2")) + (make-charset + '=>>adobe-japan1-3 + "Adobe-Japan1-3 abstract glyphs" + '(long-name "Adobe-Japan1-3 abstract glyphs" + chars 256 + dimension 2 + columns 2 + graphic 2 + direction l2r + mother =>>adobe-japan1-2 + registry "AdobeJapan1-3")) + (make-charset + '=>>adobe-japan1-4 + "Adobe-Japan1-4 abstract glyphs" + '(long-name "Adobe-Japan1-4 abstract glyphs" + chars 256 + dimension 2 + columns 2 + graphic 2 + direction l2r + mother =>>adobe-japan1-3 + registry "AdobeJapan1-4")) + (make-charset + '=>>adobe-japan1-5 + "Adobe-Japan1-5 abstract glyphs" + '(long-name "Adobe-Japan1-5 abstract glyphs" + chars 256 + dimension 2 + columns 2 + graphic 2 + direction l2r + mother =>>adobe-japan1-4 + registry "AdobeJapan1-5")) + (make-charset + '=>>adobe-japan1-6 + "Adobe-Japan1-6 abstract glyphs" + '(long-name "Adobe-Japan1-6 abstract glyphs" + chars 256 + dimension 2 + columns 2 + graphic 2 + direction l2r + mother =>>adobe-japan1-5 + registry "AdobeJapan1-6")) + (define-charset-alias '=>>adobe-japan1 '=>>adobe-japan1-6) + + (make-charset + '=+>adobe-japan1 + "Adobe-Japan1 unified abstract glyphs" + '(long-name "Adobe-Japan1 unified abstract glyphs" + chars 256 + dimension 2 + columns 2 + graphic 2 + direction l2r + mother =>>adobe-japan1 + registry "AdobeJapan1-6$")) + + (make-charset '=big5-cdp + "Big5 with CDP extension" + '(long-name "Big5-CDP" + chars 256 + dimension 2 + columns 2 + graphic 2 + direction l2r + registry "big5\\.cdp-0" + mother chinese-big5 + min-code #x8140 + max-code #x8DFE)) + (define-charset-alias 'chinese-big5-cdp '=big5-cdp) + + (make-charset '=>>big5-cdp + "Abstract glyphs of Big5-CDP" + '(long-name "Big5-CDP glyphs" + chars 256 + dimension 2 + columns 2 + graphic 2 + direction l2r + registry "big5\\.cdp-0" + mother =big5-cdp)) + + (make-charset '=>big5-cdp + "Big5-CDP abstract characters" + '(long-name "Big5-CDP abstract characters" + chars 256 + dimension 2 + columns 2 + graphic 2 + direction l2r + registry "big5\\.cdp-0" + mother =>>big5-cdp)) + + (make-charset + '=hanyo-denshi/ja + "JA (JIS X0208) part of Han'you-Denshi characters" + `(long-name "Han'you-Denshi/JA" + chars 94 + dimension 2 + columns 2 + graphic 2 + direction l2r + registry "HanyoDenshi\\.JA-0$" + min-code ,(lsh #x6400 16) + max-code ,(+ (lsh #x6400 16) (1- (* 94 94))) + code-offset ,(lsh #x6400 16))) + (make-charset + '=hanyo-denshi/jb + "JB (JIS X0212) part of Han'you-Denshi characters" + `(long-name "Han'you-Denshi/JB" + chars 94 + dimension 2 + columns 2 + graphic 2 + direction l2r + registry "HanyoDenshi\\.JB-0$" + min-code ,(+ (lsh #x6400 16) (* 94 94)) + max-code ,(+ (lsh #x6400 16) (1- (* 94 94 2))) + code-offset ,(+ (lsh #x6400 16) (* 94 94)))) + (make-charset + '=hanyo-denshi/jc + "JC (JIS X0213:2000 Plane 1) part of Han'you-Denshi characters" + `(long-name "Han'you-Denshi/JC" + chars 94 + dimension 2 + columns 2 + graphic 2 + direction l2r + registry "HanyoDenshi\\.JC-0$" + min-code ,(+ (lsh #x6400 16) (* 94 94 2)) + max-code ,(+ (lsh #x6400 16) (1- (* 94 94 3))) + code-offset ,(+ (lsh #x6400 16) (* 94 94 2)))) + (make-charset + '=hanyo-denshi/jd + "JD (JIS X0213:2000 Plane 1) part of Han'you-Denshi characters" + `(long-name "Han'you-Denshi/JD" + chars 94 + dimension 2 + columns 2 + graphic 2 + direction l2r + registry "HanyoDenshi\\.JD-0$" + min-code ,(+ (lsh #x6400 16) (* 94 94 3)) + max-code ,(+ (lsh #x6400 16) (1- (* 94 94 4))) + code-offset ,(+ (lsh #x6400 16) (* 94 94 3)))) + (make-charset + '=hanyo-denshi/ft + "FT (FDPC additional) part of Han'you-Denshi characters" + `(long-name "Han'you-Denshi/FT" + chars 94 + dimension 2 + columns 2 + graphic 2 + direction l2r + registry "HanyoDenshi\\.FT-0$" + min-code ,(+ (lsh #x6400 16) (* 94 94 4)) + max-code ,(+ (lsh #x6400 16) (1- (* 94 94 5))) + code-offset ,(+ (lsh #x6400 16) (* 94 94 4)))) + (make-charset + '=hanyo-denshi/ia + "IA part of Han'you-Denshi characters" + `(long-name "Han'you-Denshi/IA" + chars 94 + dimension 2 + columns 2 + graphic 2 + direction l2r + registry "HanyoDenshi\\.IA-0$" + min-code ,(+ (lsh #x6400 16) (* 94 94 5)) + max-code ,(+ (lsh #x6400 16) (1- (* 94 94 6))) + code-offset ,(+ (lsh #x6400 16) (* 94 94 5)))) + (make-charset + '=hanyo-denshi/ib + "IB part of Han'you-Denshi characters" + `(long-name "Han'you-Denshi/IB" + chars 94 + dimension 2 + columns 2 + graphic 2 + direction l2r + registry "HanyoDenshi\\.IB-0$" + min-code ,(+ (lsh #x6400 16) (* 94 94 6)) + max-code ,(+ (lsh #x6400 16) (1- (* 94 94 7))) + code-offset ,(+ (lsh #x6400 16) (* 94 94 6)))) + (make-charset + '=hanyo-denshi/hg + "HG (HyouGai Kanji) part of Han'you-Denshi characters" + `(long-name "Han'you-Denshi/HG" + chars 94 + dimension 2 + columns 2 + graphic 2 + direction l2r + registry "HanyoDenshi\\.HG-0$" + min-code ,(+ (lsh #x6400 16) (* 94 94 7)) + max-code ,(+ (lsh #x6400 16) (1- (* 94 94 8))) + code-offset ,(+ (lsh #x6400 16) (* 94 94 7)))) + (make-charset + '=hanyo-denshi/ip + "IP (for IPA) part of Han'you-Denshi characters" + `(long-name "Han'you-Denshi/IP" + chars 256 + dimension 2 + columns 2 + graphic 2 + direction l2r + registry "HanyoDenshi\\.IP-0$" + min-code ,(+ (lsh #x6402 16) #x4E00) + max-code ,(+ (lsh #x6402 16) #x9FFF) + code-offset ,(+ (lsh #x6402 16)))) + (make-charset + '=hanyo-denshi/jt + "JT (Juuki Touitsu Moji) part of Han'you-Denshi characters" + `(long-name "Han'you-Denshi/JT" + chars 256 + dimension 2 + columns 2 + graphic 2 + direction l2r + registry "HanyoDenshi\\.JT-0$" + min-code ,(+ (lsh #x6402 16) #xAC00) + max-code ,(+ (lsh #x6402 16) #xD7AF) + code-offset ,(+ (lsh #x6402 16)))) + (make-charset + '=hanyo-denshi/ks + "KS (KoSeki) part of Han'you-Denshi characters" + `(long-name "Han'you-Denshi/KS font encoding" + chars 256 + dimension 3 + columns 2 + graphic 2 + direction l2r)) + (make-charset + '=hanyo-denshi/ks/mf + "font encoding for KS (KoSeki) characters" + `(long-name "Han'you-Denshi/KS font encoding" + chars 256 + dimension 2 + columns 2 + graphic 2 + direction l2r + registry "HanyoDenshi\\.KSMF-0$" + min-code ,(lsh #x6403 16) + max-code ,(+ (lsh #x6403 16) #xFFFF) + code-offset ,(lsh #x6403 16))) + + (make-charset + '=>>>hanyo-denshi/ja + "Han'you-Denshi/JA abstract glyph-forms" + '(long-name "Han'you-Denshi/JA glyph-forms" + chars 94 + dimension 2 + columns 2 + graphic 2 + direction l2r + registry "HanyoDenshi\\.JA-0$" + mother =hanyo-denshi/ja)) + (make-charset + '=>>>hanyo-denshi/jc + "Han'you-Denshi/JC abstract glyph-forms" + '(long-name "Han'you-Denshi/JC glyph-forms" + chars 94 + dimension 2 + columns 2 + graphic 2 + direction l2r + registry "HanyoDenshi\\.JC-0$" + mother =hanyo-denshi/jc)) + (make-charset + '=>>>hanyo-denshi/ft + "Han'you-Denshi/FT abstract glyph-forms" + '(long-name "Han'you-Denshi/FT glyph-forms" + chars 94 + dimension 2 + columns 2 + graphic 2 + direction l2r + registry "HanyoDenshi\\.FT-0$" + mother =hanyo-denshi/ft)) + (make-charset + '=>>>hanyo-denshi/ib + "Han'you-Denshi/IB abstract glyph-forms" + '(long-name "Han'you-Denshi/IB glyph-forms" + chars 94 + dimension 2 + columns 2 + graphic 2 + direction l2r + registry "HanyoDenshi\\.IB-0$" + mother =hanyo-denshi/ib)) + (make-charset + '=>>>hanyo-denshi/jt + "JT (Juuki Touitsu Moji) abstract glyph-forms" + '(long-name "Han'you-Denshi/JT glyph-forms" + chars 256 + dimension 2 + columns 2 + graphic 2 + direction l2r + registry "HanyoDenshi\\.JT-0$" + mother =hanyo-denshi/jt)) + (make-charset + '=>>>hanyo-denshi/ks + "KoSeki-touitsu-moji abstract glyph-forms" + '(long-name "Han'you-Denshi/KS glyph-forms" + chars 256 + dimension 3 + columns 2 + graphic 2 + direction l2r + mother =hanyo-denshi/ks)) + + (make-charset + '=>>hanyo-denshi/ja + "Han'you-Denshi/JA abstract glyphs" + '(long-name "Han'you-Denshi/JA glyphs" + chars 94 + dimension 2 + columns 2 + graphic 2 + direction l2r + registry "HanyoDenshi\\.JA-0$" + mother =>>>hanyo-denshi/ja)) + (make-charset + '=>>hanyo-denshi/jb + "Han'you-Denshi/JB abstract glyphs" + '(long-name "Han'you-Denshi/JB glyphs" + chars 94 + dimension 2 + columns 2 + graphic 2 + direction l2r + registry "HanyoDenshi\\.JB-0$" + mother =hanyo-denshi/jb)) + (make-charset + '=>>hanyo-denshi/jc + "Han'you-Denshi/JC abstract glyphs" + '(long-name "Han'you-Denshi/JC glyphs" + chars 94 + dimension 2 + columns 2 + graphic 2 + direction l2r + registry "HanyoDenshi\\.JC-0$" + mother =>>>hanyo-denshi/jc)) (make-charset - '=>jis-x0208 - "JIS X 0208 based on the unchanged unification rules." - '(registry "jisx0208\\.1990" - dimension 2 - chars 94 - mother =>jis-x0208@usual - =>iso-ir 168 - ;; final ?B - graphic 0)) - (define-charset-alias '<=>jis-x0208 '=>jis-x0208) + '=>>hanyo-denshi/jd + "Han'you-Denshi/JD abstract glyphs" + '(long-name "Han'you-Denshi/JD glyphs" + chars 94 + dimension 2 + columns 2 + graphic 2 + direction l2r + registry "HanyoDenshi\\.JD-0$" + mother =hanyo-denshi/jd)) (make-charset - '=>jis-x0208@1997 - "JIS X 0208 based on the unification rule of 1997 edition." - '(registry "jisx0208\\.1990" - dimension 2 - chars 94 - mother =>jis-x0208 - =>iso-ir 168 - ;; final ?B - graphic 0)) - (define-charset-alias '<=>jis-x0208@1997 '=>jis-x0208@1997) - (define-charset-alias ' =jis-x0208@1997 '=>jis-x0208@1997) - + '=>>hanyo-denshi/ft + "Han'you-Denshi/FT abstract glyphs" + '(long-name "Han'you-Denshi/FT glyphs" + chars 94 + dimension 2 + columns 2 + graphic 2 + direction l2r + registry "HanyoDenshi\\.FT-0$" + mother =>>>hanyo-denshi/ft)) (make-charset - '=>jis-x0213-1 - "JIS X 0213 Plain 1 abstract characters (unchanged part)" - '(registry "jisx0213\\(\\.[0-9]+\\)?-1" - dimension 2 - chars 94 - mother =>>jis-x0213-1 - =>iso-ir 228 - ;; final ?O - graphic 0 - ;; partial t - )) - (define-charset-alias '<=>jis-x0213-1 '=>jis-x0213-1) + '=>>hanyo-denshi/ia + "Han'you-Denshi/IA abstract glyphs" + '(long-name "Han'you-Denshi/IA glyphs" + chars 94 + dimension 2 + columns 2 + graphic 2 + direction l2r + registry "HanyoDenshi\\.IA-0$" + mother =hanyo-denshi/ia)) (make-charset - '=>jis-x0213-1@2000 - "JIS X 0213:2000 Plain 1 abstract characters" - '(registry "jisx0213\\(\\.2000\\)-1" - dimension 2 - chars 94 - mother =>jis-x0213-1 - =>iso-ir 228 - ;; final ?O - graphic 0 - ;; partial t - )) - (define-charset-alias '<=>jis-x0213-1@2000 '=>jis-x0213-1@2000) + '=>>hanyo-denshi/ib + "Han'you-Denshi/IB abstract glyphs" + '(long-name "Han'you-Denshi/IB abstract glyphs" + chars 94 + dimension 2 + columns 2 + graphic 2 + direction l2r + registry "HanyoDenshi\\.IB-0$" + mother =>>>hanyo-denshi/ib)) (make-charset - '=>jis-x0213-1@2004 - "JIS X 0213:2004 Plain 1 abstract characters" - '(registry "jisx0213\\(\\.2004\\)-1" - dimension 2 - chars 94 - mother =>jis-x0213-1 - =>iso-ir 233 - ;; final ?Q - graphic 0 - ;; partial t - )) - (define-charset-alias '<=>jis-x0213-1@2004 '=>jis-x0213-1@2004) + '=>>hanyo-denshi/hg + "Han'you-Denshi/HG abstract glyphs" + '(long-name "Han'you-Denshi/HG abstract glyphs" + chars 94 + dimension 2 + columns 2 + graphic 2 + direction l2r + registry "HanyoDenshi\\.HG-0$" + mother =hanyo-denshi/hg)) (make-charset - '=>jis-x0213-2 - "JIS X 0213 Plain 2 abstract characters" - '(registry "jisx0213\\(\\.\\(2000\\|2004\\)\\)?-2" - dimension 2 - chars 94 - mother =>>jis-x0213-2 - =>iso-ir 229 - ;; final ?P - graphic 0)) - - (make-charset '=big5-cdp - "Big5 with CDP extension" - '(long-name "Big5-CDP" - chars 256 - dimension 2 - columns 2 - graphic 2 - direction l2r - registry "big5\\.cdp-0" - mother chinese-big5 - min-code #x8140 - max-code #x8DFE)) - (define-charset-alias 'chinese-big5-cdp '=big5-cdp) - - (make-charset '=>>big5-cdp - "Abstract glyphs of Big5-CDP" - '(long-name "Big5-CDP glyphs" - chars 256 - dimension 2 - columns 2 - graphic 2 - direction l2r - registry "big5\\.cdp-0" - mother =big5-cdp)) - - (make-charset '=>big5-cdp - "Big5-CDP abstract characters" - '(long-name "Big5-CDP abstract characters" - chars 256 - dimension 2 - columns 2 - graphic 2 - direction l2r - registry "big5\\.cdp-0" - mother =>>big5-cdp)) + '=>>hanyo-denshi/jt + "JT (Juuki Touitsu Moji) abstract glyphs" + '(long-name "Han'you-Denshi/JT glyphs" + chars 256 + dimension 2 + columns 2 + graphic 2 + direction l2r + registry "HanyoDenshi\\.JT-0$" + mother =>>>hanyo-denshi/jt)) + (make-charset + '=>>hanyo-denshi/ks + "Han'you-Denshi/KS abstract glyphs" + '(long-name "Han'you-Denshi/KS glyphs" + chars 256 + dimension 3 + columns 2 + graphic 2 + direction l2r + mother =>>>hanyo-denshi/ks)) (make-charset '=gt "GT 2000" @@ -553,6 +1357,15 @@ max-code ,(+ (lsh #x6100 16) 67547) code-offset ,(lsh #x6100 16))) (define-charset-alias 'ideograph-gt '=gt) + (make-charset '=>>>gt + "GT 2000 abstract glyph-forms" + '(long-name "GT abstract glyph-forms" + chars 256 + dimension 3 + columns 2 + graphic 2 + direction l2r + mother =gt)) (make-charset '=>>gt "GT 2000 abstract glyphs" '(long-name "GT abstract glyphs" @@ -561,9 +1374,18 @@ columns 2 graphic 2 direction l2r - mother =gt)) + mother =>>>gt)) (define-charset-alias '<=>gt '=>>gt) (define-charset-alias '<==>gt '=>>gt) + (make-charset '=+>gt + "GT 2000 unified abstract glyphs" + '(long-name "Unified abstract GT glyphs" + chars 256 + dimension 3 + columns 2 + graphic 2 + direction l2r + mother =>>gt)) (make-charset '=>gt "GT 2000 abstract characters" '(long-name "abstract GT characters" @@ -572,7 +1394,7 @@ columns 2 graphic 2 direction l2r - mother =>>gt)) + mother =+>gt)) (make-charset '=gt-k "Ideographic components of GT" `(long-name "GT components" @@ -595,6 +1417,15 @@ graphic 2 direction l2r mother =gt-k)) + (make-charset '=>gt-k + "GT-K abstract characters" + '(long-name "GT-K abstract characters" + chars 256 + dimension 2 + columns 2 + graphic 2 + direction l2r + mother =>>gt-k)) (let ((i 1)) (while (<= i 11) (make-charset @@ -650,21 +1481,20 @@ (make-charset '=daikanwa@rev1 "Daikanwa dictionary (revised version)" - `(long-name "Daikanwa Rev." + '(long-name "Daikanwa Rev." chars 256 dimension 2 columns 2 graphic 2 direction l2r registry "Daikanwa\\(\\.[0-9]+\\)?-2" - mother =daikanwa - )) + mother =daikanwa)) (define-charset-alias 'ideograph-daikanwa-2 '=daikanwa@rev1) (define-charset-alias '=daikanwa-rev1 '=daikanwa@rev1) (make-charset '=daikanwa@rev2 "Daikanwa dictionary (revised version 2)" - `(long-name "Daikanwa" + '(long-name "Daikanwa" chars 256 dimension 2 columns 2 @@ -673,13 +1503,34 @@ registry "Daikanwa\\(\\.[0-9]+\\)?-3" mother =daikanwa min-code 1 - max-code 49964 - ;; min-code #xE00000 - ;; max-code ,(+ #xE00000 50100) - ;; code-offset #xE00000 - )) + max-code 49964)) (define-charset-alias '=daikanwa-rev2 '=daikanwa@rev2) + (make-charset '=daikanwa/+p + "Daikanwa dictionary (ddddd')" + '(long-name "Daikanwa ddddd'" + chars 256 + dimension 2 + columns 2 + graphic 2 + direction l2r)) + (make-charset '=daikanwa/+2p + "Daikanwa dictionary (ddddd'')" + '(long-name "Daikanwa ddddd''" + chars 256 + dimension 2 + columns 2 + graphic 2 + direction l2r)) + (make-charset '=daikanwa/ho + "Daikanwa dictionary (Hokan)" + '(long-name "Daikanwa-ho" + chars 256 + dimension 2 + columns 2 + graphic 2 + direction l2r)) + (make-charset '=>>daikanwa "Daikanwa abstract glyphs" '(long-name "Daikanwa glyphs" @@ -690,6 +1541,33 @@ direction l2r registry "Daikanwa\\(\\.[0-9]+\\)?-3" mother =daikanwa)) + (make-charset '=>>daikanwa/+p + "Daikanwa abstract glyphs (ddddd')" + '(long-name "Daikanwa glyphs (ddddd')" + chars 256 + dimension 2 + columns 2 + graphic 2 + direction l2r + mother =daikanwa/+p)) + (make-charset '=>>daikanwa/+2p + "Daikanwa abstract glyphs (ddddd'')" + '(long-name "Daikanwa glyphs (ddddd'')" + chars 256 + dimension 2 + columns 2 + graphic 2 + direction l2r + mother =daikanwa/+2p)) + (make-charset '=>>daikanwa/ho + "Daikanwa abstract glyphs (Hokan)" + '(long-name "Daikanwa-ho glyph" + chars 256 + dimension 2 + columns 2 + graphic 2 + direction l2r + mother =daikanwa/ho)) (make-charset '=>daikanwa "Daikanwa abstract characters" @@ -701,6 +1579,15 @@ direction l2r registry "Daikanwa\\(\\.[0-9]+\\)?-3" mother =>>daikanwa)) + (make-charset '=>daikanwa/ho + "Daikanwa abstract characters (Hokan)" + '(long-name "abstract Daikanwa-ho" + chars 256 + dimension 2 + columns 2 + graphic 2 + direction l2r + mother =>>daikanwa/ho)) (make-charset '=shinjigen "Kadokawa ShinJigen dictionary (common parts)" @@ -766,43 +1653,6 @@ mother chinese-big5 registry "Big5\\.ETEN")) (define-charset-alias 'chinese-big5-pua '=big5-pua) - (make-charset '=big5-eten - "Big5 ETEN" - '(long-name "Big5-ETEN" - chars 256 - dimension 2 - columns 2 - graphic 2 - direction l2r - mother chinese-big5 - min-code #x8140 - max-code #xFEFE - registry "Big5\\.ETEN")) - (define-charset-alias 'chinese-big5-eten '=big5-eten) - (make-charset 'chinese-big5-eten-a - "Big5 ETEN (#xF9D6 .. #xF9FE)" - '(long-name "Big5-ETEN-a" - chars 256 - dimension 2 - columns 2 - graphic 2 - direction l2r - mother chinese-big5 - min-code #xF9D6 - max-code #xF9FE - registry "Big5\\.ETEN")) - (make-charset 'chinese-big5-eten-b - "Big5 ETEN (#xC6A1 .. #xC8FE)" - '(long-name "Big5-ETEN-b" - chars 256 - dimension 2 - columns 2 - graphic 2 - direction l2r - mother chinese-big5 - min-code #xC6A1 - max-code #xC8FE - registry "Big5\\.ETEN")) (let* ((i 1) (hzk-min (+ (lsh #x6200 16) 65536)) @@ -838,8 +1688,18 @@ max-code #xE2FFFF code-offset #xE20000 columns 2 - direction l2r)) - (define-charset-alias 'ideograph-cbeta '=cbeta) + direction l2r)) + (define-charset-alias 'ideograph-cbeta '=cbeta) + + (make-charset '=>>cbeta "CBETA abstract glyphs" + '(long-name "CBETA glyphs" + chars 256 + dimension 2 + registry "cbeta-0" + graphic 2 + columns 2 + direction l2r + mother =cbeta)) (make-charset '=zinbun-oracle "Oracle Bones Script" @@ -892,6 +1752,16 @@ min-code #xE90000 ; #xE000 max-code #xE908FF ; #xE8FF code-offset ,(- #xE90000 #xE000))) + (make-charset '=>>ruimoku-v6 + "RUIMOKU Version.6 glyphs" + '(long-name "RUI6 glyphs" + chars 256 + dimension 2 + columns 2 + graphic 2 + direction l2r + registry "rui6-0" + mother =ruimoku-v6)) (make-charset '==>ucs@bucs "Basic Subset of Coded Character Sets (BUCS)" @@ -924,8 +1794,18 @@ direction l2r =>iso-ir 177 mother =>ucs@iso)) + (make-charset '=>ucs@jis + "UCS representative characters for JIS X0208/0212/0213" + '(long-name "UCS characters for JIS" + chars 256 + dimension 3 + columns 2 + graphic 2 + direction l2r + =>iso-ir 177 + mother =>ucs@unicode)) (make-charset '=>ucs@ks - "UCS Representative characters for Korean Standards" + "UCS representative characters for Korean Standards" '(long-name "UCS characters for KS" chars 256 dimension 3 @@ -945,9 +1825,9 @@ =>iso-ir 177 mother =>ucs@unicode)) - (make-charset '=>>ucs@iso - "Representative abstract glyphs of ISO/IEC 10646" - '(long-name "UCS glyphs for UCS" + (make-charset '=+>ucs@iso + "UCS based on ISO/IEC 10646 representative glyphs" + '(long-name "Unified abstract glyphs of UCS" chars 256 dimension 3 columns 2 @@ -955,8 +1835,81 @@ direction l2r =>iso-ir 177 mother =>ucs@iso)) + (make-charset '=+>ucs@unicode + "Unicode representative unified abstract glyphs" + '(long-name "UCS unified abstract glyphs for Unicode" + chars 256 + dimension 3 + columns 2 + graphic 2 + direction l2r + =>iso-ir 177 + mother =+>ucs@iso)) + (make-charset '=+>ucs@jis + "UCS based on Japanese usual unification" + '(long-name "UCS unified abstract glyphs for JP" + chars 256 + dimension 3 + columns 2 + graphic 2 + direction l2r + =>iso-ir 177 + mother =+>ucs@unicode)) + (define-charset-alias '=>ucs@JP '=+>ucs@jis) + (make-charset '=+>ucs@jis/1990 + "UCS representative characters for JIS X0208/0212:1990" + '(long-name "UCS characters for JIS:1990" + chars 256 + dimension 3 + columns 2 + graphic 2 + direction l2r + =>iso-ir 177 + mother =+>ucs@jis)) + (define-charset-alias '=>ucs@jis/1990 '=+>ucs@jis/1990) + (make-charset '=+>ucs@jis/2004 + "UCS representative characters for JIS X 0213:2004" + '(long-name "UCS characters for JIS:2004" + chars 256 + dimension 3 + columns 2 + graphic 2 + direction l2r + =>iso-ir 177 + mother =+>ucs@jis)) + (make-charset '=+>ucs@ks + "UCS representative unified abstract glyphs for Korean Standards" + '(long-name "UCS unified abstract glyphs for KS" + chars 256 + dimension 3 + columns 2 + graphic 2 + direction l2r + =>iso-ir 177 + mother =+>ucs@unicode)) + (make-charset '=+>ucs@cns + "UCS representatives unified abstract glyphs for CNS 11643 sources" + '(long-name "UCS unified abstract glyphs for CNS" + chars 256 + dimension 3 + columns 2 + graphic 2 + direction l2r + =>iso-ir 177 + mother =+>ucs@unicode)) + + (make-charset '=>>ucs@iso + "Representative abstract-glyphs of ISO/IEC 10646" + '(long-name "UCS abstract glyphs for UCS" + chars 256 + dimension 3 + columns 2 + graphic 2 + direction l2r + =>iso-ir 177 + mother =+>ucs@iso)) (make-charset '=>>ucs@unicode - "Representative abstract glyphs of Unicode" + "Representative abstract-glyphs of Unicode" '(long-name "Unicode abstract glyphs" chars 256 dimension 3 @@ -966,8 +1919,8 @@ =>iso-ir 177 mother =>>ucs@iso)) (make-charset '=>>ucs@jis - "UCS Representative glyphs for JIS X0208/0212/0213" - '(long-name "UCS glyphs for JIS" + "UCS Representative abstract-glyphs for JIS X0208/0212/0213" + '(long-name "UCS abstract glyphs for JIS" chars 256 dimension 3 columns 2 @@ -1005,6 +1958,16 @@ direction l2r =>iso-ir 177 mother =>>ucs@jis)) + (make-charset '=>>ucs@JP + "UCS abstract-glyphs based on Japanese style glyphs" + '(long-name "UCS glyphs for JP" + chars 256 + dimension 3 + columns 2 + graphic 2 + direction l2r + =>iso-ir 177 + mother =>>ucs@jis/2004)) (make-charset '=>>ucs@ks "UCS Representative glyphs for Korean Standards" '(long-name "UCS glyphs for KS" @@ -1026,6 +1989,87 @@ =>iso-ir 177 mother =>>ucs@unicode)) + (make-charset '=>>>ucs@iso + "Representative glyph-forms of ISO/IEC 10646" + '(long-name "UCS glyph-forms for UCS" + chars 256 + dimension 3 + columns 2 + graphic 2 + direction l2r + =>iso-ir 177 + mother =>>ucs@iso)) + (make-charset '=>>>ucs@unicode + "Representative glyph-forms of Unicode" + '(long-name "UCS glyph-forms for Unicode" + chars 256 + dimension 3 + columns 2 + graphic 2 + direction l2r + =>iso-ir 177 + mother =>>>ucs@iso)) + (make-charset '=>>>ucs@jis + "UCS Representative glyph-forms for JIS X0208/0212/0213" + '(long-name "UCS glyph-forms for JIS" + chars 256 + dimension 3 + columns 2 + graphic 2 + direction l2r + =>iso-ir 177 + mother =>>>ucs@unicode)) + (make-charset '=>>>ucs@jis/1990 + "UCS Representative glyph-forms for JIS X 0208/0212:1990" + '(long-name "UCS glyph-forms for JIS:1990" + chars 256 + dimension 3 + columns 2 + graphic 2 + direction l2r + =>iso-ir 177 + mother =>>>ucs@jis)) + (make-charset '=>>>ucs@jis/2000 + "UCS Representative glyph-forms for JIS X 0213:2000" + '(long-name "UCS glyph-forms for JIS:2000" + chars 256 + dimension 3 + columns 2 + graphic 2 + direction l2r + =>iso-ir 177 + mother =>>>ucs@jis)) + (make-charset '=>>>ucs@jis/2004 + "UCS Representative glyph-forms for JIS X 0213:2004" + '(long-name "UCS glyph-forms for JIS:2004" + chars 256 + dimension 3 + columns 2 + graphic 2 + direction l2r + =>iso-ir 177 + mother =>>>ucs@jis)) + (make-charset '=>>>ucs@ks + "UCS Representative glyph-forms for Korean Standards" + '(long-name "UCS glyph-forms for KS" + chars 256 + dimension 3 + columns 2 + graphic 2 + direction l2r + =>iso-ir 177 + mother =>>>ucs@unicode)) + (make-charset '=>>>ucs@cns + "UCS Representative glyph-forms for CNS 11643 sources" + '(long-name "UCS glyph-forms for CNS" + chars 256 + dimension 3 + columns 2 + graphic 2 + direction l2r + =>iso-ir 177 + mother =>>>ucs@unicode)) + (make-charset '=ucs@iso "ISO/IEC 10646 for its representative glyphs" '(long-name "UCS for ISO" @@ -1035,7 +2079,7 @@ graphic 2 direction l2r =>iso-ir 177 - mother =>>ucs@iso)) + mother =>>>ucs@iso)) (make-charset '=ucs@unicode "Unicode for its representative glyphs" '(long-name "UCS for Unicode" @@ -1142,6 +2186,16 @@ mother =ucs@jis min-code #x0000 max-code #xFFFF)) + ;; (make-charset '=ucs@jis/1983 + ;; "ISO/IEC 10646 for JIS X 0208:1983" + ;; '(long-name "UCS for JIS:1983" + ;; chars 256 + ;; dimension 3 + ;; columns 2 + ;; graphic 2 + ;; direction l2r + ;; =>iso-ir 177 + ;; mother =ucs@jis)) (make-charset '=ucs@jis/1990 "ISO/IEC 10646 for JIS X 0208/0212:1990" '(long-name "UCS for JIS:1990" @@ -1187,6 +2241,16 @@ =>iso-ir 177 mother =ucs@jis/2004)) (define-charset-alias '=ucs@jp '=ucs@JP) + (make-charset '=ucs@JP/hanazono + "Japanese glyph-images of Hanazono Mincho" + '(long-name "UCS for Hana-Min" + chars 256 + dimension 3 + columns 2 + graphic 2 + direction l2r + =>iso-ir 177 + mother =ucs@JP)) (make-charset '=ucs@ks "ISO/IEC 10646 for Korean Standards" '(long-name "UCS for KS" @@ -1308,151 +2372,134 @@ ;; max-code #xA4CF )) (make-charset - '==>ucs-bmp-cjk@bucs - "CJK Characters in BMP of BUCS" - '(long-name "BUCS-BMP-CJK" + '=ucs-bmp-cjk@JP + "CJK Characters in BMP with JIS representative glyphs" + '(long-name "CJK in BMP@JP" chars 256 dimension 2 columns 2 graphic 2 direction l2r - registry "-zh-.*-ucs-0" - mother ==>ucs@bucs + registry "-ja-.*-ucs-0" + mother =ucs@JP min-code #x2E00 max-code #x9FA5 ;; max-code #xA4CF )) (make-charset - '=ucs-sip-ext-b - "CJK Ideographs Extension B" - '(long-name "UCS CJK Ext-B" - chars 256 - dimension 2 - columns 2 - graphic 2 - direction l2r - registry "\\(iso10646\\|ucs02\\)-2$" - mother ucs - min-code #x20000 max-code #x2A6D6 - code-offset #x20000)) - (make-charset - '=ucs-sip-ext-b@iso - "CJK Ideographs Extension B (ISO/IEC 10646-2)" - '(long-name "UCS CJK Ext-B" - chars 256 - dimension 2 - columns 2 - graphic 2 - direction l2r - registry "\\(iso10646\\|ucs02\\)-2$" - mother =ucs@iso - min-code #x20000 max-code #x2A6D6 - code-offset #x20000)) - - (make-charset - '=adobe-japan1-base - "Adobe-Japan1 Character Collection for CID-Keyed Fonts" - `(long-name "Adobe-Japan1" + '=ucs-bmp-cjk@JP/hanazono + "CJK Characters in BMP with Hanazono font" + '(long-name "CJK in BMP@JP/Hanazono" chars 256 dimension 2 columns 2 graphic 2 direction l2r - registry "AdobeJapan1-[0-6]$" - min-code ,(lsh #x6300 16) - max-code ,(+ (lsh #x6300 16) 23057) - code-offset ,(lsh #x6300 16))) + registry "-ja-.*-ucs-0" + mother =ucs@JP/hanazono + min-code #x2E00 + max-code #x9FA5 + ;; max-code #xA4CF + )) (make-charset - '=adobe-japan1-0 - "Adobe-Japan1-0 Character Collection for CID-Keyed Fonts" - '(long-name "Adobe-Japan1-0" + '=+>ucs-bmp-cjk@unicode + "Unicode representative characters of CJK Unified Ideographs in BMP" + '(long-name "Unicode-BMP-CJK unified abstract glyphs" chars 256 dimension 2 columns 2 graphic 2 direction l2r - mother =adobe-japan1-base - min-code 0 - max-code 8283 - registry "AdobeJapan1-0$")) + registry "-zh-.*-ucs-0" + mother =+>ucs@unicode + min-code #x2E00 + max-code #x9FA5 + ;; max-code #xA4CF + )) (make-charset - '=adobe-japan1-1 - "Adobe-Japan1-1 Character Collection for CID-Keyed Fonts" - '(long-name "Adobe-Japan1-1" + '=>ucs-bmp-cjk@unicode + "Unicode representative characters of CJK Unified Ideographs in BMP" + '(long-name "Unicode-BMP-CJK" chars 256 dimension 2 columns 2 graphic 2 direction l2r - mother =adobe-japan1-0 - min-code 0 - max-code 8358 - registry "AdobeJapan1-1$")) + registry "-zh-.*-ucs-0" + mother =>ucs@unicode + min-code #x2E00 + max-code #x9FA5 + ;; max-code #xA4CF + )) (make-charset - '=adobe-japan1-2 - "Adobe-Japan1-2 Character Collection for CID-Keyed Fonts" - '(long-name "Adobe-Japan1-2" + '==>ucs-bmp-cjk@bucs + "CJK Characters in BMP of BUCS" + '(long-name "BUCS-BMP-CJK" chars 256 dimension 2 columns 2 graphic 2 direction l2r - mother =adobe-japan1-1 - min-code 0 - max-code 8719 - registry "AdobeJapan1-2$")) + registry "-zh-.*-ucs-0" + mother ==>ucs@bucs + min-code #x2E00 + max-code #x9FA5 + ;; max-code #xA4CF + )) (make-charset - '=adobe-japan1-3 - "Adobe-Japan1-3 Character Collection for CID-Keyed Fonts" - '(long-name "Adobe-Japan1-3" + '=ucs-bmp-cjk-compat + "CJK Compatibility Ideographs in BMP of UCS" + '(long-name "CJK Compatibility Ideographs" chars 256 dimension 2 columns 2 graphic 2 direction l2r - mother =adobe-japan1-2 - min-code 0 - max-code 9353 - registry "AdobeJapan1-3$")) + registry "-ja-.*-ucs-0" + mother ucs-bmp + min-code #xF900 + max-code #xFAFF + )) (make-charset - '=adobe-japan1-4 - "Adobe-Japan1-4 Character Collection for CID-Keyed Fonts" - '(long-name "Adobe-Japan1-4" + '=ucs-bmp-cjk-compat@unicode + "CJK Compatibility Ideographs of Unicode representatives" + '(long-name "CJK Compatibility Ideographs of Unicode" chars 256 dimension 2 columns 2 graphic 2 direction l2r - mother =adobe-japan1-3 - min-code 0 - max-code 15443 - registry "AdobeJapan1-4$")) + registry "-ja-.*-ucs-0" + mother =ucs@unicode + min-code #xF900 + max-code #xFAFF + )) (make-charset - '=adobe-japan1-5 - "Adobe-Japan1-5 Character Collection for CID-Keyed Fonts" - '(long-name "Adobe-Japan1-5" + '=ucs-sip-ext-b + "CJK Ideographs Extension B" + '(long-name "UCS CJK Ext-B" chars 256 dimension 2 columns 2 graphic 2 direction l2r - mother =adobe-japan1-4 - min-code 0 - max-code 20316 - registry "AdobeJapan1-5$")) + registry "\\(iso10646\\|ucs02\\)-2$" + mother ucs + min-code #x20000 max-code #x2A6D6 + code-offset #x20000)) (make-charset - '=adobe-japan1-6 - "Adobe-Japan1-6 Character Collection for CID-Keyed Fonts" - '(long-name "Adobe-Japan1-6" + '=ucs-sip-ext-b@iso + "CJK Ideographs Extension B (ISO/IEC 10646-2)" + '(long-name "UCS CJK Ext-B" chars 256 dimension 2 columns 2 graphic 2 direction l2r - mother =adobe-japan1-5 - min-code 0 - max-code 23057 - registry "AdobeJapan1-6$")) + registry "\\(iso10646\\|ucs02\\)-2$" + mother =ucs@iso + min-code #x20000 max-code #x2A6D6 + code-offset #x20000)) ) ;;; mule-conf.el ends here