| 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 |
$PROP{version} = do{my @r=(q$Revision: 1.2 $=~/\d+/g);sprintf "%d."."%02d" x $#r,@r};
|
| 8 |
$PROP{author_name} = 'Wakaba';
|
| 9 |
$PROP{author_mail} = '[email protected]';
|
| 10 |
|
| 11 |
$PROP{pod_see_also} = <<EOH;
|
| 12 |
L<Char::Class::JISX0221>
|
| 13 |
|
| 14 |
L<Char::Class::RFC1815>
|
| 15 |
EOH
|
| 16 |
|
| 17 |
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 |
04 00-86 88-89 8C-C4 C7-C8 CB-CC D0-F5 F8-F9
|
| 320 |
05 31-56 59-5F 61-87 89-8A 91-A1 A3-B9 BB-C4 D0-EA F0-F4
|
| 321 |
06 0C 1B 1F 21-3A 40-55 60-6D 70-ED F0-FE
|
| 322 |
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 |
0B 82-83 85-8A 8E-90 92-95 99-9A 9C 9E-9F
|
| 331 |
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 |
## $Date: 2002/09/07 09:09:59 $
|
| 464 |
### UCS-src.upl ends here
|
Parent Directory
| 
Revision Log