From 81356b8d1c21f2454140b6da4880d64736b6dc4f Mon Sep 17 00:00:00 2001 From: Karl Berry Date: Fri, 13 Jan 2006 00:10:00 +0000 Subject: twoup git-svn-id: svn://tug.org/texlive/trunk@1412 c570f23f-e606-0410-a88d-b1316a301751 --- Master/texmf-dist/tex/latex/twoup/twoup.sty | 187 ++++++++++++++++++++++++++++ 1 file changed, 187 insertions(+) create mode 100644 Master/texmf-dist/tex/latex/twoup/twoup.sty (limited to 'Master/texmf-dist/tex') diff --git a/Master/texmf-dist/tex/latex/twoup/twoup.sty b/Master/texmf-dist/tex/latex/twoup/twoup.sty new file mode 100644 index 00000000000..112958cd8de --- /dev/null +++ b/Master/texmf-dist/tex/latex/twoup/twoup.sty @@ -0,0 +1,187 @@ +%% +%% This is file `twoup.sty', +%% generated with the docstrip utility. +%% +%% The original source files were: +%% +%% twoup.dtx (with options: `package') +%% +%% +%% This is the twoup package +%% Copyright 2005 by Mogens Lemvig Hansen, +%% mlhansen@uniserve.com +%% +%% Run twoup.dtx through LaTeX and read the documentation in twoup.dvi +%% +%% This work may be distributed and/or modified under the +%% conditions of the LaTeX Project Public License, either version 1.3 +%% of this license or (at your option) any later version. +%% The latest version of this license is in +%% http://www.latex-project.org/lppl.txt +%% and version 1.3 or later is part of all distributions of LaTeX +%% version 2003/12/01 or later. +%% +%% This work has the LPPL maintenance status "maintained". +%% +%% This Current Maintainer of this work is Mogens Lemvig Hansen. +%% +%% This work consists of the files twoup.dtx and twoup.ins +%% and the derived file twoup.sty. +%% +\NeedsTeXFormat{LaTeX2e}% +\ProvidesPackage{twoup}[2005/07/25 version 1.2] +\DeclareOption{noheadfoot}{% + \setlength{\headheight}{0pt}% + \setlength{\headsep}{0pt}% + \setlength{\footskip}{0pt}% + \let\ps@plain\ps@empty + \pagestyle{empty}} +\DeclareOption{nofoot}{% + \setlength{\footskip}{0pt}% + \let\ps@plain\ps@empty + \pagestyle{headings}} +\DeclareOption{nohead}{% + \setlength{\headheight}{0pt}% + \setlength{\headsep}{0pt}% + \pagestyle{plain}} +\DeclareOption{letterpaper}{% + \def\TwoUp@info{-pletter -W5.5in -H8.5in}% + \def\TwoUp@paper{letter}}% +\DeclareOption{legalpaper}{% + \def\TwoUp@info{-plegal -W7in -H8.5in}% + \def\TwoUp@paper{legal}}% +\DeclareOption{executivepaper}{% + \def\TwoUp@info{-pexecutive -W5.25in -H7.25in}% + \def\TwoUp@paper{executive}}% +\DeclareOption{a4paper}{% + \def\TwoUp@info{-pa4 -Pa5}% + \def\TwoUp@paper{a4}}% +\DeclareOption{a5paper}{% + \def\TwoUp@info{-pa5 -W105mm -H148mm}% + \def\TwoUp@paper{a5}}% +\DeclareOption{b5paper}{% + \def\TwoUp@info{-pb5 -W125mm -H176mm}% + \def\TwoUp@paper{b5}}% +\DeclareOption{dvips}{% + \def\TwoUp@special{% + \special{papersize=\the\paperwidth,\the\paperheight}}} +\DeclareOption{nospecial}{% + \def\TwoUp@special{\relax}} +\ExecuteOptions{dvips} +\ProcessOptions +\ifx\TwoUp@info\undefined + \setlength{\@tempdima}{8.5in} + \ifdim\paperwidth=\@tempdima + \setlength{\@tempdima}{11in} + \ifdim\paperheight=\@tempdima + \def\TwoUp@info{-pletter -W5.5in -H8.5in} + \fi + \setlength{\@tempdima}{14in} + \ifdim\paperheight=\@tempdima + \def\TwoUp@info{-plegal -W7in -H8.5in} + \fi + \fi + \setlength{\@tempdima}{210mm} + \ifdim\paperwidth=\@tempdima + \setlength{\@tempdima}{297mm} + \ifdim\paperheight=\@tempdima + \def\TwoUp@info{-pa4 -Pa5} + \fi + \fi +\fi +\ifx\TwoUp@info\undefined + \PackageWarningNoLine{twoup}{Unknown paper size. + You may want to use a \MessageBreak + paper size option like letterpaper} + \setlength{\@tempdima}{0.99627\paperwidth} + \@settopoint\@tempdima + \edef\TwoUp@info{-w\the\@tempdima} + \setlength{\@tempdima}{0.99627\paperheight} + \@settopoint\@tempdima + \edef\TwoUp@info{\TwoUp@info\space -h\the\@tempdima} + \setlength{\@tempdima}{0.5\paperheight} + \setlength{\@tempdima}{0.99627\@tempdima} + \@settopoint\@tempdima + \edef\TwoUp@info{\TwoUp@info\space -W\the\@tempdima} + \setlength{\@tempdima}{0.99627\paperwidth} + \@settopoint\@tempdima + \edef\TwoUp@info{\TwoUp@info\space -H\the\@tempdima} +\fi +\setlength{\@tempdima}{\paperwidth} +\setlength{\paperwidth}{0.5\paperheight} +\setlength{\paperheight}{\@tempdima} +\@ifpackageloaded{2up}{% + \source{\magstep0}{\paperwidth}{\paperheight}% + \target{\magstep0}{2\paperwidth}{\paperheight}% +}{% +\@ifpackageloaded{booklet}{% + \source{\magstep0}{\paperwidth}{\paperheight}% + \target{\magstep0}{2\paperwidth}{\paperheight}% +}{% + \TwoUp@special + \AtEndDocument{\typeout{^^J% + Package twoup Info: Use psnup with these options:^^J% + psnup \TwoUp@info\space -2 \jobname.ps twoup.ps^^J}} + \ifx\TwoUp@paper\undefined\else + \AtEndDocument{\typeout{^^J% + Package twoup Info: You may have to add these + three lines to your .ps file:^^J% + \@percentchar\@percentchar BeginPaperSize: \TwoUp@paper^^J% + \TwoUp@paper^^J% + \@percentchar\@percentchar EndPaperSize^^J}} + \fi% +}}% +\setlength{\@tempdima}{1in} +\setlength{\textwidth}{\paperwidth} +\addtolength{\textwidth}{-\@tempdima} +\if@twoside + \setlength{\evensidemargin}{0.33\@tempdima} + \setlength{\oddsidemargin}{\@tempdima} + \addtolength{\oddsidemargin}{-\evensidemargin} +\else + \setlength{\oddsidemargin}{0.5\@tempdima} + \setlength{\evensidemargin}{\oddsidemargin} +\fi +\addtolength{\oddsidemargin}{-1in} +\addtolength{\evensidemargin}{-1in} +\setlength{\topmargin}{0.5in} +\setlength{\textheight}{\paperheight} +\addtolength{\textheight}{-2\topmargin} +\addtolength{\textheight}{-\headheight} +\addtolength{\textheight}{-\headsep} +\addtolength{\textheight}{-\footskip} +\addtolength{\textheight}{-\topskip} +\divide\textheight\baselineskip +\@tempcnta\textheight +\setlength{\textheight}{\@tempcnta\baselineskip} +\addtolength{\textheight}{\topskip} +\addtolength{\topmargin}{-1in} +\newcommand{\cleartolastpage}{% + \clearpage + \@ifstar + {\def\TwoUp@blankpagestyle{\thispagestyle{empty}}\cleartolastp@ge} + {\let\TwoUp@blankpagestyle\relax\cleartolastp@ge}} +\if@twoside + \newcommand{\cleartolastp@ge}[1][4]{% + \@tempcnta#1\relax + \cleartol@stp@ge}% +\else + \newcommand{\cleartolastp@ge}[1][2]{% + \@tempcnta#1\relax + \cleartol@stp@ge}% +\fi +\newcommand{\cleartol@stp@ge}[1][0]{% + \@tempcntb\c@page + \divide\@tempcntb\@tempcnta + \multiply\@tempcntb\@tempcnta + \advance\@tempcntb#1\relax + \ifnum\@tempcntb<\c@page + \advance\@tempcntb\@tempcnta + \fi + \loop\ifnum\c@page<\@tempcntb + \hbox{}\TwoUp@blankpagestyle\newpage + \repeat +} +\endinput +%% +%% End of file `twoup.sty'. -- cgit v1.2.3