+ $codepoint = hex ($_);
+ $combining[ $codepoint ] = 1;
+ if ($codepoint > $maxcombining) {
+ $maxcombining = $codepoint;
+ }
+}
+close (A);
+
+$nglyphs = 0; # number of glyphs in font (none defined yet)
+@codepoints = (); # code points of hex bitmaps
+@bitmaps = (); # the corresponding hex bitmaps
+
+#
+# Add three special characters for TrueType; use these instead of
+# the Fontforge defaults for these three characters.
+#
+push (@codepoints, ".notdef");
+push (@bitmaps, "0000007E665A5A7A76767E76767E0000");
+$nglyphs++;
+
+push (@codepoints, ".null");
+push (@bitmaps, "");
+$nglyphs++;
+
+push (@codepoints, "nonmarkingreturn");
+push (@bitmaps, "00000000000000000000000000000000");
+$nglyphs++;
+
+while(<STDIN>) {
+ chomp;
+ ($c,$d) = split (/:/);
+ push (@codepoints, $c);
+ push (@bitmaps, $d);
+ $nglyphs++;
+}
+$max_code_point=$codepoints[ $nglyphs - 1 ];
+
+# Encoding tag: Is highest glyph above Plane 0?
+if ($max_code_point > 0xFFFF) {
+ $encoding = "Unicode";