🚀 go-pugleaf

RetroBBS NetNews Server

Inspired by RockSolid Light RIP Retro Guy

Thread View: adobe.postscript.programming
3 messages
3 total messages Started by Donald Volent Fri, 08 Nov 2002 14:12
Again, making two .eps's into a .ps that duplexes
#1257
Author: Donald Volent
Date: Fri, 08 Nov 2002 14:12
130 lines
4870 bytes
Ok, I've been doing my homework but still can't shake this thing out. So I'm putting the thing below.. It's one .eps file copied and concatenated to itself. By itself -before I add any changes- it doesn't print. But when I add a "showpage" at the end of each respective file, I get two un-duplexed pages. So then I go ahead and add a "save /showpage {} def" at the beginning of each respective file, and a "restore 
%%BeginFeature: 
<</Duplex true /Tumble false>> 
%%EndFeature 
showpage" at the end of each respective file, and the thing still doesn't duplex. (I had my additions in red, but I lost it here). So, anybody want to try their hand at adding something below to make this thing duplex? 

Patiently and expectantly enduring, 

Don Volent 

The Code: 

%!PS-Adobe-3.0 EPSF-3.0 
%%Title: (Microsoft Word - HO04610491.doc) 
%%Version: 1 3 
%%Creator: (AdobePS5.dll Version 5.2) 
%%CreationDate: (D:20021008092400) 
%%DocumentData: Clean7Bit 
%%LanguageLevel: 2 
%%BoundingBox: 0 0 612 792 
%%Pages: 0 
%%DocumentProcessColors: Cyan Magenta Yellow Black 
%%DocumentSuppliedResources: 
%%+ procset (Adobe Acrobat - PDF operators) 1.2 0 
%%+ procset (Adobe Acrobat - type operators) 1.2 0 
%%EndComments 

save 
/showpage {} def 
0 0 moveto 
612 0 lineto 
612 792 lineto 
0 792 lineto 
closepath clip newpath 
%%BeginProlog 
%%EndProlog 
%%BeginSetup 
%%BeginResource: l2check 
%%Copyright: Copyright 1993 Adobe Systems Incorporated. All Rights Reserved. 
systemdict /languagelevel known 
{ systemdict /languagelevel get 1 eq } 
{ true } 
ifelse 
{ 
initgraphics /Helvetica findfont 18 scalefont setfont 
72 600 moveto (Error: Your printer driver needs to be configured) dup show 
72 580 moveto (for printing to a PostScript Language Level 1 printer.) dup show 
exch = = 
/Helvetica-Bold findfont 16 scalefont setfont 
72 520 moveto (Windows and Unix) show 
/Times-Roman findfont 16 scalefont setfont 
72 500 moveto (Select \252Language Level 1\272 in the PostScript options section) show 
72 480 moveto (of the Acrobat print dialog.) show 
/Helvetica-Bold findfont 16 scalefont setfont 
72 440 moveto (Macintosh) show 
/Times-Roman findfont 16 scalefont setfont 
72 420 moveto (In the Chooser, select your printer driver.) show 
72 400 moveto (Then select your printer and click the Setup button.) show 
72 380 moveto (Follow any on-screen dialogs that may appear.) show 
showpage 
quit 
} 
if 
%%EndResource 
/currentpacking where{pop currentpacking true setpacking}if 
%%BeginResource: procset pdfvars 
%%Copyright: Copyright 1987-1999 Adobe Systems Incorporated. All Rights Reserved. 
%%Version: 4.0 2 
%%Title: definition of dictionary of variables used by PDF & PDFText procsets 
userdict /PDF 160 dict put 
userdict /PDFVars 86 dict dup begin put 
/_save 0 def 
/_cshow 0 def 
/InitAll 0 def 
/TermAll 0 def 
/DocInitAll 0 def 
/DocTermAll 0 def 
/_lp /none def 
/_doClip 0 def 
/sfc 0 def 
/_sfcs 0 def 
/_sfc 0 def 
/ssc 0 def 
/_sscs 0 def 
/_ssc 0 def 
/_fcs 0 def 
/_scs 0 def 
/_fp 0 def 
/_sp 0 def 
/AGM_MAX_CS_COMPONENTS 10 def 
/_fillColors [ 0 1 AGM_MAX_CS_COMPONENTS { array } for ] def 
/_strokeColors [ 0 1 AGM_MAX_CS_COMPONENTS { array } for ] def 
/_fc null def 
/_sc null def 
/DefaultGray [/DeviceGray] def 
/DefaultRGB [/DeviceRGB] def 
/DefaultCMYK [/DeviceCMYK] def 
/_inT false def 
/_tr -1 def 
/_rise 0 def 
/_ax 0 def 
/_cx 0 def 
/_ld 0 def 
/_tm matrix def 
/_ctm matrix def 
/_mtx matrix def 
/_hy (-) def 
/_fScl 0 def 
/_hs 1 def 
/_pdfEncodings 2 array def 
/_baselineadj 0 def 
/_fTzero false def 
/_Tj 0 def 
/_italMtx [1 0 .212557 1 0 0] def 
/_italMtx_WMode1 [1 -.212557 0 1 0 0] def 
/_italMtxType0 [1 0 .1062785 1 0 0] def 
/_italMtx_WMode1Type0 [1 -.1062785 0 1 0 0] def 
/_basefont 0 def 
/_basefonto 0 def 
/_pdf_oldCIDInit null def 
/_pdf_FontDirectory 30 dict def 
/_categories 10 dict def 
/_sa? true def 
/_op? false def 
/_OP? false def 
/_opmode 0 def 
/_ColorSep5044? false def 
/_tmpcolr? [] def 
/_tmpop? {} def 
/_processColor
Re: Again, making two .eps's into a .ps that duplexes
#1258
Author: Aandi Inston
Date: Fri, 08 Nov 2002 14:47
32 lines
1719 bytes
1. Although it may not be the cause of the problems, it is not usual
to edit the EPS contents in this way. EPS is usually treated as black
box, and its lines untouched. So, while using 

save 
/showpage {} def 
...
restore

is a good (in fact, a necessary) part of working with EPS, it usually
wraps around the whole file.

2. Working with an EPS it is usually considered good practice to also
reset the graphics state as recommended by the EPS specification.

3. You use the sequence:

restore 
%%BeginFeature: 
<</Duplex true /Tumble false>> 
%%EndFeature 
showpage

but that will do nothing.  The line with /Duplex is a parameter
dictionary for setpagedevice, but setpagedevice is missing. So the
dictionary does nothing.  Setpagedevice erases the page so it must
PRECEDE the EPS.

Furthermore, calling setpagedevice may reset the duplex state. Call it
once only.

Aandi Inston
Re: Again, making two .eps's into a .ps that duplexes
#1263
Author: Donald Volent
Date: Fri, 08 Nov 2002 19:22
5 lines
884 bytes
Thought I'd let you know: 10-4, -We have a liftoff! Yes we do! 

Muchos grachos and all good stuff, 

DP Volent
Thread Navigation

This is a paginated view of messages in the thread with full content displayed inline.

Messages are displayed in chronological order, with the original post highlighted in green.

Use pagination controls to navigate through all messages in large threads.

Back to All Threads