Re: [NTG-context] mirrored pages

19 Apr 2007


      Thankyou very much!!
...
From: Wolfgang Schuster 
Reply-To: mailing list for ConTeXt users 
To: ntg-context@ntg.nl
Subject: Re: [NTG-context] mirrored pages
Date: Thu, 19 Apr 2007 20:40:20 +0200
On Thu, 19 Apr 2007 17:39:57 +0000
"Horacio Suarez"  wrote:
...
IŽve made a mistake and replyed to Mari Voipio. Sorry, Mari.
I need to print in a laser printer mirrored. The page should as is 
viewed in
a mirror. All the pages. Fliped horizontally.
Thankyou very much.
Hi Horacio,
the following code should work.
\unprotect
\def\c!mirrored{mirrored}
\def\docopypages[#1][#2]%
  {\bgroup
   \getfiguredimensions[#1]%
   \getparameters[\??ip]
     [\c!n=\noffigurepages,
      \c!marking=\v!off,
      \c!scale=\!!thousand,
      \c!offset=\!!zeropoint,
      \c!mirrored=\v!no,
      #2]%
   \dorecurse\@@ipn
     {\doif\@@ipmirrored\v!yes\domirrorbox
      \vbox to \textheight
        {\hsize\textwidth
         \scratchdimen\@@ipoffset
         \centeredbox
           {\doifelse\@@ipmarking\v!on\cuthbox\hbox
              {\ifdim\scratchdimen>\zeropoint\relax
                 \advance\vsize -2\scratchdimen
                 \advance\hsize -2\scratchdimen
                 \externalfigure[#1][\c!page=\recurselevel,#2,\c!scale=,
\c!factor=\v!max,\c!offset=\v!overlay]% \else
                 \externalfigure[#1][\c!page=\recurselevel,#2,\c!offset=
\v!overlay]% \fi}}}
      \page}
   \egroup}
\protect
\setuppapersize[A4][A4]
\setuplayout[page]
\starttext
\copypages[file.pdf][mirrored=yes]
\stoptext
Gruß
Wolfgang
_______________________________________________
ntg-context mailing list
ntg-context@ntg.nl
http://www.ntg.nl/mailman/listinfo/ntg-context
_________________________________________________________________
Express yourself instantly with MSN Messenger! Download today it's FREE! 
http://messenger.msn.click-url.com/go/onm00200471ave/direct/01/