20 lines · 519 B · Text
RawDownload
/Page null def/Page# 0 def/PDFSave null def/DSCPageCount 0 def/DoPDFPage {dup /Page# exch store pdfgetpage pdfshowpage } def /pdfshowpage_mysetpage {	% <pagedict> pdfshowpage_mysetpage <pagedict>  dup /CropBox pget {      boxrect      2 array astore /PageSize exch 4 2 roll      4 index /Rotate pget {        dup 0 lt {360 add} if 90 idiv {exch neg} repeat      } if      exch neg exch 2 array astore /PageOffset exch      << 5 1 roll >> setpagedevice  } if} bind def GS_PDF_ProcSet beginpdfdict begin