summaryrefslogtreecommitdiff
path: root/Master/texmf-dist/source/latex/fundus/la.dtx
diff options
context:
space:
mode:
Diffstat (limited to 'Master/texmf-dist/source/latex/fundus/la.dtx')
-rw-r--r--Master/texmf-dist/source/latex/fundus/la.dtx236
1 files changed, 236 insertions, 0 deletions
diff --git a/Master/texmf-dist/source/latex/fundus/la.dtx b/Master/texmf-dist/source/latex/fundus/la.dtx
new file mode 100644
index 00000000000..0cb4f905efe
--- /dev/null
+++ b/Master/texmf-dist/source/latex/fundus/la.dtx
@@ -0,0 +1,236 @@
+\def\filename{la.dtx}
+\def\fileversion{1.2}
+\def\filedate{1996/07/18}
+\let\docversion=\fileversion
+\let\docdate=\filedate
+% \iffalse meta-comment
+%
+% Copyright 1996 by Gerd Neugebauer
+%
+% For further copyright information, and conditions for modification
+% and distribution, see the file legal.txt, and any other copyright
+% notices in this file.
+%
+% This system is distributed in the hope that it will be useful,
+% but WITHOUT ANY WARRANTY; without even the implied warranty of
+% MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
+%
+% For error reports concerning UNCHANGED versions of this file no
+% more than one year old, see bugs.txt.
+%
+% Please do not request updates from us directly. Primary
+% distribution is through the CTAN archives.
+%
+%
+% IMPORTANT COPYRIGHT NOTICE:
+%
+% You are NOT ALLOWED to distribute this file alone.
+%
+% You are allowed to distribute this file under the condition that it
+% is distributed together with all the files listed in manifest.txt.
+%
+% If you receive only some of these files from someone, complain!
+%
+%
+% Permission is granted to copy this file to another file with a
+% clearly different name and to customize the declarations in that
+% copy to serve the needs of your installation, provided that you
+% comply with the conditions in the file legal.txt.
+%
+% However, NO PERMISSION is granted to produce or to distribute a
+% modified version of this file under its original name.
+%
+% You are NOT ALLOWED to change this file.
+%
+%
+%
+% \fi
+% \iffalse
+%%% File: la.dtx
+%% Copyright (C) 1996 Gerd Neugebauer
+%% all rights reserved.
+%<package>\NeedsTeXFormat{LaTeX2e}
+%<package>\ProvidesPackage{la}[1996/07/18 v1.2 LaTeX package la]
+%<*driver>
+\documentclass{ltxdoc}
+\usepackage{la}
+\GetFileInfo{la.sty}
+\begin{document}
+\title{The \texttt{la} package\thanks
+ {This file has version number \fileversion, dated \filedate.}\\
+ for use with \LaTeX2e}
+\author{Gerd Neugebauer\\Mainzer Str.~16\\56321 Rhens\\
+ \texttt{gerd@informatik.uni-koblenz.de}}
+\date{\docdate}
+\maketitle
+\DocInput{la.dtx}
+\end{document}
+%</driver>
+% \fi
+%
+% \CheckSum{61}
+%% \CharacterTable
+%% {Upper-case \A\B\C\D\E\F\G\H\I\J\K\L\M\N\O\P\Q\R\S\T\U\V\W\X\Y\Z
+%% Lower-case \a\b\c\d\e\f\g\h\i\j\k\l\m\n\o\p\q\r\s\t\u\v\w\x\y\z
+%% Digits \0\1\2\3\4\5\6\7\8\9
+%% Exclamation \! Double quote \" Hash (number) \#
+%% Dollar \$ Percent \% Ampersand \&
+%% Acute accent \' Left paren \( Right paren \)
+%% Asterisk \* Plus \+ Comma \,
+%% Minus \- Point \. Solidus \/
+%% Colon \: Semicolon \; Less than \<
+%% Equals \= Greater than \> Question mark \?
+%% Commercial at \@ Left bracket \[ Backslash \\
+%% Right bracket \] Circumflex \^ Underscore \_
+%% Grave accent \` Left brace \{ Vertical bar \|
+%% Right brace \} Tilde \~}
+%
+% \changes{v1.0}{1996/03/03}{First release.}
+% \changes{v1.1}{1996/05/19}{Macros textla, textlla added.}
+% \changes{v1.2}{1996/07/18}{Some commands made robust.}
+%
+%
+% \section{Introduction}
+%
+% The fonts la and lla provide glyphs for producing a handwritten
+% writing as tought in primary school. These fonts have been
+% written by Johannes Heuer. They can be found on
+% the CTAN in the directory \texttt{tex-archive/fonts/calligra}.
+% This package provides means to use those fonts in \LaTeXe.
+%
+%
+% \section{Usage}
+%
+% This file can be used as a package by placing its name
+% in the argument of |\usepackage|. Afterwards the font families la
+% and lla are defined. This could also have been done by providing two
+% font definition files.
+%
+% The font definitions in this file scale down the original fonts to
+% \LaTeX{} choose the right baselineskip. The original size of the la
+% fonts can be selected with the commands |\LARGE\la| or |\LARGE\lla|.
+%
+%
+% \DescribeMacro{\la}
+% The command |\la| changes the current font family to la and the
+% encoding to T1. Usually this should be used in a \TeX{} group only.
+%
+% \DescribeMacro{\textla}
+% This macro typesets its argument in the la font.
+%
+% \DescribeMacro{\lla}
+% The command |\lla| changes the current font family to lla and the
+% encoding to T1. Usually this should be used in a \TeX{} group only.
+%
+% \DescribeMacro{\textlla}
+% This macro typesets its argument in the lla font.
+%
+% \DescribeMacro{\llafill}
+% The command |\llafill| fills the rest of the line with lines as used
+% in the lla font. The result may be unexpected if not used where the
+% font family is not lla.
+%
+% \DescribeMacro{\llaline}
+% The command |\llaline| takes its argument and adds lines as used in
+% the lla font underneath. This is similar to the |\underline|
+% macro.
+%
+% \StopEventually{}
+%
+%
+% \section{Implementation}
+%
+%
+% First we declare a new font family for the la font.
+% \begin{macrocode}
+\DeclareFontFamily{T1}{la}{}
+% \end{macrocode}
+%
+% This font is only available in the normal shape. Here we can get the
+% desired font by (silently) scaling the only present la14. Since the
+% design size is 14 we have to scale down the font by $1/14=0.71428571$.
+%
+% \begin{macrocode}
+\DeclareFontShape{T1}{la}{m}{n}{<->s*[0.71428571]la14}{}
+% \end{macrocode}
+%
+% Now we define the next font family for the font with lines in the
+% background.
+% \begin{macrocode}
+\DeclareFontFamily{T1}{lla}{}
+% \end{macrocode}
+%
+% This font is only available in the normal shape. Here we can get the
+% desired font by (silently) scaling the only present lla14. Since the
+% design size is 14 we have to scale down the font by $1/14=0.71428571$.
+%
+% \begin{macrocode}
+\DeclareFontShape{T1}{lla}{m}{n}{<->s*[0.71428571]lla14}{}
+% \end{macrocode}
+%
+% Now we define font changing commands.
+%
+% \begin{macro}{\la}
+% The macro |\la| selects the la family.
+% \begin{macrocode}
+\DeclareRobustCommand\la{\fontfamily{la}\fontencoding{T1}\selectfont}
+% \end{macrocode}
+% \end{macro}
+%
+% \begin{macro}{\textla}
+% The macro |\textla| typesets its arguments in the la font.
+% \begin{macrocode}
+\newcommand\textla[1]{\begingroup
+ \fontfamily{la}\fontencoding{T1}\selectfont #1\endgroup}
+% \end{macrocode}
+% \end{macro}
+%
+% \begin{macro}{\lla}
+% The macro |\lla| selects the lla family.
+% \begin{macrocode}
+\DeclareRobustCommand\lla{\fontfamily{lla}\fontencoding{T1}\selectfont}
+% \end{macrocode}
+% \end{macro}
+%
+% \begin{macro}{\textlla}
+% The macro |\textla| typesets its arguments in the lla font.
+% \begin{macrocode}
+\newcommand\textlla[1]{\begingroup
+ \fontfamily{lla}\fontencoding{T1}\selectfont #1\endgroup}
+% \end{macrocode}
+% \end{macro}
+%
+% \begin{macro}{\llafill}
+% The macro |\llafill| is modeled after the macro |\underline|. The
+% symbol 24 in the lla font provides just the lines.
+% \begin{macrocode}
+\newcommand\llafill{\leaders\hbox{\kern.2em\symbol{24}}\hfill\symbol{24}}
+% \end{macrocode}
+% \end{macro}
+%
+% \begin{macro}{\llaline}
+% The macro |\llaline| packs its argument into a box. Then a box of
+% the same size is filled with empty lines and the original box is
+% typeset in a box of width 0 afterwards.
+% \begin{macrocode}
+\newcommand\llaline[1]{%
+ {\lla\symbol{24}%
+ \mbox{\setbox0=\hbox{#1}\hbox to \wd0{\llafill}\llap{\usebox0}}}}
+% \end{macrocode}
+% \end{macro}
+%
+% \begin{environment}{llapar}
+% This environment typesets one or more paragraphs with the lla
+% font. The |\llaline| instructions are inserted automatically at
+% the end of each paragraph.
+%
+% \begin{macrocode}
+\newenvironment{llapar}{\par\begingroup\lla
+ \let\lla@par=\par
+ \def\par{\llafill\lla@par}}{\par\endgroup}
+% \end{macrocode}
+% \end{environment}
+%
+% \Finale
+%
+\endinput