(===hng-zkd): New coded-charset for XEmacs CHISE.
[chise/xemacs-chise.git.1] / lisp / mule / mule-conf.el
index 21b1809..12acd8a 100644 (file)
              graphic 0
              partial t))
   (make-charset
+   '==jis-x0208@1978/-4X
+   "JIS X 0208:1978, index before the 4th impression."
+   '(registry "jisx0208\\.1978"
+             dimension 2
+             chars 94
+             mother ==jis-x0208@1978
+             =>iso-ir 42
+              ;; final ?@
+             graphic 0
+             partial t))
+  (make-charset
    '==jis-x0208@1978/2-pr
    "JIS X 0208:1978, 2nd impression or later."
    '(registry "jisx0208\\.1978"
              graphic 0
              partial t))
   (make-charset
+   '==jis-x0208@1978/4-pr
+   "JIS X 0208:1978, 4th impression or later."
+   '(registry "jisx0208\\.1978"
+             dimension 2
+             chars 94
+             mother ==jis-x0208@1978/2-pr
+              =>iso-ir 42
+             ;; final ?@
+             graphic 0
+             partial t))
+  (make-charset
    '==jis-x0208@1978/5pr
    "JIS X 0208:1978, 5th impression."
    '(registry "jisx0208\\.1978"
              dimension 2
              chars 94
-              ;; mother ==jis-x0208@1978/4-pr
-              mother ==jis-x0208@1978/2-pr
+             mother ==jis-x0208@1978/4-pr
               =>iso-ir 42
              ;; final ?@
              graphic 0
    '(registry "jisx0208\\.1978"
              dimension 2
              chars 94
-             mother ===jis-x0208
+             mother ==jis-x0208@1978
              =>iso-ir 42
              ;; final ?@
              graphic 0))
    '(registry "jisx0208\\.1983"
              dimension 2
              chars 94
-             mother ===jis-x0208
+             mother ==jis-x0208@1983
              =>iso-ir 87
              graphic 0))
   (make-charset
    '(registry "jisx0208\\.1990"
              dimension 2
              chars 94
-             mother ===jis-x0208
+             mother ==jis-x0208@1990
              =>iso-ir 168
              ;; final ?B
              graphic 0))
    '(registry "jisx0213\\(\\.2000\\)-1"
              dimension 2
              chars 94
-             mother ===jis-x0213-1
+             mother ==jis-x0213-1@2000
              =>iso-ir 228
              ;; final ?O
              graphic 0
   (make-charset
    '===jis-x0213-1@2004
    "JIS X 0213:2004 Plain 1 detailed representative glyph-images."
-   '(mother ===jis-x0213-1
+   '(mother ==jis-x0213-1@2004
            =>iso-ir 233
            ;; registry "jisx0213\\(\\.2004\\)-1"
            dimension 2
              =>iso-ir 172
              graphic 0))
   (make-charset
+   '=>cns11643-5
+   "CNS 11643 Plane 5 abstract characters."
+   '(registry "CNS11643[.-]\\(.*[.-]\\)?5$"
+             dimension 2
+             chars 94
+             mother =cns11643-5
+             =>iso-ir 185
+             graphic 0))
+  (make-charset
    '=>cns11643-6
    "CNS 11643 Plane 6 abstract characters."
    '(registry "CNS11643[.-]\\(.*[.-]\\)?6$"
                  graphic       2
                  direction     l2r
                  mother        =daikanwa/+p))
+  (make-charset '==daikanwa/+2p
+               "Daikanwa detailed glyph-images (ddddd'')"
+               '(long-name     "Daikanwa glyph-images ddddd''"
+                 chars         256
+                 dimension     2
+                 columns       2
+                 graphic       2
+                 direction     l2r
+                 mother        =daikanwa/+2p))
   (make-charset '==daikanwa/ho
                "Daikanwa detailed glyph-images (Hokan)"
                '(long-name     "Daikanwa-ho detailed glyph-images"
            hzk-max (+ hzk-min 65535))
       (setq i (1+ i))))
 
