expoweb/bierbook/grid.sty
2011-07-10 15:23:35 +01:00

95 lines
3.1 KiB
TeX

%%
%% This is file `graphpap.sty',
%% generated with the docstrip utility.
%%
%% The original source files were:
%%
%% graphpap.dtx (with options: `package')
%%
%% This is a generated file.
%%
%% Copyright 1993 1994 1995 1996 1997 1998 1999
%% The LaTeX3 Project and any individual authors listed elsewhere
%% in this file.
%%
%% This file was generated from file(s) of the LaTeX base system.
%% --------------------------------------------------------------
%%
%% It may be distributed and/or modified under the
%% conditions of the LaTeX Project Public License, either version 1.2
%% 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.2 or later is part of all distributions of LaTeX
%% version 1999/12/01 or later.
%%
%% This file may only be distributed together with a copy of the LaTeX
%% base system. You may however distribute the LaTeX base system without
%% such generated files.
%%
%% The list of all files belonging to the LaTeX base distribution is
%% given in the file `manifest.txt'. See also `legal.txt' for additional
%% information.
%%
%%
%% File `graphpap.dtx'.
%% Copyright (C) 1994 by Leslie Lamport
%% all rights reserved.
%%
\NeedsTeXFormat{LaTeX2e}
\ProvidesPackage{grid}
[1994/08/09 v1.0c Hacked LaTeX graphpap package (LL)]
\let\c@@grid\count@
\newcounter{gridstart}
\def\@vgrid(#1,#2)#3#4#5{%
\setcounter{@grid}{#1}%
\addtocounter{@grid}{\c@gridstart}%
\multiput(#1,#2)(#3,0){#4}{\line(0,1){#5}}%
\multiput(#1,#2)(#3,0){#4}{\@vgridnumber{#3}}}
\def\@vgridnumber#1{%
\makebox(0,0)[t]{%
\shortstack{\rule{0pt}{10pt}\\\arabic{@grid}}}%
\addtocounter{@grid}{2*#1}}
\def\@nonumvgrid(#1,#2)#3#4#5{%
\multiput(#1,#2)(#3,0){#4}{\line(0,1){#5}}}
\def\@hgrid(#1,#2)#3#4#5{%
\setcounter{@grid}{#2}%
\multiput(#1,#2)(0,#3){#4}{\line(1,0){#5}}%
\multiput(#1,#2)(0,#3){#4}{\@hgridnumber{#3}}}
%%\def\@hgridnumber#1{%
%% \makebox(0,0)[r]{\arabic{@grid}\hspace{10pt}}%
%% \addtocounter{@grid}{#1}}
\def\@hgridnumber#1{}
\def\@nonumhgrid(#1,#2)#3#4#5{%
\multiput(#1,#2)(0,#3){#4}{\line(1,0){#5}}}
\newcommand\graphpaper[1][10]{\leavevmode\@grid{#1}}
\def\@grid#1(#2,#3)#4{\@grid@i{#1}{#2}{#3}(}
\def\@grid@i#1#2#3(#4,#5){%
\@tempcnta=#4\relax
\divide\@tempcnta#1\relax
\advance\@tempcnta1\relax
{\thinlines\@nonumvgrid(#2,#3){#1}{\@tempcnta}{#5}
\@tempcnta#4\relax
\divide\@tempcnta5\relax
\divide\@tempcnta#1\relax
\advance\@tempcnta1\relax
\@tempcntb5\relax
\multiply\@tempcntb#1\relax
\thicklines\@vgrid(#2,#3){\@tempcntb}{\@tempcnta}{#5}
\@tempcnta#5\relax
\divide\@tempcnta #1\relax
\advance\@tempcnta1\relax
\thinlines\@nonumhgrid(#2,#3){#1}{\@tempcnta}{#4}
\@tempcnta#5\relax
\divide\@tempcnta2\relax
%% \divide\@tempcnta#1\relax
\advance\@tempcnta1\relax
%% \thicklines\@hgrid(#2,#3){\@tempcntb}{\@tempcnta}{#4}}%
\setlength{\linethickness}{0.8mm}
\@hgrid(#2,#3){2}{\@tempcnta}{#4}}%
\ignorespaces}
\endinput
%%
%% End of file `graphpap.sty'.