diff options
author | Norbert Preining <norbert@preining.info> | 2019-09-02 13:46:59 +0900 |
---|---|---|
committer | Norbert Preining <norbert@preining.info> | 2019-09-02 13:46:59 +0900 |
commit | e0c6872cf40896c7be36b11dcc744620f10adf1d (patch) | |
tree | 60335e10d2f4354b0674ec22d7b53f0f8abee672 /macros/latex/contrib/eso-pic/showframe.sty |
Initial commit
Diffstat (limited to 'macros/latex/contrib/eso-pic/showframe.sty')
-rw-r--r-- | macros/latex/contrib/eso-pic/showframe.sty | 68 |
1 files changed, 68 insertions, 0 deletions
diff --git a/macros/latex/contrib/eso-pic/showframe.sty b/macros/latex/contrib/eso-pic/showframe.sty new file mode 100644 index 0000000000..5bc0366f10 --- /dev/null +++ b/macros/latex/contrib/eso-pic/showframe.sty @@ -0,0 +1,68 @@ + +% Rolf Niepraschk -- Rolf.Niepraschk@gmx.de + +% showframe.sty +% +% 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 "author-maintained". + +% Draws visible frames for the text and margin area, and lines +% for the head and foot to check layout in detail. Using the package +% option "noframe" you can draw the frames later only for a single +% page with \AddToShipoutPicture*{\ShowFramePicture}. Another useful +% options maybe eso-pic's "colorgrid", "grid" and "texcoord". +% +% \ShowFrameColor and \ShowFrameLinethickness can be used to change +% the frames. + +\ProvidesPackage{showframe}[2011/02/24 v0.1i showframe (new impl., RN)] + +\newif\ifSF@frame\SF@frametrue + +\DeclareOption{noframe}{\SF@framefalse} +\DeclareOption*{\PassOptionsToPackage{\CurrentOption}{eso-pic}} +\ProcessOptions\relax + +\RequirePackage{eso-pic}[2002/10/30] + +\newcommand*\ShowFrameColor{\normalcolor} +\newcommand*\ShowFrameLinethickness{.8pt} + +\newcommand\ShowFramePicture{% + \begingroup + \ShowFrameColor\linethickness{\ShowFrameLinethickness}% + \AtPageLowerLeft{% + \framebox(\LenToUnit{\paperwidth},\LenToUnit{\paperheight}){}}% + \AtTextLowerLeft{% + \framebox(\LenToUnit{\textwidth},\LenToUnit{\textheight}){}}% + \AtTextUpperLeft{% + \put(0,\LenToUnit{\headsep}){% + \framebox(\LenToUnit{\textwidth},\LenToUnit{\headheight}){}}}% + \AtTextLowerLeft{% + \put(0,\LenToUnit{-\footskip}){% + \line(1,0){\LenToUnit{\textwidth}}}}% + \AtTextLowerLeft{% + \@tempdima=\textwidth\advance\@tempdima\marginparsep% + \if@twoside + \ifodd\c@page\else + \if@mparswitch + \@tempdima=-\marginparsep\advance\@tempdima-\marginparwidth + \fi + \fi + \fi + \put(\LenToUnit{\@tempdima},0)% + {\framebox(\LenToUnit{\marginparwidth},\LenToUnit{\textheight}){}}% + }% + \endgroup +} + +\ifSF@frame\AddToShipoutPictureFG{\ShowFramePicture}\fi + +\endinput |