(===hng-kss): New coded-charset for XEmacs CHISE.
[chise/xemacs-chise.git-] / lisp / mule / mule-conf.el
index c22e77f..83ade86 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"
            hzk-max (+ hzk-min 65535))
       (setq i (1+ i))))
 
+  (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-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-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-kss "HNG:華嚴信種義(明惠自筆)"
+               '(long-name "HNG/華嚴信種"
+                 chars         256
+                 dimension     2
+                 registry      "hng-64$"
+                 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"
                  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"