summaryrefslogtreecommitdiff
path: root/fonts/utilities/vfinst/DOA2E
diff options
context:
space:
mode:
Diffstat (limited to 'fonts/utilities/vfinst/DOA2E')
-rw-r--r--fonts/utilities/vfinst/DOA2E354
1 files changed, 354 insertions, 0 deletions
diff --git a/fonts/utilities/vfinst/DOA2E b/fonts/utilities/vfinst/DOA2E
new file mode 100644
index 0000000000..0f8a32e7a0
--- /dev/null
+++ b/fonts/utilities/vfinst/DOA2E
@@ -0,0 +1,354 @@
+### Now to load glyph number vs proper glyph names for expert fonts.
+
+@glyphexptable=(
+ "32 space",
+ "33 exclamsmall",
+ "34 Hungarumlautsmall",
+ "36 dollaroldstyle",
+ "37 dollarsuperior",
+ "38 ampersandsmall",
+ "39 Acutesmall",
+ "40 parenleftsuperior",
+ "41 parenrightsuperior",
+ "42 twodotenleader",
+ "43 onedotenleader",
+ "44 comma",
+ "45 hyphen",
+ "46 period",
+ "47 fraction",
+ "48 zerooldstyle",
+ "49 oneoldstyle",
+ "50 twooldstyle",
+ "51 threeoldstyle",
+ "52 fouroldstyle",
+ "53 fiveoldstyle",
+ "54 sixoldstyle",
+ "55 sevenoldstyle",
+ "56 eightoldstyle",
+ "57 nineoldstyle",
+ "58 colon",
+ "59 semicolon",
+ "60 commasuperior",
+ "61 threequartersemdash",
+ "62 periodsuperior",
+ "63 questionsmall",
+ "65 asuperior",
+ "66 bsuperior",
+ "67 centsuperior",
+ "68 dsuperior",
+ "69 esuperior",
+ "73 isuperior",
+ "76 lsuperior",
+ "77 msuperior",
+ "78 nsuperior",
+ "79 osuperior",
+ "82 rsuperior",
+ "83 ssuperior",
+ "84 tsuperior",
+ "86 ff",
+ "87 fi",
+ "88 fl",
+ "89 ffi",
+ "90 ffl",
+ "91 parenleftinferior",
+ "93 parenrightinferior",
+ "94 Circumflexsmall",
+ "95 hyphensuperior",
+ "96 Gravesmall",
+ "97 Asmall",
+ "98 Bsmall",
+ "99 Csmall",
+ "100 Dsmall",
+ "101 Esmall",
+ "102 Fsmall",
+ "103 Gsmall",
+ "104 Hsmall",
+ "105 Ismall",
+ "106 Jsmall",
+ "107 Ksmall",
+ "108 Lsmall",
+ "109 Msmall",
+ "110 Nsmall",
+ "111 Osmall",
+ "112 Psmall",
+ "113 Qsmall",
+ "114 Rsmall",
+ "115 Ssmall",
+ "116 Tsmall",
+ "117 Usmall",
+ "118 Vsmall",
+ "119 Wsmall",
+ "120 Xsmall",
+ "121 Ysmall",
+ "122 Zsmall",
+ "123 colonmonetary",
+ "124 onefitted",
+ "125 rupiah",
+ "126 Tildesmall",
+ "161 exclamdownsmall",
+ "162 centoldstyle",
+ "163 Lslashsmall",
+ "166 Scaronsmall",
+ "167 Zcaronsmall",
+ "168 Dieresissmall",
+ "169 Brevesmall",
+ "170 Caronsmall",
+ "172 Dotaccentsmall",
+ "175 Macronsmall",
+ "178 figuredash",
+ "179 hypheninferior",
+ "182 Ogoneksmall",
+ "183 Ringsmall",
+ "184 Cedillasmall",
+ "188 onequarter",
+ "189 onehalf",
+ "190 threequarters",
+ "191 questiondownsmall",
+ "192 oneeighth",
+ "193 threeeighths",
+ "194 fiveeighths",
+ "195 seveneighths",
+ "196 onethird",
+ "197 twothirds",
+ "200 zerosuperior",
+ "201 onesuperior",
+ "202 twosuperior",
+ "203 threesuperior",
+ "204 foursuperior",
+ "205 fivesuperior",
+ "206 sixsuperior",
+ "207 sevensuperior",
+ "208 eightsuperior",
+ "209 ninesuperior",
+ "210 zeroinferior",
+ "211 oneinferior",
+ "212 twoinferior",
+ "213 threeinferior",
+ "214 fourinferior",
+ "215 fiveinferior",
+ "216 sixinferior",
+ "217 seveninferior",
+ "218 eightinferior",
+ "219 nineinferior",
+ "220 centinferior",
+ "221 dollarinferior",
+ "222 periodinferior",
+ "223 commainferior",
+ "224 Agravesmall",
+ "225 Aacutesmall",
+ "226 Acircumflexsmall",
+ "227 Atildesmall",
+ "228 Adieresissmall",
+ "229 Aringsmall",
+ "230 AEsmall",
+ "231 Ccedillasmall",
+ "232 Egravesmall",
+ "233 Eacutesmall",
+ "234 Ecircumflexsmall",
+ "235 Edieresissmall",
+ "236 Igravesmall",
+ "237 Iacutesmall",
+ "238 Icircumflexsmall",
+ "239 Idieresissmall",
+ "240 Ethsmall",
+ "241 Ntildesmall",
+ "242 Ogravesmall",
+ "243 Oacutesmall",
+ "244 Ocircumflexsmall",
+ "245 Otildesmall",
+ "246 Odieresissmall",
+ "247 OEsmall",
+ "248 Oslashsmall",
+ "249 Ugravesmall",
+ "250 Uacutesmall",
+ "251 Ucircumflexsmall",
+ "252 Udieresissmall",
+ "253 Yacutesmall",
+ "254 Thornsmall",
+ "255 Ydieresissmall",
+ );
+sub loadglyphexpnames{
+ foreach $pair (@glyphexptable) {
+ local($glyphnumber, $properglyphname)=split(/ /, $pair, 2);
+ $expglyphname[$glyphnumber]=$properglyphname;
+ }
+}
+
+&loadglyphexpnames; # let 'er rip...
+
+@glyphasetable=( # This is the table of glyphs in the Adobe Stand'd Encoding (ASE)
+ "32 space",
+ "33 exclam",
+ "34 quotedbl",
+ "35 numbersign",
+ "36 dollar",
+ "37 percent",
+ "38 ampersand",
+ "39 quoteright",
+ "40 parenleft",
+ "41 parenright",
+ "42 asterisk",
+ "43 plus",
+ "44 comma",
+ "45 hyphen",
+ "46 period",
+ "47 slash",
+ "48 zero",
+ "49 one",
+ "50 two",
+ "51 three",
+ "52 four",
+ "53 five",
+ "54 six",
+ "55 seven",
+ "56 eight",
+ "57 nine",
+ "58 colon",
+ "59 semicolon",
+ "60 less",
+ "61 equal",
+ "62 greater",
+ "63 question",
+ "64 at",
+ "65 A",
+ "66 B",
+ "67 C",
+ "68 D",
+ "69 E",
+ "70 F",
+ "71 G",
+ "72 H",
+ "73 I",
+ "74 J",
+ "75 K",
+ "76 L",
+ "77 M",
+ "78 N",
+ "79 O",
+ "80 P",
+ "81 Q",
+ "82 R",
+ "83 S",
+ "84 T",
+ "85 U",
+ "86 V",
+ "87 W",
+ "88 X",
+ "89 Y",
+ "90 Z",
+ "91 bracketleft",
+ "92 backslash",
+ "93 bracketright",
+ "94 asciicircum",
+ "95 underscore",
+ "96 quoteleft",
+ "97 a",
+ "98 b",
+ "99 c",
+ "100 d",
+ "101 e",
+ "102 f",
+ "103 g",
+ "104 h",
+ "105 i",
+ "106 j",
+ "107 k",
+ "108 l",
+ "109 m",
+ "110 n",
+ "111 o",
+ "112 p",
+ "113 q",
+ "114 r",
+ "115 s",
+ "116 t",
+ "117 u",
+ "118 v",
+ "119 w",
+ "120 x",
+ "121 y",
+ "122 z",
+ "123 braceleft",
+ "124 bar",
+ "125 braceright",
+ "126 asciitilde",
+ "161 exclamdown",
+ "162 cent",
+ "163 sterling",
+ "164 fraction",
+ "165 yen",
+ "166 florin",
+ "167 section ",
+ "168 currency",
+ "169 quotesingle",
+ "170 quotedblleft",
+ "171 guillemotleft",
+ "172 guilsinglleft",
+ "173 guilsinglright",
+ "174 fi",
+ "175 fl",
+ "177 endash",
+ "178 dagger",
+ "179 daggerdbl",
+ "180 periodcentered",
+ "182 paragraph",
+ "183 bullet",
+ "184 quotesinglbase",
+ "185 quotedblbase",
+ "186 quotedblright",
+ "187 guillemotright",
+ "188 ellipsis",
+ "189 perthousand",
+ "191 questiondown",
+ "193 grave",
+ "194 acute",
+ "195 circumflex",
+ "196 tilde",
+ "197 macron",
+ "198 breve",
+ "199 dotaccent",
+ "200 dieresis",
+ "202 ring",
+ "203 cedilla",
+ "205 hungarumlaut",
+ "206 ogonek",
+ "207 caron",
+ "208 emdash",
+ "225 AE",
+ "227 ordfeminine",
+ "232 Lslash",
+ "233 Oslash",
+ "234 OE",
+ "235 ordmasculine",
+ "241 ae",
+ "245 dotlessi",
+ "248 lslash",
+ "249 oslash",
+ "250 oe",
+ "251 germandbls",
+ );
+
+sub loadglyphasenames{
+ foreach $pair (@glyphasetable) {
+ local($glyphnumber, $ASEglyphname)=split(/ /, $pair, 2);
+ $aseglyphname[$glyphnumber]=$ASEglyphname;
+ }
+}
+
+&loadglyphasenames;
+
+## The two arrays are @aseglyphname and @expglyphname.
+
+open (OUT, ">ase2exp.mtx");
+
+foreach $i (32..251) {
+ if ($aseglyphname[$i] eq $expglyphname[$i]) {
+ push @unsets, "\\unsetglyph\{$aseglyphname[$i]\} \% char $i\n";
+ } else {
+ push @renames, "\\rename\{$aseglyphname[$i]\}\{$expglyphname[$i]\} \% char $i\n";
+ }
+}
+print OUT "\\relax\n\n\\metrics\n\n";
+print OUT @renames;
+print OUT "\n";
+print OUT "@unsets\n\\endmetrics";