trunk/Master/texmf-dist/source/latex/stdpage

git-svn-id: svn://tug.org/texlive/trunk@529 c570f23f-e606-0410-a88d-b1316a301751

2 files changed, 435 insertions, 0 deletions

diff --git a/Master/texmf-dist/source/latex/stdpage/stdpage.dtx b/Master/texmf-dist/source/latex/stdpage/stdpage.dtx
new file mode 100644
index 00000000000..45f5293e912
--- /dev/null
+++ b/Master/texmf-dist/source/latex/stdpage/stdpage.dtx
@@ -0,0 +1,380 @@
+% \iffalse meta-comment
+%
+% Copyright (C) 2004 by Georg Michael Verweyen <Georg.Verweyen@rub.de>
+% --------------------------------------------------
+%
+% This file 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.
+%
+% \fi
+%
+% \iffalse
+%<package>\NeedsTeXFormat{LaTeX2e}[1999/12/01]
+%<package>\ProvidesPackage{stdpage}
+%<package>   [2004/12/20 v0.5 stdpage.sty]
+%
+%<*driver>
+\documentclass{ltxdoc}
+\renewcommand{\familydefault}{\rmdefault}
+\usepackage[T1]{fontenc}
+\usepackage[ngerman]{babel}
+\usepackage{hyperref,times}
+\usepackage[chars=65,baselinestretch=1.3,hyphen=false]{stdpage}
+
+\hypersetup{%
+    pdftitle={Das stdpage-Paket},%
+    pdfauthor={\textcopyright\ Georg Michael Verweyen <Georg.Verweyen@rub.de>},%
+    pdfsubject={Anleitung zur Erstellung einer Normseite / Manual to create a standard page},%
+    pdfkeywords={Satzspiegel, Vorgaben, 30x60, LaTeX, \LaTeXe, Normseiten,%
+        30 Zeilen, 60 Zeichen, standard page, requirements, 60 characters, 30 lines}%
+}
+ \CodelineIndex
+ \RecordChanges
+\begin{document}
+  \DocInput{stdpage.dtx}
+\end{document}
+%</driver>
+% \fi
+%
+% \CheckSum{124}
+%
+% \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{v0.1}{2004/06/17}{Initial version}
+% \GetFileInfo{stdpage.sty}
+% \changes{v0.2}{2004/06/21}{Neue Übergabe der Parameter mit xkeyval.sty}
+% \changes{v0.3}{2004/06/17}{Wieder alles überarbeitet, das Paket xkeyval wird
+%   nicht mehr gebraucht. Die Funktionalität ist unverändert.}
+% \changes{v0.4}{2004/06/21}{Some English documentation added}
+%
+%
+% \title{Das \textsf{stdpage} Paket -- \emph{The \textsf{stdpage}
+%   package}\thanks{%
+%       Diese Anleitung geh\"{o}rt zu \textsf{stdpage}~\fileversion,
+%       vom \filedate. \emph{This is the manual for \textsf{stdpage}~\fileversion,
+%       dated \filedate.}
+%   }%
+% }%
+% \author{Georg Michael Verweyen \\ \texttt{Georg.Verweyen@rub.de}}
+%
+% \maketitle
+%
+% \abstract{%
+%   Dieses Paket bietet eine einfache Möglichkeit Normseiten zu
+%   erstellen, das sind in Deutschland Seiten mit 30 Zeilen \`{a} 60 Zeichen.
+%
+%   \emph{%
+%       This package provides an easy method to prepare a page with a fixed
+%       number of lines per page and a number of characters per line not to be exeeded.
+%       Worldwide there are different standards for so called ">standard"< pages.
+%       \textsf{stdpage.sty} lets you adjust the page settings. There is further English
+%       instruction following (in italics).
+%   }%
+% }%
+%
+%
+% \section{Normseiten -- \emph{Standard pages}}
+%
+% Normseiten nennt man im Verlag Seiten, die in einer nicht-proportionalen
+% Schrift gesetzt sind, bei einer Zeilenl\"{a}nge von maximal 60~Zeichen und
+% 30~Zeilen pro Seite. Daraus ergeben sich meist ca.\ 1\,400 Zeichen
+% inklusive Leerschritte pro Seite, denn nicht jede Zeile wird voll, evtl.\
+% gibt es Leerzeilen, halbleere Seiten vor einem neuen Kapitel etc.\footnote{%
+%     Manche Verlage rechnen einfach mit 1\,800 Zeichen f\"{u}r eine Normseite --
+%     absurd!
+% } Die Zeichenzahl kann erheblich schwanken, stark strukturierte Texte, mit
+% Dialogen etc. nehmen relativ viel Raum ein, bei wenig Zeichen pro Seite.
+%
+% \"{U}bersetzer etwa werden pro Normseite bezahlt, auch f\"{u}r Korrekturlesen,
+% oder Schriftsatz gibt es Vertr\"{a}ge, die sich auf Normseiten beziehen.
+%
+% \emph{%
+%   Standard pages are typeset in a nonproportional font. The lines take a
+%   limited number of characters, for instance 60. Also the number of lines
+%   is fixed, for instance 30 (Those are the standard settings in quite a number
+%   countries). This does \emph{not} mean, such a page has 1\,800
+%   characters, as lines don't necessarily get filled, also pages might not
+%   get filled at the end of a chapter. Usually a standard page (30x60) has
+%   about 1400 characters.
+% }%
+%
+%   \section*{Changes}
+%
+%   Neu in Version 0.5 sind die Möglichkeiten, den Durchschuss zu
+%   erhöhen, die Silbentrennung abzustellen und Leerzeilen zwischen
+%   den Absätzen einzufügen. Diese Dokumentation
+%   wurde mit |\usepackage[chars=65,baselinestretch=1.3,hyphen=false]{stdpage}|
+%   erzeugt.
+%
+% {\em Since v0.5 you can spread the lines, stop hyphenation
+%   optionally and add an empty line at the beginning of a paragraph.
+%   This documentation was typeset using
+%   |\usepackage[chars=65,baselinestretch=1.3,hyphen=false]{stdpage}|.}
+%
+%
+% \section{Anwendung -- \emph{Usage}}
+%
+% F\"{u}r die Basiseinstellungen (Normseiten im Sinne des Vd\"{U}) reicht es, die
+% Zeile |\usepackage{stdpage}| vor dem |\begin{document}| einzuf\"{u}gen --
+% eigentlich sollte dann alles von alleine gehen.
+%
+% Silbentrennung sollte man meines Erachtens verwenden, trotz der nicht"=proportionaler
+% Fonts. Wer mag kann aber |hyphen=false| wählen. Ob man den Rausatz
+% dann zum Blocksatz streckt ist letztlich eine Geschmacksfrage.  Wer
+% Blocksatz w\"{u}nscht, kann |just| (Blocksatz = justified) als optionales Argument \"{u}bergeben - die Kombination
+% |[just=true, hyphen=false]| ist nicht m\"oglich. Wenn schon Blocksatz dann auch Sibentrennung!
+% Ma{\ss}geblich
+% ist in meinen Augen das Ergebnis des Rausatzes, da dieser die Situation auf der
+% guten alten Schreibmaschine am besten nachahmt, schlie{\ss}lich stammt auch die Idee
+% der Normseite aus dieser \"{A}ra. Bei aktiviertem Blocksatz kann der Umbruch durch
+% Stauchung und oder Dehnung der Wortzwischenr\"{a}ume etwas anders ausfallen als beim
+% Rausatz.
+%
+% {\em
+%   If you are preparing a German ``Normseite'' of 30 lines and 60 characters
+%   per line you just put |\usepackage{stdpage}| before the
+%   |\begin{document}| line -- and everything should be fine. The standard
+%   behaviour of the package is to make the text ragged, you can change this
+%   to justified text by adding |just| to the options list.
+%
+%   Linenumbers can be added with |linenumbers|. Paragraph indention can be
+%   suppressed with |noindent|. You should think about adding |parskip| to the
+%   list of options then, as your paragraphs might get lost otherwise.
+%
+%   If you want to create a standard page for, let's say the administration of
+%   the European union, you need a page of 30x50 without paragraph indention,
+%   you type in |\usepackage[chars=50, lines=30, noindent]{stdpage}|.
+%
+%    I didn't translate the comment on the implementation (which is rather
+%    simple). If you are interested in an English hint, just contact me,
+%    I'll do my very best \dots
+% }%
+%
+% \changes{v0.2}{2004/06/21}{Neue Option: linenumbers}
+% Eine weitere Option ist |linenumbers|: wird die Option gew\"{a}hlt, erscheinen
+% automatisch auf dem Innenrand Zeilennummern - nur f\"{u}r den Fall, dass der
+% Lektor/""Verlagsleiter/""Autor \dots\ nicht so gut z\"{a}hlen kann. Mit
+% |linenumbers| besser einmal zuviel {\TeX}en als zuwenig, die Nummern rutschen
+% schonmal\dots
+%
+% Wer keinen Absatzeinzug w\"{u}nscht (zum Beispiel weil er das in Kombination mit Rausatz
+% kategorisch ablehnt), kann |noindent| w\"{a}hlen. Er sollte dann vielleicht |parskip=true|
+% setzen, damit die Absätze erkennbar bleiben.
+%
+% \changes{v0.2}{2004/06/21}{Neue Optionen: chars/lines}
+% Falls es (im Ausland?) andere Standards f\"{u}r Normseiten gibt, kann man
+% andere Werte im optionalen Parameter |lines| bzw.\ |chars| angeben.
+% Beispiel: |\usepackage[just,noindent,chars=50]{stdpage}| Mit diesen
+% Angaben entsteht eine Ausgabe die den Ma\ss gaben f\"{u}r
+% \"{U}bersetzungen der Europ\"{a}ischen Union entspricht (30 Zeilen mit je
+% 50 Zeichen).
+%
+% \changes{v0.2}{2004/06/21}{Neue Optionen: hyphen, baselinestretch}
+%   Unklar ist in vielen Vertr\"agen, ob bei Normseiten Silbentrennung
+%   stattfinden soll oder nicht. Die Option |hyphen=false| stellt die
+%   Silbentrennung ab (geht nur, wenn kein Blocksatz aktiviert wurde).
+%   Die Verlagswelt scheint über die Anwendung der
+%   Trennung gespalten. Wird die Trennung abgeschaltet, steigt die Zahl
+%   der Normseiten um etwa 1,5\,\%.
+%
+%   Einige Lektoren wollen auch gleich im Normseiten-Ausdruck redigieren
+%   und brauchen anderthalbfache Zeilenhöhe. Das verdirbt dann jeden
+%   Rest von \"asthetischem Anspruch, aber nun ja -- wenn es der Verlag
+%   so will: |baselineskip| kann jetzt auch als Option von |stdpage|
+%   angegeben werden. Für das, was Word gemeinhin anderthalbzeilig
+%   nennt, sollte man |baselinestretch=1.25| setzen.
+%
+% {\em
+%   In contracts it is often not clear if hyphenation should be used or
+%   not. The option |hyphen=false| sets off hyphenation, wich will
+%   increase the number of standard pages about 1.5\,\%. This will not
+%   work with the option |just| (justification needs hyphenation!).
+%
+%   Sometimes publishers want to do correction or annotations between
+%   the lines and need more space. You can change the standard
+%   \LaTeX-factor |baselinestretch| in the options of |stdpage|.
+%   |baselinestretch=1.25| will have about the same effect as one and a
+%   half linespacing in let's say WORD.
+% }
+%
+
+
+% \StopEventually{\PrintChanges\PrintIndex}
+%
+% \section{Implementierung}
+%
+%    \begin{macrocode}
+ \RequirePackage{typearea%
+                ,ragged2e%
+                ,ifthen%
+                ,keyval%
+                ,lineno%
+ }%
+ \RequirePackage[htt]{hyphenat}%
+%    \end{macrocode}
+% Typewriter wir zur Standardfamilie erkl\"{a}rt und Absatzeinzug auch bei RaggedRight
+% als Standard gesetzt.
+%    \begin{macrocode}
+\renewcommand{\familydefault}{\ttdefault}%
+\renewcommand{\RaggedRightParindent}{\parindent}%
+%    \end{macrocode}
+% Ein paar neue L\"{a}ngen und Befehle:
+%    \begin{macrocode}
+ \newlength{\St@ndardLinewidth}%
+ \newlength{\St@ndardTextwidth}%
+ \newlength{\CharsX}%
+ \newlength{\CharsI}%
+ \newboolean{st@ndardjust}%
+ \newboolean{st@ndardnoindent}%
+ \newboolean{st@ndardnumbers}%
+ \newboolean{st@ndardhyphen}%
+ \setboolean{st@ndardhyphen}{true}%
+ \newboolean{st@ndardparskip}%
+ \setboolean{st@ndardparskip}{false}%
+ \newcommand*{\zeichenzahl}{60}%
+ \newcommand*{\zeilenzahl}{30}%
+%    \end{macrocode}
+% \subsection{Optionen}
+
+% Hier werden jetzt die optionalen Argumente des
+% |\usepackage{stdpage}|-Befehls definiert. |#1| bezieht sich jeweils auf
+% den Eintrag nach dem Gleichheitszeichen, in eckigen Klammern der
+% Defaultwert, der angenommen wird, falls kein Gleichheitszeichen und kein
+% Wert folgt. Ob man also |just=true| eingibt oder einfach |just| ist
+% egal.
+%    \begin{macrocode}
+
+\define@key{stdpage}{block}[true]{%Aus kompatibilitätsgründen auf deutsch
+  \setboolean{st@ndardjust}{#1}%
+}%
+\define@key{stdpage}{just}[true]{%
+  \setboolean{st@ndardjust}{#1}%
+}%
+\define@key{stdpage}{noindent}[true]{%
+  \setboolean{st@ndardnoindent}{#1}%
+}%
+\define@key{stdpage}{linenumbers}[true]{%
+  \setboolean{st@ndardnumbers}{#1}%
+}%
+\define@key{stdpage}{hyphen}[true]{%
+  \setboolean{st@ndardhyphen}{#1}%
+}%
+\define@key{stdpage}{parskip}[true]{%
+  \setboolean{st@ndardparskip}{#1}%
+}%
+\define@key{stdpage}{chars}[60]{%
+  \renewcommand{\zeichenzahl}{#1}%
+}%
+\define@key{stdpage}{lines}[60]{%
+  \renewcommand{\zeilenzahl}{#1}%
+}%
+\define@key{stdpage}{baselinestretch}[1]{%
+  \renewcommand{\baselinestretch}{#1}%
+}%
+%    \end{macrocode}
+% Die folgenden Zeilen habe ich auch nicht verstanden, sie tun aber ihre
+% Arbeit wie erhofft, indem sie das Makro |\ProcessOptionsWithKV| anstelle
+% von |\ProcessOptions| bereitstellen, das dann am Ende zum Einsatz kommt.
+%    \begin{macrocode}
+\def\ProcessOptionsWithKV#1{%
+  \let\@tempc\relax%
+  \let\stdpage@tempa\@empty%
+  \@for\CurrentOption:=\@classoptionslist\do{%
+    \@ifundefined{KV@#1@\CurrentOption}%
+    {}%
+    {\edef\stdpage@tempa{\stdpage@tempa,\CurrentOption,}}%
+  }%
+  \edef\stdpage@tempa{%
+    \noexpand\setkeys{#1}{%
+      \stdpage@tempa\@ptionlist{\@currname.\@currext}%
+    }%
+  }%
+  \stdpage@tempa%
+}%
+%    \end{macrocode}
+% Jetzt kommt die etwas umst\"{a}ndliche Berechnung der L\"{a}ngen, aber
+% sicher ist sicher \dots
+%    \begin{macrocode}
+\AtBeginDocument{
+     \settowidth{\CharsX}{1234567890}%
+     \setlength{\CharsI}{.1\CharsX}%
+     \setlength{\St@ndardLinewidth}{\zeichenzahl\CharsI}%
+     \setlength{\St@ndardTextwidth}{0pt}%\topskip}%
+     \addtolength{\St@ndardTextwidth}{\zeilenzahl\baselineskip}%
+%    \end{macrocode}
+% Dann werden die Werte an das |typearea|-Paket \"{u}bergeben. Dabei
+% m\"{u}ssen etwa 2,4\,\% abgezogen werden, falls die Blockoption
+% gew\"{a}hlt wurde, ansonsten sorgt die Stauchung der Wortzwischenr\"{a}ume
+% f\"{u}r entsprechend weniger Seiten (und das soll ja nicht!).
+%    \begin{macrocode}
+    \ifthenelse{\boolean{st@ndardjust}}%
+        {%
+             \areaset[current]{.976\St@ndardLinewidth}{\St@ndardTextwidth}%
+        }%
+        {%
+             \areaset[current]{\St@ndardLinewidth}{\St@ndardTextwidth}%
+        }%
+%    \end{macrocode}
+% Auch zu Beginn wird gegebenenfalls, falls nicht Blocksatz gew\"{u}nscht
+% wurde, auf Rausatz gestellt
+%    \begin{macrocode}
+     \ifthenelse{\boolean{st@ndardjust}}%
+     {}%
+     {%
+        \ifthenelse{\boolean{st@ndardhyphen}}%
+        {%
+            \setlength{\RaggedRightRightskip}{0em}% plus .5em minus .5em}%
+            \RaggedRight%
+        }%
+        {%
+            \raggedright%
+        }%
+      }%
+     \ifthenelse{\boolean{st@ndardnoindent}}%
+        {\setlength{\parindent}{0mm}}{}%
+     \ifthenelse{\boolean{st@ndardnumbers}}{%
+        \modulolinenumbers[5]%
+        \linenumbers%
+        \pagewiselinenumbers%
+     }{}%
+}%
+%    \end{macrocode}
+% |emergencystretch| sollte mindestens 3em sein, sonst hat man entschieden
+% zu viele Box-Warnungen. Frenchspacing sollte aktiviert
+% sein, vergrößerter Leerraum passt nicht so recht zu Fix-Fonts.
+%    \begin{macrocode}
+ \frenchspacing
+ \emergencystretch=3em%
+%    \end{macrocode}
+%
+%    \begin{macrocode}
+\ProcessOptionsWithKV{stdpage}
+\AtEndOfPackage{%
+  \let\@unprocessedoptions\relax
+}
+%    \end{macrocode}
+%
+% \Finale
+\endinput%
diff --git a/Master/texmf-dist/source/latex/stdpage/stdpage.ins b/Master/texmf-dist/source/latex/stdpage/stdpage.ins
new file mode 100644
index 00000000000..57a07a7d550
--- /dev/null
+++ b/Master/texmf-dist/source/latex/stdpage/stdpage.ins
@@ -0,0 +1,55 @@
+%%
+%% Copyright (C) 2004 by Georg Michael Verweyen <Georg.Verweyen@rub.de>
+%%
+%% This file 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.
+%%
+
+\input docstrip.tex
+\keepsilent
+
+\usedir{tex/latex/stdpage}
+
+\preamble
+
+This is a generated file.
+
+Copyright (C) 2004 by Georg Michael Verweyen <Georg.Verweyen@rub.de>
+
+This file 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.
+
+\endpreamble
+
+\generate{\file{stdpage.sty}{\from{stdpage.dtx}{package}}}
+
+\obeyspaces
+ \Msg{*************************************************************}
+ \Msg{*                                                           *}
+ \Msg{* To finish the installation you have to move the following *}
+ \Msg{* file into a directory searched by TeX:                    *}
+ \Msg{*                                                           *}
+ \Msg{*     stdpage.sty                                           *}
+ \Msg{*                                                           *}
+ \Msg{* To produce the documentation run the file stdpage.dtx     *}
+ \Msg{* through LaTeX.                                            *}
+ \Msg{*                                                           *}
+ \Msg{* Happy TeXing!                                             *}
+ \Msg{*                                                           *}
+ \Msg{*************************************************************}
+
+\endbatchfile