%!

/GnuMICR findfont
12 scalefont
setfont

newpath

100 500 moveto
(0123456789 A B C D) show

stroke

showpage