summaryrefslogtreecommitdiff
path: root/Master/texmf-dist/tex/latex/calendar/filoaddr.cls
diff options
context:
space:
mode:
authorKarl Berry <karl@freefriends.org>2006-01-12 23:52:36 +0000
committerKarl Berry <karl@freefriends.org>2006-01-12 23:52:36 +0000
commit5ce5f1cb397fbb9db0d1f3103ebc44090d02e365 (patch)
treec625efebbf5f761d04ad695169bfe335ffea56f1 /Master/texmf-dist/tex/latex/calendar/filoaddr.cls
parent2c678ff7b3c69227fce2c9882886d9943b77a6cf (diff)
calendar
git-svn-id: svn://tug.org/texlive/trunk@732 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Master/texmf-dist/tex/latex/calendar/filoaddr.cls')
-rw-r--r--Master/texmf-dist/tex/latex/calendar/filoaddr.cls78
1 files changed, 78 insertions, 0 deletions
diff --git a/Master/texmf-dist/tex/latex/calendar/filoaddr.cls b/Master/texmf-dist/tex/latex/calendar/filoaddr.cls
new file mode 100644
index 00000000000..398c87292b5
--- /dev/null
+++ b/Master/texmf-dist/tex/latex/calendar/filoaddr.cls
@@ -0,0 +1,78 @@
+\NeedsTeXFormat{LaTeX2e}[1995/06/01]
+\ProvidesClass{filoaddr}
+ [1998/01/17 18:15:06 3.1.1.1 Filofax address pages (Frank Bennett)]
+\DeclareOption{fourcolumn}%
+ {\PassOptionsToPackage{\CurrentOption}{autofilo}}
+\DeclareOption*{\PassOptionsToClass{\CurrentOption}{article}}
+\ProcessOptions
+\LoadClass{article}
+\RequirePackage{rotating}
+\RequirePackage{url}
+\def\mygobble#1{}
+\newlength\templen
+\newlength\mytemplength
+\newlength\descheight
+\newlength\myparwidth
+\newlength\descwidth
+\newlength\biggerwidth
+\newlength\myentryheight
+\newlength\myparheight
+\newlength\mylinewidth
+\def\entry#1{%
+\vbox{%
+\vskip2pt
+\topline
+\vskip 2pt
+\parbox{\linewidth}{%
+\raggedright%
+\small#1}
+\vskip 1pt
+\bottomline}}
+\def\topline{%
+ \vbox to0pt{%
+ \hbox to\linewidth{%
+ \hskip-2.4pt%
+ \vrule width0.4pt height0pt depth7pt%
+ \vrule width\mylinewidth depth0.4pt height0pt%
+ \vrule width0.4pt height0pt depth7pt\hskip-2.4pt}%
+ \vskip-7pt}}
+\def\bottomline{%
+ \vbox to0pt{%
+ \vskip-7pt
+ \hbox to\linewidth{%
+ \hskip-2.4pt%
+ \vrule width0.4pt height7pt depth0pt%
+ \vrule width\mylinewidth depth0.4pt height0pt%
+ \vrule width0.4pt height7pt depth0pt%
+ \hskip-2.4pt}}}
+\def\address#1#2{%
+ \settoheight\myparheight{\vbox{%
+ \boxmaxdepth0pt%
+ \parbox{\myparwidth}{\raggedright #2}}}%
+ \settowidth\descwidth{\small\textbf{#1}}%
+ \ifnum\descwidth>\myparheight\biggerwidth\descwidth\else%
+ \biggerwidth\myparheight\fi%
+ \vbox{\vskip3pt%
+ \hbox to\linewidth{%
+ \hskip3pt%
+ \vbox to\biggerwidth{%
+ \vfil%
+ \hbox to\descheight{%
+ \begin{sideways}{\small\textbf{#1}}\end{sideways}%
+ \hfil}%
+ \vfil}%
+ \hskip2pt%
+ \vbox to\biggerwidth{%
+ \vfil%
+ \hbox to\myparwidth{%
+ \parbox{\myparwidth}{\raggedright #2}}%
+ \vfil}}}}
+\def\addresses#1{%
+ \autofilo{#1}
+ \settoheight\descheight{\vbox{\boxmaxdepth0pt{\small\textbf{Yy}}}}
+ \myparwidth\linewidth%
+ \advance\myparwidth by-\descheight\relax%
+ \advance\myparwidth by-5pt\relax%
+ \mylinewidth\linewidth
+ \advance\mylinewidth by4pt\relax}
+\def\endaddresses{\endautofilo}