1 |
wakaba |
1.1 |
#!/usr/local/bin/perl
|
2 |
|
|
use utf8; ## This file is written in UTF-8
|
3 |
|
|
use strict;
|
4 |
|
|
require 'mkpm.pl';
|
5 |
|
|
use vars qw(%PROP %SET %SET_ALIAS);
|
6 |
|
|
$PROP{module_name} = 'UCS';
|
7 |
wakaba |
1.3 |
$PROP{version} = do{my @r=(q$Revision: 1.2 $=~/\d+/g);sprintf "%d."."%02d" x $#r,@r};
|
8 |
wakaba |
1.1 |
$PROP{author_name} = 'Wakaba';
|
9 |
|
|
$PROP{author_mail} = 'w@suika.fam.cx';
|
10 |
|
|
|
11 |
wakaba |
1.3 |
$PROP{pod_see_also} = <<EOH;
|
12 |
|
|
L<Char::Class::JISX0221>
|
13 |
|
|
|
14 |
|
|
L<Char::Class::RFC1815>
|
15 |
|
|
EOH
|
16 |
|
|
|
17 |
wakaba |
1.1 |
my $l = <<EOH;
|
18 |
|
|
1 BASIC LATIN 0020 - 007E
|
19 |
|
|
2 LATIN-1 SUPPLEMENT 00A0 - 00FF
|
20 |
|
|
3 LATIN EXTENDED-A 0100 - 017F
|
21 |
|
|
4 LATIN EXTENDED-B 0180 - 024F
|
22 |
|
|
6 SPACING MODIFIER LETTERS 02B0 - 02FF
|
23 |
|
|
7 COMBINING DIACRITICAL MARKS 0300 - 036F
|
24 |
|
|
8 BASIC GREEK 0370 - 03CF
|
25 |
|
|
9 GREEK SYMBOLS AND COPTIC 03D0 - 03FF
|
26 |
|
|
10 CYRILLIC 0400 - 04FF
|
27 |
|
|
11 ARMENIAN 0530 - 058F
|
28 |
|
|
12 BASIC HEBREW 05D0 - 05EA
|
29 |
|
|
13 HEBREW EXTENDED 0590 - 05CF, 05EB - 05FF
|
30 |
|
|
14 BASIC ARABIC 0600 - 065F
|
31 |
|
|
15 ARABIC EXTENDED 0660 - 06FF
|
32 |
|
|
16 DEVANAGARI 0900 - 097F, 200C, 200D
|
33 |
|
|
17 BENGALI 0980 - 09FF,200C, 200D
|
34 |
|
|
18 GURMUKHI 0A00 - 0A7F,200C, 200D
|
35 |
|
|
19 GUJARATI 0A80 - 0AFF,200C, 200D
|
36 |
|
|
20 ORIYA 0B00 - 0B7F,200C, 200D
|
37 |
|
|
21 TAMIL 0B80 - 0BFF,200C, 200D
|
38 |
|
|
22 TELUGU 0C00 - 0C7F,200C, 200D
|
39 |
|
|
23 KANNADA 0C80 - 0CFF,200C, 200D
|
40 |
|
|
24 MALAYALAM 0D00 - 0D7F,200C, 200D
|
41 |
|
|
25 THAI 0E00 - 0E7F
|
42 |
|
|
26 LAO 0E80 - 0EFF
|
43 |
|
|
27 BASIC GEORGIAN 10D0 - 10FF
|
44 |
|
|
28 GEORGIAN EXTENDED 10A0 - 10CF
|
45 |
|
|
29 HANGUL JAMO 1100 - 11FF
|
46 |
|
|
30 LATIN EXTENDED ADDITIONAL 1E00 - 1EFF
|
47 |
|
|
31 GREEK EXTENDED 1F00 - 1FFF
|
48 |
|
|
32 GENERAL PUNCTUATION 2000 - 206F
|
49 |
|
|
33 SUPERSCRIPTS AND SUBSCRIPTS 2070 - 209F
|
50 |
|
|
34 CURRENCY SYMBOLS 20A0 - 20CF
|
51 |
|
|
35 COMBINING DIACRITICAL MARKS FOR SYMBOLS 20D0 - 20FF
|
52 |
|
|
36 LETTERLIKE SYMBOLS 2100 - 214F
|
53 |
|
|
37 NUMBER FORMS 2150 - 218F
|
54 |
|
|
38 ARROWS 2190 - 21FF
|
55 |
|
|
39 MATHEMATICAL OPERATORS 2200 - 22FF
|
56 |
|
|
40 MISCELLANEOUS TECHNICAL 2300 - 23FF
|
57 |
|
|
41 CONTROL PICTURES 2400 - 243F
|
58 |
|
|
42 OPTICAL CHARACTER RECOGNITION 2440 - 245F
|
59 |
|
|
43 ENCLOSED ALPHANUMERICS 2460 - 24FF
|
60 |
|
|
44 BOX DRAWING 2500 - 257F
|
61 |
|
|
45 BLOCK ELEMENTS 2580 - 259F
|
62 |
|
|
46 GEOMETRIC SHAPES 25A0 - 25FF
|
63 |
|
|
47 MISCELLANEOUS SYMBOLS 2600 - 26FF
|
64 |
|
|
48 DINGBATS 2700 - 27BF
|
65 |
|
|
49 CJK SYMBOLS AND PUNCTUATION 3000 - 303F
|
66 |
|
|
50 HIRAGANA 3040 - 309F
|
67 |
|
|
51 KATAKANA 30A0 - 30FF
|
68 |
|
|
52 BOPOMOFO 3100 - 312F,31A0 - 31BF
|
69 |
|
|
53 HANGUL COMPATIBILITY JAMO 3130 - 318F
|
70 |
|
|
54 CJK MISCELLANEOUS 3190 - 319F
|
71 |
|
|
55 ENCLOSED CJK LETTERS AND MONTHS 3200 - 32FF
|
72 |
|
|
56 CJK COMPATIBILITY 3300 - 33FF
|
73 |
|
|
## 57-59 were deleted at ISO/IEC 10646-1:1993 Amd.5 (so-called Korean mess)
|
74 |
|
|
57 Basic Hangul 3400-3D3D
|
75 |
|
|
58 Supplemental Hangul A 3D2E-44B7
|
76 |
|
|
58 Supplemental Hangul B 44BE-4DFF
|
77 |
|
|
60 CJK UNIFIED IDEOGRAPHS 4E00 - 9FFF
|
78 |
|
|
61 PRIVATE USE AREA E000 - F8FF
|
79 |
|
|
62 CJK COMPATIBILITY IDEOGRAPHS F900 - FAFF
|
80 |
|
|
63 ALPHABETIC PRESENTATION FORMS FB00 - FB4F
|
81 |
|
|
64 ARABIC PRESENTATION FORMS-A FB50 - FDFF
|
82 |
|
|
65 COMBINING HALF MARKS FE20 - FE2F
|
83 |
|
|
66 CJK COMPATIBILITY FORMS FE30 - FE4F
|
84 |
|
|
67 SMALL FORM VARIANTS FE50 - FE6F
|
85 |
|
|
68 ARABIC PRESENTATION FORMS-B FE70 - FEFE
|
86 |
|
|
69 HALFWIDTH AND FULLWIDTH FORMS FF00 - FFEF
|
87 |
|
|
70 SPECIALS FFF0 - FFFD
|
88 |
|
|
71 HANGUL SYLLABLES AC00 - D7A3
|
89 |
|
|
72 BASIC TIBETAN 0F00 - 0FBF
|
90 |
|
|
73 ETHIOPIC 1200 - 137F
|
91 |
|
|
74 UNIFIED CANADIAN ABORIGINAL SYLLABICS 1400 - 167F
|
92 |
|
|
75 CHEROKEE 13A0 - 13FF
|
93 |
|
|
76 YI SYLLABLES A000 - A48F
|
94 |
|
|
77 YI RADICALS A490 - A4CF
|
95 |
|
|
78 KANGXI RADICALS 2F00 - 2FDF
|
96 |
|
|
79 CJK RADICALS SUPPLEMENT 2E80 - 2EFF
|
97 |
|
|
80 BRAILLE PATTERNS 2800 - 28FF
|
98 |
|
|
81 CJK UNIFIED IDEOGRAPHS EXTENSION A 3400 - 4DBF
|
99 |
|
|
82 OGHAM 1680 - 169F
|
100 |
|
|
83 RUNIC 16A0 - 16FF
|
101 |
|
|
84 SINHALA 0D80 - 0DFF
|
102 |
|
|
85 SYRIAC 0700 - 074F
|
103 |
|
|
86 THAANA 0780 - 07BF
|
104 |
|
|
87 BASIC MYANMAR 1000 - 104F,200C, 200D
|
105 |
|
|
88 KHMER 1780 - 17FF,200C, 200D
|
106 |
|
|
89 MONGOLIAN 1800 - 18AF
|
107 |
|
|
90 EXTENDED MYANMAR 1050 - 109F
|
108 |
|
|
91 TIBETAN 0F00 - 0FFF
|
109 |
|
|
200 ZERO-WIDTH BOUNDARY INDICATORS 200B - 200D,FEFF
|
110 |
|
|
201 FORMAT SEPARATORS 2028 - 2029
|
111 |
|
|
202 BI-DIRECTIONAL FORMAT MARKS 200E - 200F
|
112 |
|
|
203 BI-DIRECTIONAL FORMAT EMBEDDINGS 202A - 202E
|
113 |
|
|
204 HANGUL FILL CHARACTERS 3164, FFA0
|
114 |
|
|
205 CHARACTER SHAPING SELECTORS 206A - 206D
|
115 |
|
|
206 NUMERIC SHAPE SELECTORS 206E - 206F
|
116 |
|
|
207 IDEOGRAPHIC DESCRIPTION CHARACTERS 2FF0 - 2FFF
|
117 |
|
|
#270 COMBINING CHARACTERS
|
118 |
|
|
#271 COMBINING CHARACTERS B-2
|
119 |
|
|
## 92-101,180,10646 ISO/IEC 10646-1:2000 Amd.1
|
120 |
|
|
180 CJK UNIFIED IDEOGRAPHS ALL 3400-4DBF,4E00-9FFF,FA0E-FA0F,FA11,FA14-FA14,FA1F,FA21,FA23-FA24,FA27-FA29,20000-2A6DF
|
121 |
|
|
10646 UNICODE 0000-FDCF,FDF0-FFFD,10000-1FFFD,20000-2FFFD,E0000-EFFFD,F0000-FFFFD,100000-10FFFD
|
122 |
|
|
92 CYRILLIC SUPPLEMENTARY 0500-052F
|
123 |
|
|
93 TAGALOG 1700-171F
|
124 |
|
|
94 HANUNOO 1720-173F
|
125 |
|
|
95 BUHID 1740-175F
|
126 |
|
|
96 TAGBANWA 1760-177F
|
127 |
|
|
97 SUPPLEMENTAL ARROWS 2900-297F
|
128 |
|
|
98 MISCLLANEOUS MATHMATICAL SYMBOLS 2980-29FF
|
129 |
|
|
99 SUPPLEMENTAL MATHMATICAL OPERATORS 2A00-2AFF
|
130 |
|
|
100 KATAKANA PHONETIC EXTENSIONS 31F0-31FF
|
131 |
|
|
101 VARIATION SELECTORS FE00-FE0F
|
132 |
|
|
## 104-108 ISO/IEC 10646-1:2000 Amd.2
|
133 |
|
|
104 LIMBU 1900-194F
|
134 |
|
|
105 TAI LE 1950-197F
|
135 |
|
|
106 SUPPLEMENTAL ARROWS-C 2B00-2B2F
|
136 |
|
|
107 SUPPLEMENTAL CJK COMPATIBILITY 31C0-31EF
|
137 |
|
|
108 YIJING HEXAGRAM SYMBOLS 4DC0-4DFF
|
138 |
|
|
## 1001-4000 ISO/IEC 10646-2:2001
|
139 |
|
|
1001 ETRUSCAN 010300-01032F
|
140 |
|
|
1002 GOTHIC 010330-01034F
|
141 |
|
|
1003 DESERET 010400-01044F
|
142 |
|
|
1004 BYZANTINE MUSICAL SYMBOLS 01D000-01D0FF
|
143 |
|
|
1005 WESTERN MUSICAL SYMBOLS 01D100-01D1FF
|
144 |
|
|
2001 CJK UNIFIED IDEOGRAPHS EXTENSION B 020000-02A71F
|
145 |
|
|
## Note: ISO/IEC 10646-2:2000 incorrectly gave collection No. 2001 to
|
146 |
|
|
## CJK COMP. ID. SUPPLEMENT. This was fixed by its Amd.1.
|
147 |
|
|
2002 CJK COMPATIBILITY IDEOGRAPHS SUPPLEMENT 02F800-02FA1F
|
148 |
|
|
3001 TAGS 0E0000-0E007F
|
149 |
|
|
3002 ALTERNATE FORMAT CHARACTERS EXTENDED 0E0000-0E0FFF
|
150 |
|
|
1000 SMP 010000-01FFFD
|
151 |
|
|
#1900 SMP COMBINING CHARACTERS
|
152 |
|
|
2000 SIP 020000-02FFFD
|
153 |
|
|
3000 SPP 0E0000-0EFFFD
|
154 |
|
|
4000 PART 2 010000-01FFFD,020000-02FFFD,0E0000-0EFFFD
|
155 |
|
|
## 1007-3002 ISO/IEC 10646-2:2001 Amd.1
|
156 |
|
|
1007 LINEAR B SYLLABARY 10000-1007F
|
157 |
|
|
1008 LINEAR B IDEOGRAMS 10080-100FF
|
158 |
|
|
1009 AEGAN NUMBERS 10100-1013F
|
159 |
|
|
1010 UGARITIC 10380-1039F
|
160 |
|
|
1011 SHAVIAN 10450-1047F
|
161 |
|
|
1012 OSMANYA 10480-104AF
|
162 |
|
|
1013 CYPRIOT SYLLABARY 10800-1083F
|
163 |
|
|
3002 VARIATION SELECTORS SUPPLEMENT E0110-E01FF
|
164 |
|
|
EOH
|
165 |
|
|
|
166 |
|
|
for (split /\n/, $l) {
|
167 |
|
|
if (/^(\d+)\s([^\t]+)\t(.+)/) {
|
168 |
|
|
my ($num, $name, $range) = ($1, lc $2, $3);
|
169 |
|
|
$name =~ s/\bcjk\b/CJK/;
|
170 |
|
|
$name =~ s/[\x20-](\w)/uc $1/ge; $name =~ s/^(\w)/uc $1/e;
|
171 |
|
|
$name =~ s/^([A-Z][A-Z])/_$1/;
|
172 |
|
|
$range =~ tr/\x20//d;
|
173 |
|
|
my @range;
|
174 |
|
|
for (split /,/, $range) {
|
175 |
|
|
if (/([0-9A-F]+)-([0-9A-F]+)/) {
|
176 |
|
|
push @range, sprintf '!%s %s '."\n", $1, $2;
|
177 |
|
|
} else {
|
178 |
|
|
push @range, '!'.$_."\n";
|
179 |
|
|
}
|
180 |
|
|
}
|
181 |
|
|
$SET{$name} = join '', @range;
|
182 |
|
|
$SET_ALIAS{$num} = $name;
|
183 |
|
|
}
|
184 |
|
|
}
|
185 |
|
|
|
186 |
|
|
$SET{IPAExtensions} = <<EOH;
|
187 |
|
|
!0250 02AF
|
188 |
|
|
EOH
|
189 |
|
|
$SET_ALIAS{5} = 'IPAExtensions';
|
190 |
|
|
|
191 |
|
|
$SET{_BMP} = <<EOH;
|
192 |
|
|
!0000 D7FF
|
193 |
|
|
!E000 FFFD
|
194 |
|
|
EOH
|
195 |
|
|
$SET_ALIAS{300} = '_BMP';
|
196 |
|
|
|
197 |
|
|
## 299 BMP FIRST EDITION (ISO/IEC 10646-1:2000 A.3.2)
|
198 |
|
|
$SET_ALIAS{299} = '_BMPFirstEdition';
|
199 |
|
|
$SET{_BMPFirstEdition} = col2list (<<EOH) . <<EOH;
|
200 |
|
|
00 20-7E A0-FF
|
201 |
|
|
01 00-F5 FA-FF
|
202 |
|
|
02 00-17 50-A8 B0-DE E0-E9
|
203 |
|
|
03 00-45 60-61 74-75 7A 7E 84-8A 8C 8E-A1
|
204 |
|
|
03 A3-CE D0-D6 DA DC DE E0 E2-F3
|
205 |
|
|
04 01-0C 0E-4F 51-5C 5E-86 90-C4 C7-C8 CB-CC D0-EB EE-F5 F8-F9
|
206 |
|
|
05 31-56 59-5F 61-87 89 B0-B9 BB-C3 D0-EA F0-F4
|
207 |
|
|
06 0C 1B 1F 21-3A 40-52 60-6D 70-B7 BA-BE C0-CE D0-ED F0-F9
|
208 |
|
|
09 01-03 05-39 3C-4D 50-54 58-70 81-83 85-8C
|
209 |
|
|
09 8F-90 93-A8 AA-B0 B2 B6-B9 BC BE-C4
|
210 |
|
|
09 C7-C8 CB-CD D7 DC-DD DF-E3 E6-FA
|
211 |
|
|
0A 02 05-0A 0F-10 13-28 2A-30 32-33 35-36
|
212 |
|
|
0A 38-39 3C 3E-42 47-48 4B-4D 59-5C 5E 66-74
|
213 |
|
|
0A 81-83 85-8B 8D 8F-91 93-A8 AA-B0 B2-B3
|
214 |
|
|
0A B5-B9 BC-C5 C7-C9 CB-CD D0 E0 E6-EF
|
215 |
|
|
0B 01-03 05-0C 0F-10 13-28 2A-30 32-33 36-39
|
216 |
|
|
0B 3C-43 47-48 4B-4D 56-57 5C-5D 5F-61 66-70
|
217 |
|
|
0B 82-83 85-8A 8E-90 92-25 99-9A 9C 9E-9F
|
218 |
|
|
0B A3-A4 A8-AA AE-B5 B7-B9 BE-C2 C6-C8 CA-CD D7 E7-F2
|
219 |
|
|
0C 01-03 05-0C 0E-10 12-28 2A-33 35-39 3E-44
|
220 |
|
|
0C 46-48 4A-4D 55-56 60-61 66-6F 82-83 85-8C
|
221 |
|
|
0C 8E-90 92-A8 AA-B3 B5-B9 BE-C4 C6-C8 CA-CD D5-D6 DE E0-E1 E6-EF
|
222 |
|
|
0D 02-03 05-0C 0E-10 12-28 2A-39 3E-43 46-48 4A-4D 57 60-61 66-6F
|
223 |
|
|
0E 01-3A 3F-5B 81-82 84 87-88 8A 8D 94-97
|
224 |
|
|
0E 99-9F A1-A3 A5 A7 AA-AB AD-B9 BB-BD C0-C4 C6 C8-CD D0-D9 DC-DD
|
225 |
|
|
10 A0-C5 D0-F6 FB
|
226 |
|
|
11 00-59 5F-A2 A8-F9
|
227 |
|
|
1E 00-9A A0-F9
|
228 |
|
|
1F 00-15 18-1D 20-45 48-4D 50-57 59 5B 5D
|
229 |
|
|
1F 5F-7D 80-B4 B6-C4 C6-D3 D6-DB DD-EF F2-F4 F6-FE
|
230 |
|
|
20 00-2E 30-46 6A-70 74-8E A0-AA D0-E1
|
231 |
|
|
21 00-38 53-82 90-EA
|
232 |
|
|
22 00-F1
|
233 |
|
|
23 00 02-7A
|
234 |
|
|
24 00-24 40-4A 60-EA
|
235 |
|
|
25 00-95 A0-EF
|
236 |
|
|
26 00-13 1A-6F
|
237 |
|
|
27 01-04 06-09 0C-27 29-4B 4D 4F-52 56 58-5E 61-67 76-94 98-AF B1-BE
|
238 |
|
|
30 00-37 3F 41-94 99-9E A1-FE
|
239 |
|
|
31 05-2C 31-8E 90-9F
|
240 |
|
|
32 00-1C 20-43 60-7B 7F-B0 C0-CB D0-FE
|
241 |
|
|
33 00-76 7B-DD E0-FE
|
242 |
|
|
FB 00-06 13-17 1E-36 38-3C 3E 40-41 43-44 46-B1 D3-FF
|
243 |
|
|
FC 00-FF
|
244 |
|
|
FD 00-3F 50-8F 92-C7 F0-FB
|
245 |
|
|
FE 20-23 30-44 49-52 54-66 68-6B 70-72 74 76-FC FF
|
246 |
|
|
FF 01-5E 61-BE C2-C7 CA-CF D2-D7 DA-DC E0-E6 E8-EE FD
|
247 |
|
|
EOH
|
248 |
|
|
!3400 4DFF
|
249 |
|
|
!4E00 9FA5
|
250 |
|
|
!E000 F8FF
|
251 |
|
|
!F900 FA2D
|
252 |
|
|
EOH
|
253 |
|
|
|
254 |
|
|
## 301 BMP-AMD.7 (ISO/IEC 10646-1:2000 A.3.1)
|
255 |
|
|
$SET_ALIAS{301} = '_BMP_AMD7';
|
256 |
|
|
$SET{_BMP_AMD7} = col2list (<<EOH) . <<EOH;
|
257 |
|
|
00 20-7E A0-FF
|
258 |
|
|
01 00-F5 FA-FF
|
259 |
|
|
02 00-17 50-A8 B0-DE E0-E9
|
260 |
|
|
03 00-45 60-61 74-75 7A 7E 84-8A 8C 8E-A1
|
261 |
|
|
03 A3-CE D0-D6 DA DC DE E0 E2-F3
|
262 |
|
|
04 01-0C 0E-4F 51-5C 5E-86 90-C4 C7-C8 CB-CC D0-EB EE-F5 F8-F9
|
263 |
|
|
05 31-56 59-5F 61-87 89 91-A1 A3-B9 BB-C4 D0-EA F0-F4
|
264 |
|
|
06 0C 1B 1F 21-3A 40-52 60-6D 70-B7 BA-BE C0-CE D0-ED F0-F9
|
265 |
|
|
09 01-03 05-39 3C-4D 50-54 58-70 81-83 85-8C
|
266 |
|
|
09 8F-90 93-A8 AA-B0 B2 B6-B9 BC BE-C4
|
267 |
|
|
09 C7-C8 CB-CD D7 DC-DD DF-E3 E6-FA
|
268 |
|
|
0A 02 05-0A 0F-10 13-28 2A-30 32-33 35-36
|
269 |
|
|
0A 38-39 3C 3E-42 47-48 4B-4D 59-5C 5E 66-74
|
270 |
|
|
0A 81-83 85-8B 8D 8F-91 93-A8 AA-B0 B2-B3
|
271 |
|
|
0A B5-B9 BC-C5 C7-C9 CB-CD D0 E0 E6-EF
|
272 |
|
|
0B 01-03 05-0C 0F-10 13-28 2A-30 32-33 36-39
|
273 |
|
|
0B 3C-43 47-48 4B-4D 56-57 5C-5D 5F-61 66-70
|
274 |
|
|
0B 82-83 85-8A 8E-90 92-25 99-9A 9C 9E-9F
|
275 |
|
|
0B A3-A4 A8-AA AE-B5 B7-B9 BE-C2 C6-C8 CA-CD D7 E7-F2
|
276 |
|
|
0C 01-03 05-0C 0E-10 12-28 2A-33 35-39 3E-44
|
277 |
|
|
0C 46-48 4A-4D 55-56 60-61 66-6F 82-83 85-8C
|
278 |
|
|
0C 8E-90 92-A8 AA-B3 B5-B9 BE-C4 C6-C8 CA-CD D5-D6 DE E0-E1 E6-EF
|
279 |
|
|
0D 02-03 05-0C 0E-10 12-28 2A-39 3E-43 46-48 4A-4D 57 60-61 66-6F
|
280 |
|
|
0E 01-3A 3F-5B 81-82 84 87-88 8A 8D 94-97
|
281 |
|
|
0E 99-9F A1-A3 A5 A7 AA-AB AD-B9 BB-BD C0-C4 C6 C8-CD D0-D9 DC-DD
|
282 |
|
|
0F 00-47 49-69 71-8B 90-95 97 99-AD B1-B7 B9
|
283 |
|
|
10 A0-C5 D0-F6 FB
|
284 |
|
|
11 00-59 5F-A2 A8-F9
|
285 |
|
|
1E 00-9B A0-F9
|
286 |
|
|
1F 00-15 18-1D 20-45 48-4D 50-57 59 5B 5D
|
287 |
|
|
1F 5F-7D 80-B4 B6-C4 C6-D3 D6-DB DD-EF F2-F4 F6-FE
|
288 |
|
|
20 00-2E 30-46 6A-70 74-8E A0-AB D0-E1
|
289 |
|
|
21 00-38 53-82 90-EA
|
290 |
|
|
22 00-F1
|
291 |
|
|
23 00 02-7A
|
292 |
|
|
24 00-24 40-4A 60-EA
|
293 |
|
|
25 00-95 A0-EF
|
294 |
|
|
26 00-13 1A-6F
|
295 |
|
|
27 01-04 06-09 0C-27 29-4B 4D 4F-52 56 58-5E 61-67 76-94 98-AF B1-BE
|
296 |
|
|
30 00-37 3F 41-94 99-9E A1-FE
|
297 |
|
|
31 05-2C 31-8E 90-9F
|
298 |
|
|
32 00-1C 20-43 60-7B 7F-B0 C0-CB D0-FE
|
299 |
|
|
33 00-76 7B-DD E0-FE
|
300 |
|
|
FB 00-06 13-17 1E-36 38-3C 3E 40-41 43-44 46-B1 D3-FF
|
301 |
|
|
FC 00-FF
|
302 |
|
|
FD 00-3F 50-8F 92-C7 F0-FB
|
303 |
|
|
FE 20-23 30-44 49-52 54-66 68-6B 70-72 74 76-FC FF
|
304 |
|
|
FF 01-5E 61-BE C2-C7 CA-CF D2-D7 DA-DC E0-E6 E8-EE FD
|
305 |
|
|
EOH
|
306 |
|
|
!4E00 9FA5
|
307 |
|
|
!AC00 D7A3
|
308 |
|
|
!E000 F8FF
|
309 |
|
|
!F900 FA2D
|
310 |
|
|
EOH
|
311 |
|
|
|
312 |
|
|
## 302 BMP SECOND EDITION (ISO/IEC 10646-1:2000 A.3.3)
|
313 |
|
|
$SET_ALIAS{302} = '_BMPSecondEdition';
|
314 |
|
|
$SET{_BMPSecondEdition} = col2list (<<EOH) . <<EOH;
|
315 |
|
|
00 20-7E A0-FF
|
316 |
|
|
01 00-FF
|
317 |
|
|
02 00-33 50-AD B0-EE
|
318 |
|
|
03 00-4E 60-62 74-75 7A 7E 84-8A 8C 8E-A1 A3-CE D0-D7 DA-F3
|
319 |
wakaba |
1.2 |
04 00-86 88-89 8C-C4 C7-C8 CB-CC D0-F5 F8-F9
|
320 |
wakaba |
1.1 |
05 31-56 59-5F 61-87 89-8A 91-A1 A3-B9 BB-C4 D0-EA F0-F4
|
321 |
wakaba |
1.2 |
06 0C 1B 1F 21-3A 40-55 60-6D 70-ED F0-FE
|
322 |
wakaba |
1.1 |
07 00-0D 0F-2C 30-4A 80-BF
|
323 |
|
|
09 01-03 05-39 3C-4D 50-54 58-70 81-83 85-8C 8F-90 93-A8 AA-B0
|
324 |
|
|
09 B2 B6-B9 BC BE-C4 C7-C8 CB-CD D7 DC-DD DF-E3 E6-FA
|
325 |
|
|
0A 02 05-0A 0F-10 13-28 2A-30 32-33 35-36
|
326 |
|
|
0A 38-39 3C 3E-42 47-48 4B-4D 59-5C 5E 66-74 81-83 85-8B
|
327 |
|
|
0A 8D 8F-91 93-A8 AA-B0 B2-B3 B5-B9 BC-C5 C7-C9 CB-CD D0 E0 E6-EF
|
328 |
|
|
0B 01-03 05-0C 0F-10 13-28 2A-30 32-33 36-39
|
329 |
|
|
0B 3C-43 47-48 4B-4D 56-57 5C-5D 5F-61 66-70
|
330 |
wakaba |
1.2 |
0B 82-83 85-8A 8E-90 92-95 99-9A 9C 9E-9F
|
331 |
wakaba |
1.1 |
0B A3-A4 A8-AA AE-B5 B7-B9 BE-C2 C6-C8 CA-CD D7 E7-F2
|
332 |
|
|
0C 01-03 05-0C 0E-10 12-28 2A-33 35-39 3E-44
|
333 |
|
|
0C 46-48 4A-4D 55-56 60-61 66-6F 82-83 85-8C
|
334 |
|
|
0C 8E-90 92-A8 AA-B3 B5-B9 BE-C4 C6-C8 CA-CD D5-D6 DE E0-E1 E6-EF
|
335 |
|
|
0D 02-03 05-0C 0E-10 12-28 2A-39 3E-43 46-48
|
336 |
|
|
0D 4A-4D 57 60-61 66-6F 82-83 85-96 9A-B1
|
337 |
|
|
0D B3-BB BD C0-C6 CA CF-D4 D6 D8-DF F2-F4
|
338 |
|
|
0E 01-3A 3F-5B 81-82 84 87-88 8A 8D 94-97
|
339 |
|
|
0E 99-9F A1-A3 A5 A7 AA-AB AD-B9 BB-BD C0-C4 C6 C8-CD D0-D9 DC-DD
|
340 |
|
|
0F 00-47 49-6A 71-8B 90-97 99-BC BE-CC CF
|
341 |
|
|
10 00-21 23-27 29-2A 2C-32 36-39 40-59 A0-C5 D0-F6 FB
|
342 |
|
|
11 00-59 5F-A2 A8-F9
|
343 |
|
|
12 20-26 28-46 48 4A-4D 50-56 58 5A-5D 60-86 88 8A-8D
|
344 |
|
|
12 90-AE B0 B2-B5 B8-BE C0 C2-C5 C8-CE D0-D6 D8-EE F0-FF
|
345 |
|
|
13 00-0E 10 12-15 18-1E 20-46 48-5A 61-7C A0-F4
|
346 |
|
|
16 00-76 80-9C A0-F0
|
347 |
|
|
17 80-DC E0-E9
|
348 |
|
|
18 00-0E 10-19 20-77 80-A9
|
349 |
|
|
1E 00-9B A0-F9
|
350 |
|
|
1F 00-15 18-1D 20-45 48-4D 50-57 59 5B 5D
|
351 |
|
|
1F 5F-7D 80-B4 B6-C4 C6-D3 D6-DB DD-EF F2-F4 F6-FE
|
352 |
|
|
20 00-46 48-4D 4F 6A-70 74-8E A0-AF D0-E3
|
353 |
|
|
21 00-3A 53-83 90-F3
|
354 |
|
|
22 00-F1
|
355 |
|
|
23 00-7B 7D-9A
|
356 |
|
|
24 00-26 40-4A 60-EA
|
357 |
|
|
25 00-95 A0-F7
|
358 |
|
|
26 00-13 19-71
|
359 |
|
|
27 01-04 06-09 0C-27 29-4B 4D 4F-52 56 58-5E 61-67 76-94 98-AF B1-BE
|
360 |
|
|
28 00-FF
|
361 |
|
|
2E 80-99 9B-F3
|
362 |
|
|
2F 00-D5 F0-FB
|
363 |
|
|
30 00-3A 3E-3F 41-94 99-9E A1-FE
|
364 |
|
|
31 05-2C 31-8E 90-B7
|
365 |
|
|
32 00-1C 20-43 60-7B 7F-B0 C0-CB D0-FE
|
366 |
|
|
33 00-76 7B-DD E0-FE
|
367 |
|
|
A4 00-8C 90-A1 A4-B3 B5-C0 C2-C4 C6
|
368 |
|
|
FB 00-06 13-17 1D-36 38-3C 3E 40-41 43-44 46-B1 D3-FF
|
369 |
|
|
FC 00-FF
|
370 |
|
|
FD 00-3F 50-8F 92-C7 F0-FB
|
371 |
|
|
FE 20-23 30-44 49-52 54-66 68-6B 70-72 74 76-FC FF
|
372 |
|
|
FF 01-5E 61-BE C2-C7 CA-CF D2-D7 DA-DC E0-E6 E8-EE F9-FD
|
373 |
|
|
EOH
|
374 |
|
|
!1401 15FF
|
375 |
|
|
!4E00 9FA5
|
376 |
|
|
!AC00 D7A3
|
377 |
|
|
!E000 F8FF
|
378 |
|
|
!F900 FA2D
|
379 |
|
|
EOH
|
380 |
|
|
|
381 |
|
|
$SET{GeneralFormatCharacters} = $SET{ $SET_ALIAS{200} }.$SET{ $SET_ALIAS{201} }
|
382 |
|
|
.$SET{ $SET_ALIAS{202} }.$SET{ $SET_ALIAS{203} };
|
383 |
|
|
$SET{ScriptSpecificFormatCharacters} = $SET{ $SET_ALIAS{204} }
|
384 |
|
|
.$SET{ $SET_ALIAS{205} }.$SET{ $SET_ALIAS{206} }.$SET{ $SET_ALIAS{207} };
|
385 |
|
|
$SET_ALIAS{250} = 'GeneralFormatCharacters';
|
386 |
|
|
$SET_ALIAS{251} = 'ScriptSpecificFormatCharacters';
|
387 |
|
|
|
388 |
|
|
## 281-284 ISO/IEC 10646-1:2000 Amd.1
|
389 |
|
|
$SET_ALIAS{281} = '_MES1';
|
390 |
|
|
$SET{_MES1} = col2list (<<EOH);
|
391 |
|
|
00 20-7E A0-FF
|
392 |
|
|
01 00-13 16-2B 2E-4D 50-7E
|
393 |
|
|
02 C7 D8-DB DD
|
394 |
|
|
20 15 18-19 1C-1D AC
|
395 |
|
|
21 22 26 5B-5E 90-93
|
396 |
|
|
26 6A
|
397 |
|
|
EOH
|
398 |
|
|
|
399 |
|
|
$SET_ALIAS{282} = '_MES2';
|
400 |
|
|
$SET{_MES2} = col2list (<<EOH);
|
401 |
|
|
00 20-7E A0-FF
|
402 |
|
|
01 00-7F 8F 92 B7 DE-EF FA-FF
|
403 |
|
|
02 18-1B 1E-1F 59 7C 92 BB-BD C6-C7 C9 D8-DD EE
|
404 |
|
|
03 74-75 7A 7E 84-8A 8C 8E-A1 A3-CE D7 DA-E1
|
405 |
|
|
04 00-5F 90-C4 C7-C8 CB-CC D0-EB EE-F5 F8-F9
|
406 |
|
|
1E 02-03 0A-0B 1E-1F 40-41 56-57 60-61 6A-6B 80-85 9B F2-F3
|
407 |
|
|
1F 00-15 18-1D 20-45 48-4D 50-57 59 5B 5D 5F-7D 80-B4 B6-C4 C6-D3 D6-DB DD-EF
|
408 |
|
|
1F F2-F4 F6-FE
|
409 |
|
|
20 13-15 17-1E 20-22 26 30 32-33 39-3A 3C 3E 44 4A 7F 82 A3-A4 A7 AC AF
|
410 |
|
|
21 05 16 22 26 5B-5E 90-95 A8
|
411 |
|
|
22 00 02-03 06 08-09 0F 11-12 19-1A 1E-1F 27-2B 48 59 60-61 64-65 82-83 95 97
|
412 |
|
|
23 02 10 20-21 29-2A
|
413 |
|
|
25 00 02 0C 10 14 18 1C 24 2C 34 3C 50-6C 80 84 88 8C 90-93 A0 AC B2 BA BC C4
|
414 |
|
|
25 CA-CB D8-D9
|
415 |
|
|
26 3A-3C 40 42 60 63 65-66 6A-6B
|
416 |
|
|
FB 01-02
|
417 |
|
|
FF FD
|
418 |
|
|
EOH
|
419 |
|
|
|
420 |
|
|
$SET_ALIAS{283} = '_MES3A';
|
421 |
|
|
$SET{_MES3A} = '';
|
422 |
|
|
for (1..11, 27, 30..40, 42, 44..47, 63, 65, 70) {
|
423 |
|
|
$SET{_MES3A} .= $SET{ $SET_ALIAS{$_} };
|
424 |
|
|
}
|
425 |
|
|
|
426 |
|
|
$SET_ALIAS{284} = '_MES3B';
|
427 |
|
|
$SET{_MES3B} = col2list (<<EOH);
|
428 |
|
|
00 20-7E A0-FF
|
429 |
|
|
01 00-FF
|
430 |
|
|
02 00-1F 22-33 50-AD B0-EE
|
431 |
|
|
03 00-4E 60-62 74-75 7A 7E 84-8A 8C 8E-A1 A3-CE D0-D7 DA-F3
|
432 |
|
|
04 00-86 88-89 8C-C4 C7-C8 CB-CC D0-F5 F8-F9
|
433 |
|
|
05 31-56 59-5F 61-87 89-8A
|
434 |
|
|
10 D0-F6 FB
|
435 |
|
|
1E 00-9B A0-F9
|
436 |
|
|
1F 00-15 18-1D 20-45 48-4D 50-57 59 5B 5D 5F-7D 80-B4 B6-C4 C6-D3 D6-DB DD-EF
|
437 |
|
|
1F F2-F4 F6-FE
|
438 |
|
|
20 00-46 48-4D 6A-70 74-8E A0-AF D0-E3
|
439 |
|
|
21 00-3A 53-83 90-F3
|
440 |
|
|
22 00-F1
|
441 |
|
|
23 00-7B 7D-9A
|
442 |
|
|
24 40-4A
|
443 |
|
|
25 00-95 A0-F7
|
444 |
|
|
26 00-13 19-71
|
445 |
|
|
FB 00-06 13-17
|
446 |
|
|
FE 20-23
|
447 |
|
|
FF F9-FD
|
448 |
|
|
EOH
|
449 |
|
|
|
450 |
|
|
## 500-501 Removed by ISO/IEC 10646-1:2000 Amd.1
|
451 |
|
|
$SET{PrivateUsePlanes} = <<EOH;
|
452 |
|
|
0F0000 10FFFF
|
453 |
|
|
E00000 FFFFFF
|
454 |
|
|
EOH
|
455 |
|
|
$SET_ALIAS{500} = 'PrivateUsePlanes';
|
456 |
|
|
$SET{PrivateUseGroups} = <<EOH;
|
457 |
|
|
60000000 7FFFFFFF
|
458 |
|
|
EOH
|
459 |
|
|
$SET_ALIAS{500} = 'PrivateUseGroups';
|
460 |
|
|
|
461 |
|
|
&print_module;
|
462 |
|
|
|
463 |
wakaba |
1.3 |
## $Date: 2002/09/07 09:09:59 $
|
464 |
wakaba |
1.1 |
### UCS-src.upl ends here
|