+  (make-charset '===hng-jou "HNG:誠實論卷八(P.2179)"
+               '(long-name "HNG/P2179"
+                 chars         256
+                 dimension     2
+                 registry      "hng-1$"
+                 graphic       2
+                 columns       2
+                 direction     l2r))
+  (make-charset '===hng-keg "HNG:華嚴經卷十六(S.2067)"
+               '(long-name "HNG/S2067"
+                 chars         256
+                 dimension     2
+                 registry      "hng-2$"
+                 graphic       2
+                 columns       2
+                 direction     l2r))
+  (make-charset '===hng-dng "HNG:大般涅槃經卷十一(S.81)"
+               '(long-name "HNG/S81"
+                 chars         256
+                 dimension     2
+                 registry      "hng-3$"
+                 graphic       2
+                 columns       2
+                 direction     l2r))
+  (make-charset '===hng-mam "HNG:摩訶摩耶經卷上(P.2160)"
+               '(long-name "HNG/P2160"
+                 chars         256
+                 dimension     2
+                 registry      "hng-5$"
+                 graphic       2
+                 columns       2
+                 direction     l2r))
+  (make-charset '===hng-drt "HNG:大樓炭經卷三(P.2413)"
+               '(long-name "HNG/P2413"
+                 chars         256
+                 dimension     2
+                 registry      "hng-6$"
+                 graphic       2
+                 columns       2
+                 direction     l2r))
+  (make-charset '===hng-kgk "HNG:賢劫經卷二(正倉院本)"
+               '(long-name "HNG/賢劫經二"
+                 chars         256
+                 dimension     2
+                 registry      "hng-7$"
+                 graphic       2
+                 columns       2
+                 direction     l2r))
+  (make-charset '===hng-myz "HNG:妙法蓮華經卷五(P.2334)"
+               '(long-name "HNG/P2334"
+                 chars         256
+                 dimension     2
+                 registry      "hng-8$"
+                 graphic       2
+                 columns       2
+                 direction     l2r))
+  (make-charset '===hng-kda "HNG:大品經卷二十八(京都国立博物館本)"
+               '(long-name "HNG/京博大品"
+                 chars         256
+                 dimension     2
+                 registry      "hng-9$"
+                 graphic       2
+                 columns       2
+                 direction     l2r))
+  (make-charset '===hng-khi "HNG:妙法蓮華經卷五(今西本)"
+               '(long-name "HNG/宮廷今西"
+                 chars         256
+                 dimension     2
+                 registry      "hng-10$"
+                 graphic       2
+                 columns       2
+                 direction     l2r))
+  (make-charset '===hng-khm "HNG:妙法蓮華經卷三(守屋本)"
+               '(long-name "HNG/宮廷守屋"
+                 chars         256
+                 dimension     2
+                 registry      "hng-11$"
+                 graphic       2
+                 columns       2
+                 direction     l2r))
+  (make-charset '===hng-sok "HNG:花嚴經卷八(守屋本)"
+               '(long-name "HNG/花嚴守屋"
+                 chars         256
+                 dimension     2
+                 registry      "hng-15$"
+                 graphic       2
+                 columns       2
+                 direction     l2r))
+  (make-charset '===hng-yhk "HNG:瑜伽法鏡經(S.2423)"
+               '(long-name "HNG/S2423"
+                 chars         256
+                 dimension     2
+                 registry      "hng-16$"
+                 graphic       2
+                 columns       2
+                 direction     l2r))
+  (make-charset '===hng-kak "HNG:開成石經孝經"
+               '(long-name "HNG/開成孝經"
+                 chars         256
+                 dimension     2
+                 registry      "hng-17$"
+                 graphic       2
+                 columns       2
+                 direction     l2r))
+  (make-charset '===hng-sys "HNG:瑜伽師地論卷三十(S.5309)"
+               '(long-name "HNG/S5309"
+                 chars         256
+                 dimension     2
+                 registry      "hng-22$"
+                 graphic       2
+                 columns       2
+                 direction     l2r))
+  (make-charset '===hng-tsu "HNG:通典卷一"
+               '(long-name "HNG/通典卷一"
+                 chars         256
+                 dimension     2
+                 registry      "hng-24$"
+                 graphic       2
+                 columns       2
+                 direction     l2r))
+  (make-charset '===hng-hod "HNG:法藏和尚傳(高山寺本)"
+               '(long-name "HNG/法藏和尚"
+                 chars         256
+                 dimension     2
+                 registry      "hng-30$"
+                 graphic       2
+                 columns       2
+                 direction     l2r))
+  (make-charset '===hng-gok "HNG:後漢書光武帝紀"
+               '(long-name "HNG/光武帝紀"
+                 chars         256
+                 dimension     2
+                 registry      "hng-31$"
+                 graphic       2
+                 columns       2
+                 direction     l2r))
+  (make-charset '===hng-nto "HNG:日本書紀 卷二十四(圖書寮本)"
+               '(long-name "HNG/圖書紀24"
+                 chars         256
+                 dimension     2
+                 registry      "hng-34$"
+                 graphic       2
+                 columns       2
+                 direction     l2r))
+  (make-charset '===hng-nkm "HNG:日本書紀 卷二十四(兼右本)"
+               '(long-name "HNG/兼右紀24"
+                 chars         256
+                 dimension     2
+                 registry      "hng-36$"
+                 graphic       2
+                 columns       2
+                 direction     l2r))
+  (make-charset '===hng-k24 "HNG:日本書紀 卷二十四(寛文九年版)"
+               '(long-name "HNG/寛九紀24"
+                 chars         256
+                 dimension     2
+                 registry      "hng-37$"
+                 graphic       2
+                 columns       2
+                 direction     l2r))
+  (make-charset '===hng-kcj "HNG:日本書紀 卷二(慶長十五年版)"
+               '(long-name "HNG/慶長紀2"
+                 chars         256
+                 dimension     2
+                 registry      "hng-42$"
+                 graphic       2
+                 columns       2
+                 direction     l2r))
+  (make-charset '===hng-kbk "HNG:日本書紀 卷二(寛文九年版)"
+               '(long-name "HNG/寛九紀2"
+                 chars         256
+                 dimension     2
+                 registry      "hng-43$"
+                 graphic       2
+                 columns       2
+                 direction     l2r))
+  (make-charset '===hng-sik "HNG:花嚴經卷八(新羅本寫本)"
+               '(long-name "HNG/花嚴新羅"
+                 chars         256
+                 dimension     2
+                 registry      "hng-44$"
+                 graphic       2
+                 columns       2
+                 direction     l2r))
+  (make-charset '===hng-skk "HNG:華嚴經卷二十(晉本高麗古版)"
+               '(long-name "HNG/古麗華20"
+                 chars         256
+                 dimension     2
+                 registry      "hng-46$"
+                 graphic       2
+                 columns       2
+                 direction     l2r))
+  (make-charset '===hng-kyu "HNG:初麗瑜5"
+               '(long-name "HNG/瑜伽師地論卷五(高麗初彫本)"
+                 chars         256
+                 dimension     2
+                 registry      "hng-47$"
+                 graphic       2
+                 columns       2
+                 direction     l2r))
+  (make-charset '===hng-ksk "HNG:華嚴經卷六(高麗再彫本)"
+               '(long-name "HNG/再麗華6"
+                 chars         256
+                 dimension     2
+                 registry      "hng-48$"
+                 graphic       2
+                 columns       2
+                 direction     l2r))
+  (make-charset '===hng-wan "HNG:華嚴經卷三十八(趙氏藏本)"
+               '(long-name "HNG/和寧華38"
+                 chars         256
+                 dimension     2
+                 registry      "hng-49$"
+                 graphic       2
+                 columns       2
+                 direction     l2r))
+  (make-charset '===hng-okd "HNG:金剛場陀羅尼經(小川本)"
+               '(long-name "HNG/金剛小川"
+                 chars         256
+                 dimension     2
+                 registry      "hng-50$"
+                 graphic       2
+                 columns       2
+                 direction     l2r))
+  (make-charset '===hng-kmi "HNG:弥勒上生經(高山寺本)"
+               '(long-name "HNG/弥勒上生"
+                 chars         256
+                 dimension     2
+                 registry      "hng-55$"
+                 graphic       2
+                 columns       2
+                 direction     l2r))
+  (make-charset '===hng-zkd "HNG:續高僧傳(五月一日經)(天平寫經)"
+               '(long-name "HNG/五一續高"
+                 chars         256
+                 dimension     2
+                 registry      "hng-56$"
+                 graphic       2
+                 columns       2
+                 direction     l2r))
+  (make-charset '===hng-kss "HNG:華嚴信種義(明惠自筆)"
+               '(long-name "HNG/華嚴信種"
+                 chars         256
+                 dimension     2
+                 registry      "hng-64$"
+                 graphic       2
+                 columns       2
+                 direction     l2r))
+  (make-charset '===hng-kyo "HNG:教行信証卷四(親鸞自筆)"
+               '(long-name "HNG/教行信証"
+                 chars         256
+                 dimension     2
+                 registry      "hng-66$"
+                 graphic       2
+                 columns       2
+                 direction     l2r))
+  (make-charset '===hng-smk "HNG:西夏版妙法蓮華經卷一"
+               '(long-name "HNG/西夏法華"
+                 chars         256
+                 dimension     2
+                 registry      "hng-74$"
+                 graphic       2
+                 columns       2
+                 direction     l2r))
+
   (make-charset '=cbeta "CBETA private characters"
                '(long-name     "CBETA PUA"
                  chars         256
 
   ;; (make-charset
   ;;  '=zihai-17xx
-  ;;  "ZhongHua-ZiHai (pp.1700\e$B!A\e(B1781) glyph-images"
+  ;;  "ZhongHua-ZiHai (pp.1700〜1781) glyph-images"
   ;;  '(long-name "ZhongHua-ZiHai pp.17xx"
   ;;              chars 256
   ;;              dimension 2
                  graphic       2
                  direction     l2r))
 
