Files
2019-09-28 10:14:18 -04:00

194 lines
6.3 KiB
TeX

% drsetup.tex
%
% Some definitions for desc-tex2
%
% D. Roegel, (roegel@loria.fr) 15 January 1995
%
% Don't modify this file, but the file mysetup.tex,
% which is loaded at the end of this file.
% ================================================
%
%
\newif\ifDR
% Uncomment this ONLY if you are the author
%
%\DRtrue
%
\hsize=10in
\vsize=7.5in
\parindent=20pt
% This can probably be removed:
\hoffset=-0.8in
\voffset=-0.8in
%
\nopagenumbers
%
% english \today
\def\today{\ifcase\month\or
January\or February\or March\or April\or May\or June\or
July\or August\or September\or October\or November\or December\fi
\space\number\day, \number\year}
%
% This is for the frenchmen... (and includes french definition of \today)
\ifDR
\input french.sty
\fi
%
% The tree macros: must be loaded after french.sty, *if* french.sty
% is loaded, otherwise some things won't work
% (the test for the \tree and \subtree arguments won't work
% because they are not `catcode-independant' and french.sty changes
% some key catcodes)
%
\input drtree
%
% The credits:
% (put your favorite text here)
\def\credits{\vbox{\hsize15cm\noindent
This tree was made on \today\ by ******* with
the {\tt Lifelines} program (from T.~Wetmore), the \TeX\
text processor (from D.~Knuth),
\TeX\ commands for trees (from D.~Eppstein),
\TeX\ commands for posters (from T. Van Zandt)
and a program by E.~Majani completed by D.~Roegel.\par
It may contain mistakes or omissions and I please
those who would notice some to signal them to me at the
following address:\par
\noindent$\underline{\hbox{\tt **,
**,
**,
USA}}$}}
\ifDR
\def\credits{\vbox{\hsize15cm\noindent
Cet arbre a \'et\'e r\'ealis\'e le \today\
par Denis Roegel \`a l'aide du logiciel {\tt Lifelines}
(de T.~Wetmore), du formatteur \TeX\ (de D.~Knuth), de
commandes \TeX\ de r\'ealisation d'arbres (de D.~Eppstein),
de commandes \TeX\ de d\'ecoupage (de T. Van Zandt)
et d'un programme de E.~Majani compl\'et\'e par moi-m\^eme.\par
Il peut comporter des erreurs ou des omissions et je prie
ceux qui en rel\`everaient de me les signaler \`a l'adresse
suivante:\par
\noindent$\underline{\hbox{\tt Denis Roegel,
7 rue de la fonderie,
67400 ILLKIRCH-GRAFFENSTADEN}}$}}
\fi
%
%---------------------------------------------------------------------------
% Title of the tree
%
% The title is centered above the tree
% You can change the title fonts here.
% You may also change the title text in the report produced.
%
%---------------------------------------------------------------------------
\font\titlefont=cmbx12 scaled 4300
\font\subtitlefont=cmbx10 scaled \magstep5
\ifDR % this is for the author only
\def\title#1#2#3#4#5{% #1 = name of the ancestor
% #2 = birth date
% #3 = death date
% #4 = number of generations (children=only one generation)
% #5 = total width of the tree
\hbox to#5{\hss\hbox{\titlefont Descendance de #1}\hss}
\kern1cm
\hbox to#5{\hss\hbox{\titlefont (#2 -- #3)}\hss}
\kern1cm
\hbox to#5{\hss\hbox{\subtitlefont(#4 g\'en\'erations)}\hss}
}
\else
\def\title#1#2#3#4#5{% #1 = name of the ancestor
% #2 = birth date
% #3 = death date
% #4 = number of generations (children=only one generation)
% #5 = total width of the tree
\hbox to#5{\hss\hbox{\titlefont Descendance of #1}\hss}
\kern1cm
\hbox to#5{\hss\hbox{\titlefont (#2 -- #3)}\hss}
\kern1cm
\hbox to#5{\hss\hbox{\subtitlefont(#4 generations)}\hss}
}
\fi
%---------------------------------------------------------------------------
% Special fonts
%---------------------------------------------------------------------------
\font\descfont=cmssbx10 % descendants
\font\spousefont=cmss10 % spouses
\font\occufont=cmssi10 % occupations
\font\datefont=cmss8 % dates
\font\placefont=cmss8 % places
%---------------------------------------------------------------------------
% Various formatting things:
\def\spouse#1{\spousefont#1}
% Formatting of the occupation:
\def\occupation#1{{\setbox0=\hbox{\occufont#1}%
\ifdim\wd0>5cm
\vbox{\hsize5cm\pretolerance10000
\raggedright\noindent\occufont#1\endgraf}%
\else
{\occufont#1}%
\fi
}}
% Separation line in the boxes:
\def\sepline{\noalign{\kern2pt\hrule\kern2pt}}
%---------------------------------------------------------------------------
% Tags
%---------------------------------------------------------------------------
% birth tag:
%\def\btag{N:}
\def\btag{$\circ$}
% baptism tag:
%\def\bapttag{B:}
\def\bapttag{{\datefont bp:}}
% marriage tag:
%\def\mtag{M:}
\def\mtag{$\mathord{\scriptstyle\bigcirc\mskip-10mu\bigcirc}$}
% death tag:
%\def\dtag{D:}
\def\dtag{$\dag$}
% at tag:
\ifDR
\def\at{\`a}
\def\seeabove{** voir plus haut **}
\def\unknown{(nom inconnu)}
\else
\def\at{at}
\def\seeabove{** see above **}
\def\unknown{(unknown name)}
\fi
%---------------------------------------------------------------------------
% Month names
%---------------------------------------------------------------------------
\ifDR
\def\jan{janvier}
\def\feb{f\'evrier}
\def\mar{mars}
\def\apr{avril}
\def\may{mai}
\def\jun{juin}
\def\jul{juillet}
\def\aug{ao\^ut}
\def\sep{septembre}
\def\oct{octobre}
\def\nov{novembre}
\def\dec{d\'ecembre}
\else
\def\jan{jan}
\def\feb{feb}
\def\mar{mar}
\def\apr{apr}
\def\may{may}
\def\jun{jun}
\def\jul{jul}
\def\aug{aug}
\def\sep{sep}
\def\oct{oct}
\def\nov{nov}
\def\dec{dec}
\fi
% Add your modifications to this file:
\input mysetup
% ----------------- end of file drsetup.tex --------------------