print.ps

来自「用ghostscript语言编写的一个ps文件」· PS 代码 · 共 17 行

/*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