"Fossies" - the Fresh Open Source Software Archive

Member "fonts/hrscsb.gsf" (24 Dec 1998, 826 Bytes) of package /linux/misc/old/ghost/fonts/ghostscript-fonts-other-6.0.tar.gz:

As a special service "Fossies" has tried to format the requested text file into HTML format (style: standard) with prefixed line numbers. Alternatively you can here view or download the uninterpreted source code file. 
    1 %!
    2 /deriveHersheyFontGS993 where { pop save {restore} } { {} } ifelse
    3 userdict begin
    4 /deriveHersheyFontGS993	% <newfontname> <uid> <xuid> <paintwidth>
    5 			%   <italicangle> <oldfontname>
    6 {	findfont dup length 1 add dict begin
    7 		{1 index /FID ne {def} {pop pop} ifelse} forall
    8 		FontInfo dup length dict copy begin
    9 			/ItalicAngle exch def
   10 		/FontInfo currentdict end def
   11 		Private dup length dict copy begin
   12 			/UniqueID 3 index def
   13 		/Private currentdict end readonly def
   14 		/FontMatrix [.001 0 FontInfo /ItalicAngle get neg sin 1000 div
   15 			     .001 0 0] def
   16 		/StrokeWidth exch 1000 28 div mul round cvi def
   17 		/XUID exch def
   18 		/UniqueID exch def
   19 		/FontName 1 index def
   20 	currentdict end definefont pop
   21 } def
   22 end exec
   23 /Hershey-Script-Simplex-Bold 5066555 [107 0 5066555]
   24   2.2 0 /Hershey-Script-Simplex deriveHersheyFontGS993