;; 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, 2011 MORIOKA Tomohiko
+;; 2009, 2010, 2011, 2012 MORIOKA Tomohiko
;; Keywords: mule, multilingual, character set, coding system
;; 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"
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
(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
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'"
+ '(long-name "Daikanwa ddddd'"
chars 256
dimension 2
columns 2
direction l2r))
(make-charset '=daikanwa/+2p
"Daikanwa dictionary (ddddd'')"
- `(long-name "Daikanwa ddddd''"
+ '(long-name "Daikanwa ddddd''"
chars 256
dimension 2
columns 2
direction l2r))
(make-charset '=daikanwa/ho
"Daikanwa dictionary (Hokan)"
- `(long-name "Daikanwa-ho"
+ '(long-name "Daikanwa-ho"
chars 256
dimension 2
columns 2
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/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"
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)"
;; max-code #xA4CF
))
(make-charset
+ '=+>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
+ registry "-zh-.*-ucs-0"
+ mother =+>ucs@unicode
+ min-code #x2E00
+ max-code #x9FA5
+ ;; max-code #xA4CF
+ ))
+ (make-charset
'=>ucs-bmp-cjk@unicode
"Unicode representative characters of CJK Unified Ideographs in BMP"
'(long-name "Unicode-BMP-CJK"