+  (make-charset '=>ucs@iwds-1
+               "UCS abstract characters based on IWDS-1."
+               '(long-name     "UCS based on IWDS-1"
+                 chars         256
+                 dimension     3
+                 columns       2
+                 graphic       2
+                 direction     l2r
+                 =>iso-ir      177
+                 mother        =ucs))
+
   (make-charset '=>ucs@component
                "UCS encoding for abstract components of IWDS-1."
                '(long-name     "UCS for IWDS-1 abstract components"
                  graphic       2
                  direction     l2r
                  =>iso-ir      177
-                 mother        ===ucs@iso))
+                 mother        ==ucs@unicode))
   (make-charset '===ucs@gb
                "UCS representative glyph-images of GB."
                '(long-name     "UCS rep-images for GB"
                  graphic       2
                  direction     l2r
                  =>iso-ir      177
-                 mother        ===ucs@unicode))
+                 mother        ==ucs@ks))
 
+  (make-charset '=ucs-var-001
+               "uXXXX-var-001 glyph-images of GlyphWiki"
+               '(long-name     "UCS-var-001"
+                 chars         256
+                 dimension     3
+                 columns       2
+                 graphic       2
+                 direction     l2r
+                  ;; =>iso-ir  177
+                 mother        =ucs))
+  (make-charset '=ucs-bmp-var-001
+               "uXXXX-var-001 glyph-images in BMP"
+               '(long-name     "UCS-BMP-var-001"
+                 chars         256
+                 dimension     2
+                 columns       2
+                 graphic       2
+                 direction     l2r
+                  ;; =>iso-ir  177
+                 mother        =ucs-var-001
+                 min-code #x2E00
+                 max-code #x9FCC
+                 registry "ucs\\.var001-0"))
+  (make-charset '=ucs-var-002
+               "uXXXX-var-002 glyph-images of GlyphWiki"
+               '(long-name     "UCS-var-002"
+                 chars         256
+                 dimension     3
+                 columns       2
+                 graphic       2
+                 direction     l2r
+                  ;; =>iso-ir  177
+                 mother        =ucs))
+  (make-charset '=ucs-bmp-var-002
+               "uXXXX-var-002 glyph-images in BMP"
+               '(long-name     "UCS-BMP-var-002"
+                 chars         256
+                 dimension     2
+                 columns       2
+                 graphic       2
+                 direction     l2r
+                  ;; =>iso-ir  177
+                 mother        =ucs-var-002
+                 min-code #x2E00
+                 max-code #x9FCC
+                 registry "ucs\\.var002-0"))
+  (make-charset '=ucs-var-003
+               "uXXXX-var-003 glyph-images of GlyphWiki"
+               '(long-name     "UCS-var-003"
+                 chars         256
+                 dimension     3
+                 columns       2
+                 graphic       2
+                 direction     l2r
+                  ;; =>iso-ir  177
+                 mother        =ucs))
+  (make-charset '=ucs-bmp-var-003
+               "uXXXX-var-003 glyph-images in BMP"
+               '(long-name     "UCS-BMP-var-003"
+                 chars         256
+                 dimension     2
+                 columns       2
+                 graphic       2
+                 direction     l2r
+                  ;; =>iso-ir  177
+                 mother        =ucs-var-003
+                 min-code #x2E00
+                 max-code #x9FCC
+                 registry "ucs\\.var003-0"))
+  (make-charset '=ucs-itaiji-002
+               "uXXXX-itaiji-002 glyphs of GlyphWiki"
+               '(long-name     "UCS-itaiji-002"
+                 chars         256
+                 dimension     3
+                 columns       2
+                 graphic       2
+                 direction     l2r
+                  ;; =>iso-ir  177
+                 mother        =ucs))
+  (make-charset '=ucs-bmp-itaiji-002
+               "uXXXX-itaiji-002 glyph-images in BMP"
+               '(long-name     "UCS-BMP-itaiji-002"
+                 chars         256
+                 dimension     2
+                 columns       2
+                 graphic       2
+                 direction     l2r
+                  ;; =>iso-ir  177
+                 mother        =ucs-itaiji-002
+                 min-code #x2E00
+                 max-code #x9FCC
+                 registry "ucs\\.itaiji002-0"))
   (make-charset '=ucs-itaiji-084
                "uXXXX-itaiji-084 glyph-images of GlyphWiki"
                '(long-name     "UCS-itaiji-084"
                   ;; =>iso-ir  177
                  mother        =ucs-itaiji-084
                  min-code #x2E00
-                 max-code #x9FA5
+                 max-code #x9FCC
                  registry "ucs\\.itaiji084-0"))
 
   (make-charset
               mother ucs-bmp
               min-code #x2E00
               max-code #x9FA5
+              ;; max-code #x9FCC
               ;; max-code #xA4CF
               ))
   (make-charset
               mother =ucs@gb
               min-code #x2E00
                max-code #x9FA5
+              ;; max-code #x9FCC
               ;; max-code #xA4CF
               ))
   (make-charset
               mother ==ucs@gb
               min-code #x2E00
                max-code #x9FA5
+              ;; max-code #x9FCC
               ;; max-code #xA4CF
               ))
   (make-charset
               mother ===ucs@gb
               min-code #x2E00
                max-code #x9FA5
+              ;; max-code #x9FCC
               ;; max-code #xA4CF
               ))
   (make-charset
               registry "-ja-.*-ucs-0"
               mother =ucs@JP
               min-code #x2E00
-               max-code #x9FA5
+               max-code #x9FCC
               ;; max-code #xA4CF
               ))
   (make-charset
               registry "-ja-.*-ucs-0"
               mother =ucs@JP/hanazono
               min-code #x2E00
-               max-code #x9FA5
+               max-code #x9FCC
               ;; max-code #xA4CF
               ))
   (make-charset
               registry "-ja-.*-ucs-0"
               mother ==ucs@JP/hanazono
               min-code #x2E00
-               max-code #x9FA5
+               max-code #x9FCC
               ;; max-code #xA4CF
               ))
   (make-charset
               mother =+>ucs@unicode
               min-code #x2E00
                max-code #x9FA5
+              ;; max-code #x9FCC
               ;; max-code #xA4CF
               ))
   (make-charset
               mother =>ucs@unicode
               min-code #x2E00
                max-code #x9FA5
+              ;; max-code #x9FCC
               ;; max-code #xA4CF
               ))
   (make-charset
               registry "-ja-.*-ucs-0"
               mother =>ucs@component
               min-code #x2E00
-               max-code #x9FA5
+               max-code #x9FCC
               ;; max-code #xA4CF
               ))
   (make-charset
               mother ==>ucs@bucs
               min-code #x2E00
                max-code #x9FA5
+              ;; max-code #x9FCC
               ;; max-code #xA4CF
               ))
   (make-charset