% FontName CharFile 

30 dict begin
	/CharFile exch def
	/FontName exch def
	/FontType 3 def
	/FontBBox [0.0 -32.0 32.0 32.0] def
	/FontMatrix [ 1 38.0 div 0 0 -1 32.0 div 0 0] def
	/Encoding 256 array def
	StandardEncoding Encoding copy pop
	/Metrics 256 dict def
	/CharStrings 256 dict def
	/BuildChar {
		1 index begin
			FontDirectory FontName get /BuildChar /buildhershey load put
			currentdict /BuildChar /buildhershey load put
			CharFile run
			/BuildChar load
		end
		exec
	} def
	FontName currentdict definefont pop
end
