print.ps

用ghostscript语言编写的一个ps文件

/*findfont {
  dup /Font resourcestatus { pop pop findfont } {
    notice*page begin
      *open
      (Error in findfont: ) *echo-n dup *echo
      *close
    end
    findfont
  } ifelse
} bind def


/STSong-Light--GB-EUC-H *findfont 25 scalefont setfont
50 600 moveto
(灵笔 Ghostscript) show	

showpage