| Current File : //usr/share/texlive/texmf-dist/tex/latex/oberdiek/pagegrid.sty |
%%
%% This is file `pagegrid.sty',
%% generated with the docstrip utility.
%%
%% The original source files were:
%%
%% pagegrid.dtx (with options: `package')
%%
%% This is a generated file.
%%
%% Project: pagegrid
%% Version: 2016/05/16 v1.5
%%
%% Copyright (C)
%% 2009 Heiko Oberdiek
%% 2016-2019 Oberdiek Package Support Group
%%
%% This work may be distributed and/or modified under the
%% conditions of the LaTeX Project Public License, either
%% version 1.3c of this license or (at your option) any later
%% version. This version of this license is in
%% https://www.latex-project.org/lppl/lppl-1-3c.txt
%% and the latest version of this license is in
%% https://www.latex-project.org/lppl.txt
%% and version 1.3 or later is part of all distributions of
%% LaTeX version 2005/12/01 or later.
%%
%% This work has the LPPL maintenance status "maintained".
%%
%% The Current Maintainers of this work are
%% Heiko Oberdiek and the Oberdiek Package Support Group
%% https://github.com/ho-tex/oberdiek/issues
%%
%%
%% This work consists of the main source file pagegrid.dtx
%% and the derived files
%% pagegrid.sty, pagegrid.pdf, pagegrid.ins, pagegrid.drv,
%% pagegrid-test1.tex.
%%
\begingroup\catcode61\catcode48\catcode32=10\relax%
\catcode13=5 % ^^M
\endlinechar=13 %
\catcode35=6 % #
\catcode39=12 % '
\catcode44=12 % ,
\catcode45=12 % -
\catcode46=12 % .
\catcode58=12 % :
\catcode64=11 % @
\catcode123=1 % {
\catcode125=2 % }
\expandafter\let\expandafter\x\csname ver@pagegrid.sty\endcsname
\ifx\x\relax % plain-TeX, first loading
\else
\def\empty{}%
\ifx\x\empty % LaTeX, first loading,
% variable is initialized, but \ProvidesPackage not yet seen
\else
\expandafter\ifx\csname PackageInfo\endcsname\relax
\def\x#1#2{%
\immediate\write-1{Package #1 Info: #2.}%
}%
\else
\def\x#1#2{\PackageInfo{#1}{#2, stopped}}%
\fi
\x{pagegrid}{The package is already loaded}%
\aftergroup\endinput
\fi
\fi
\endgroup%
\begingroup\catcode61\catcode48\catcode32=10\relax%
\catcode13=5 % ^^M
\endlinechar=13 %
\catcode35=6 % #
\catcode39=12 % '
\catcode40=12 % (
\catcode41=12 % )
\catcode44=12 % ,
\catcode45=12 % -
\catcode46=12 % .
\catcode47=12 % /
\catcode58=12 % :
\catcode64=11 % @
\catcode91=12 % [
\catcode93=12 % ]
\catcode123=1 % {
\catcode125=2 % }
\expandafter\ifx\csname ProvidesPackage\endcsname\relax
\def\x#1#2#3[#4]{\endgroup
\immediate\write-1{Package: #3 #4}%
\xdef#1{#4}%
}%
\else
\def\x#1#2[#3]{\endgroup
#2[{#3}]%
\ifx#1\@undefined
\xdef#1{#3}%
\fi
\ifx#1\relax
\xdef#1{#3}%
\fi
}%
\fi
\expandafter\x\csname ver@pagegrid.sty\endcsname
\ProvidesPackage{pagegrid}%
[2016/05/16 v1.5 Print page grid in background (HO)]%
\begingroup\catcode61\catcode48\catcode32=10\relax%
\catcode13=5 % ^^M
\endlinechar=13 %
\catcode123=1 % {
\catcode125=2 % }
\catcode64=11 % @
\def\x{\endgroup
\expandafter\edef\csname pagegrid@AtEnd\endcsname{%
\endlinechar=\the\endlinechar\relax
\catcode13=\the\catcode13\relax
\catcode32=\the\catcode32\relax
\catcode35=\the\catcode35\relax
\catcode61=\the\catcode61\relax
\catcode64=\the\catcode64\relax
\catcode123=\the\catcode123\relax
\catcode125=\the\catcode125\relax
}%
}%
\x\catcode61\catcode48\catcode32=10\relax%
\catcode13=5 % ^^M
\endlinechar=13 %
\catcode35=6 % #
\catcode64=11 % @
\catcode123=1 % {
\catcode125=2 % }
\def\TMP@EnsureCode#1#2{%
\edef\pagegrid@AtEnd{%
\pagegrid@AtEnd
\catcode#1=\the\catcode#1\relax
}%
\catcode#1=#2\relax
}
\TMP@EnsureCode{9}{10}% (tab)
\TMP@EnsureCode{10}{12}% ^^J
\TMP@EnsureCode{33}{12}% !
\TMP@EnsureCode{34}{12}% "
\TMP@EnsureCode{36}{3}% $
\TMP@EnsureCode{38}{4}% &
\TMP@EnsureCode{39}{12}% '
\TMP@EnsureCode{40}{12}% (
\TMP@EnsureCode{41}{12}% )
\TMP@EnsureCode{42}{12}% *
\TMP@EnsureCode{43}{12}% +
\TMP@EnsureCode{44}{12}% ,
\TMP@EnsureCode{45}{12}% -
\TMP@EnsureCode{46}{12}% .
\TMP@EnsureCode{47}{12}% /
\TMP@EnsureCode{58}{12}% :
\TMP@EnsureCode{59}{12}% ;
\TMP@EnsureCode{60}{12}% <
\TMP@EnsureCode{62}{12}% >
\TMP@EnsureCode{63}{12}% ?
\TMP@EnsureCode{91}{12}% [
\TMP@EnsureCode{93}{12}% ]
\TMP@EnsureCode{94}{7}% ^ (superscript)
\TMP@EnsureCode{95}{8}% _ (subscript)
\TMP@EnsureCode{96}{12}% `
\TMP@EnsureCode{124}{12}% |
\edef\pagegrid@AtEnd{\pagegrid@AtEnd\noexpand\endinput}
\RequirePackage{tikz}
\RequirePackage{atbegshi}[2009/12/02]
\RequirePackage{kvoptions}[2009/07/17]
\begingroup\expandafter\expandafter\expandafter\endgroup
\expandafter\ifx\csname stockwidth\endcsname\relax
\def\pagegrid@width{\paperwidth}%
\def\pagegrid@height{\paperheight}%
\else
\def\pagegrid@width{\stockwidth}%
\def\pagegrid@height{\stockheight}%
\fi
\SetupKeyvalOptions{%
family=pagegrid,%
prefix=pagegrid@,%
}
\def\pagegrid@init{%
\let\pagegrid@origin@a\@empty
\let\pagegrid@origin@b\@empty
\let\pagegrid@init\relax
}
\let\pagegrid@@init\pagegrid@init
\def\pagegrid@origin@a{bl}
\def\pagegrid@origin@b{tr}
\def\pagegrid@SetOrigin#1{%
\pagegrid@init
\ifx\pagegrid@origin@a\@empty
\def\pagegrid@origin@a{#1}%
\else
\ifx\pagegrid@origin@b\@empty
\else
\let\pagegrid@origin@a\pagegrid@origin@b
\fi
\def\pagegrid@origin@b{#1}%
\fi
}
\def\pagegrid@temp#1{%
\DeclareVoidOption{#1}{\pagegrid@SetOrigin{#1}}%
\@namedef{pagegrid@N@#1}{#1}%
}
\pagegrid@temp{bl}
\pagegrid@temp{br}
\pagegrid@temp{tl}
\pagegrid@temp{tr}
\def\pagegrid@temp#1#2{%
\DeclareVoidOption{#2}{\pagegrid@SetOrigin{#1}}%
}%
\pagegrid@temp{bl}{lb}
\pagegrid@temp{br}{rb}
\pagegrid@temp{tl}{lt}
\pagegrid@temp{tr}{rt}
\pagegrid@temp{bl}{bottom-left}
\pagegrid@temp{br}{bottom-right}
\pagegrid@temp{tl}{top-left}
\pagegrid@temp{tr}{top-right}
\pagegrid@temp{bl}{left-bottom}
\pagegrid@temp{br}{right-bottom}
\pagegrid@temp{tl}{left-top}
\pagegrid@temp{tr}{right-top}
\DeclareBoolOption[true]{enable}
\DeclareComplementaryOption{disable}{enable}
\DeclareBoolOption{foreground}
\newlength{\pagegrid@step}
\define@key{pagegrid}{step}{%
\setlength{\pagegrid@step}{#1}%
}
\DeclareStringOption[red]{firstcolor}
\DeclareStringOption[blue]{secondcolor}
\DeclareBoolOption[true]{arrows}
\newlength\pagegrid@arrowlength
\pagegrid@arrowlength=\z@
\define@key{pagegrid}{arrowlength}{%
\setlength{\pagegrid@arrowlength}{#1}%
}
\define@key{pagegrid}{double}[true]{%
\@ifundefined{pagegrid@double@#1}{%
\PackageWarning{pagegrid}{%
Unsupported value `#1' for option `double'.\MessageBreak
Known values are:\MessageBreak
`false', `first', `last', `true'.\MessageBreak
Now `false' is used%
}%
\chardef\pagegrid@double\z@
}{%
\chardef\pagegrid@double\csname pagegrid@double@#1\endcsname\relax
}%
}
\@namedef{pagegrid@double@false}{0}
\@namedef{pagegrid@double@first}{1}
\@namedef{pagegrid@double@last}{2}
\@namedef{pagegrid@double@true}{2}
\chardef\pagegrid@double\z@
\newcommand*{\pagegridsetup}{%
\let\pagegrid@init\pagegrid@@init
\setkeys{pagegrid}%
}
\pagegridsetup{%
step=1mm%
}
\InputIfFileExists{pagegrid.cfg}{}%
\ProcessKeyvalOptions*\relax
\AtBeginDocument{%
\ifdim\pagegrid@arrowlength>\z@
\else
\pagegrid@arrowlength=10\pagegrid@step
\fi
}
\def\pagegridShipoutDoubleBegin{%
\begingroup
\let\newlabel\@gobbletwo
\let\zref@newlabel\@gobbletwo
\let\@writefile\@gobbletwo
\let\select@language\@gobble
}
\def\pagegridShipoutDoubleEnd{%
\endgroup
}
\def\pagegrid@WriteDouble#1#2{%
\immediate\write#1{%
\@backslashchar csname %
pagegridShipoutDouble#2%
\@backslashchar endcsname%
}%
}
\def\pagegrid@ShipoutDouble#1{%
\begingroup
\if@filesw
\pagegrid@WriteDouble\@mainaux{Begin}%
\ifx\@auxout\@partaux
\pagegrid@WriteDouble\@partaux{Begin}%
\def\pagegrid@temp{%
\pagegrid@WriteDouble\@mainaux{End}%
\pagegrid@WriteDouble\@partaux{End}%
}%
\else
\def\pagegrid@temp{%
\pagegrid@WriteDouble\@mainaux{End}%
}%
\fi
\else
\def\pagegrid@temp{}%
\fi
\let\protect\noexpand
\AtBeginShipoutOriginalShipout\copy#1\relax
\pagegrid@temp
\endgroup
}
\AtBeginShipout{%
\ifdim\pagegrid@step>\z@
\else
\pagegrid@enablefalse
\fi
\ifpagegrid@enable
\ifnum\pagegrid@double=\@ne
\pagegrid@ShipoutDouble\AtBeginShipoutBox
\else
\ifnum\pagegrid@double=\tw@
\@ifundefined{pagegrid@DoubleBox}{%
\newbox\pagegrid@DoubleBox
}{}%
\setbox\pagegrid@DoubleBox=\copy\AtBeginShipoutBox
\fi
\fi
\ifpagegrid@foreground
\expandafter\AtBeginShipoutUpperLeftForeground
\else
\expandafter\AtBeginShipoutUpperLeft
\fi
{%
\put(0,0){%
\makebox(0,0)[lt]{%
\begin{tikzpicture}[%
bl/.style={},%
br/.style={xshift=\pagegrid@width,xscale=-1},%
tl/.style={yshift=\pagegrid@height,yscale=-1},%
tr/.style={xshift=\pagegrid@width,%
yshift=\pagegrid@height,scale=-1}%
]%
\useasboundingbox
(0mm,\pagegrid@height) rectangle (0mm,\pagegrid@height);%
\draw[%
\pagegrid@origin@a,%
step=\pagegrid@step,%
style=help lines,%
ultra thin%
] (0mm,0mm) grid (\pagegrid@width,\pagegrid@height);%
\ifx\pagegrid@origin@b\@empty
\else
\draw[%
\pagegrid@origin@b,%
step=10\pagegrid@step,%
{\pagegrid@secondcolor},%
very thin%
] (0mm,0mm) grid (\pagegrid@width,\pagegrid@height);%
\fi
\draw[%
\pagegrid@origin@a,%
step=10\pagegrid@step,%
{\pagegrid@firstcolor},%
very thin%
] (0mm,0mm) grid (\pagegrid@width,\pagegrid@height);%
\ifx\pagegrid@origin@b\@empty
\else
\draw[%
\pagegrid@origin@b,%
step=50\pagegrid@step,%
{\pagegrid@secondcolor},%
thick%
] (0mm,0mm) grid (\pagegrid@width,\pagegrid@height);%
\fi
\draw[%
\pagegrid@origin@a,%
step=50\pagegrid@step,%
{\pagegrid@firstcolor},%
thick%
] (0mm,0mm) grid (\pagegrid@width,\pagegrid@height);%
\ifpagegrid@arrows
\ifx\pagegrid@origin@b\@empty
\else
\draw[%
\pagegrid@origin@b,%
{\pagegrid@secondcolor},%
stroke,%
line width=1pt,%
line cap=round%
] (0mm,0mm) %
-- (\pagegrid@arrowlength,\pagegrid@arrowlength) %
(\pagegrid@arrowlength,.5\pagegrid@arrowlength) %
-- (\pagegrid@arrowlength,\pagegrid@arrowlength) %
-- (.5\pagegrid@arrowlength,\pagegrid@arrowlength);%
\fi
\draw[%
\pagegrid@origin@a,%
{\pagegrid@firstcolor},%
stroke,%
line width=1pt,%
line cap=round%
] (0mm,0mm) %
-- (\pagegrid@arrowlength,\pagegrid@arrowlength) %
(\pagegrid@arrowlength,.5\pagegrid@arrowlength) %
-- (\pagegrid@arrowlength,\pagegrid@arrowlength) %
-- (.5\pagegrid@arrowlength,\pagegrid@arrowlength);%
\fi
\end{tikzpicture}%
}%
}%
}%
\ifnum\pagegrid@double=\tw@
\pagegrid@ShipoutDouble\pagegrid@DoubleBox
\fi
\fi
}
\pagegrid@AtEnd%
%% \section{Installation}
\endinput
%%
%% End of file `pagegrid.sty'.