From 4ced46483f40846bb18f28d2ab0011fceb84b9e9 Mon Sep 17 00:00:00 2001 From: Karl Berry Date: Wed, 8 Aug 2007 17:55:43 +0000 Subject: adrconv update (12nov06) git-svn-id: svn://tug.org/texlive/trunk@4718 c570f23f-e606-0410-a88d-b1316a301751 --- Master/texmf-dist/doc/latex/adrconv/adrconv.tex | 74 ++++++++++ Master/texmf-dist/doc/latex/adrconv/adrdir.tex | 175 +++++++++++++++++++++++ Master/texmf-dist/doc/latex/adrconv/adrfax.tex | 74 ++++++++++ Master/texmf-dist/doc/latex/adrconv/adrguide.pdf | Bin 112469 -> 116401 bytes Master/texmf-dist/doc/latex/adrconv/adrguide.tex | 83 ++++++++--- Master/texmf-dist/doc/latex/adrconv/birthday.tex | 74 ++++++++++ Master/texmf-dist/doc/latex/adrconv/email.tex | 74 ++++++++++ 7 files changed, 533 insertions(+), 21 deletions(-) create mode 100644 Master/texmf-dist/doc/latex/adrconv/adrconv.tex create mode 100644 Master/texmf-dist/doc/latex/adrconv/adrdir.tex create mode 100644 Master/texmf-dist/doc/latex/adrconv/adrfax.tex create mode 100644 Master/texmf-dist/doc/latex/adrconv/birthday.tex create mode 100644 Master/texmf-dist/doc/latex/adrconv/email.tex (limited to 'Master/texmf-dist/doc/latex') diff --git a/Master/texmf-dist/doc/latex/adrconv/adrconv.tex b/Master/texmf-dist/doc/latex/adrconv/adrconv.tex new file mode 100644 index 00000000000..7104f52c2f2 --- /dev/null +++ b/Master/texmf-dist/doc/latex/adrconv/adrconv.tex @@ -0,0 +1,74 @@ +%% +%% This is file `adrconv.tex', +%% generated with the docstrip utility. +%% +%% The original source files were: +%% +%% adrconv.dtx (with options: `tex,conv') +%% Copyright 2006 Axel Kielhorn +%% +%% This file will generate fast loadable files from adrconv.dtx when +%% run through LaTeX or TeX. +%% +%% This work may be distributed and/or modified under the +%% conditions of the LaTeX Project Public License, either version 1.3 +%% 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.3 or later is part of all distributions of LaTeX +%% version 2003/12/01 or later. +%% +%% This file is part of the adrconv bundle. +%% +%% The adrconv bundle consists at least of the files adrconv.dtx, +%% adrconv.ins and adrguide.tex. +%% +%% You are NOT ALLOWED to change this file. +%% +%% You are NOT ALLOWED to distribute this file without adrconv.dtx, +%% adrconv.ins or adrguide.tex. +%% adrguide.dtx +%% Copyright 2006 Axel Kielhorn +\ifx\ProvidesFile\undefined\def\ProvidesFile#1[#2]{}\fi +\ProvidesFile{% + adrconv% + .tex% + } + [2006/04/19 v1.2c LaTeX2e + Interactive driver of BibTeX database to addressfile converter] +\catcode`\@=11 +\newlinechar`\^^J +\message{% + Now you have to typein the name of the BibTeX addressfile, you want + to^^J% + convert to script-address-file-format (without extension + `.bib'):^^J% + Geben Sie nun den Namen der BibTeX-Adressdatei ein, die sie in + das^^J% + Script-Adressdateiformat konvertieren wollen (ohne `.bib'):^^J% + ^^J% + addressfile=% +} +\def\skiplastspace#1 \@e@o@l@{#1} +\read-1 to \addressfile +\edef\addressfile{\expandafter\skiplastspace\addressfile\@e@o@l@} +\newwrite\auxfile +\immediate\openout\auxfile=\addressfile.aux +\immediate\write\auxfile{% + \string\citation{*}^^J% + \string\bibstyle{adrconv}^^J% + \string\bibdata{\addressfile}% +} +\immediate\closeout\auxfile +\message{% + After running BibTeX rename file `\addressfile.bbl' to + `\addressfile.adr'!^^J% + Nach dem BibTeX-Lauf benennen Sie bitte die Datei `\addressfile.bbl' + in^^J% + `\addressfile.adr' um!^^J% +} +\ifx\@@end\undefined\let\@@end\end\fi +\@@end +\endinput +%% +%% End of file `adrconv.tex'. diff --git a/Master/texmf-dist/doc/latex/adrconv/adrdir.tex b/Master/texmf-dist/doc/latex/adrconv/adrdir.tex new file mode 100644 index 00000000000..43d1d9541cc --- /dev/null +++ b/Master/texmf-dist/doc/latex/adrconv/adrdir.tex @@ -0,0 +1,175 @@ +%% +%% This is file `adrdir.tex', +%% generated with the docstrip utility. +%% +%% The original source files were: +%% +%% adrconv.dtx (with options: `dir') +%% Copyright 2006 Axel Kielhorn +%% +%% This file will generate fast loadable files from adrconv.dtx when +%% run through LaTeX or TeX. +%% +%% This work may be distributed and/or modified under the +%% conditions of the LaTeX Project Public License, either version 1.3 +%% 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.3 or later is part of all distributions of LaTeX +%% version 2003/12/01 or later. +%% +%% This file is part of the adrconv bundle. +%% +%% The adrconv bundle consists at least of the files adrconv.dtx, +%% adrconv.ins and adrguide.tex. +%% +%% You are NOT ALLOWED to change this file. +%% +%% You are NOT ALLOWED to distribute this file without adrconv.dtx, +%% adrconv.ins or adrguide.tex. +%% adrguide.dtx +%% Copyright 2006 Axel Kielhorn +\ifx\ProvidesFile\undefined\def\ProvidesFile#1[#2]{}\fi +\ProvidesFile{% + adrdir% + .tex% + } + [2006/04/19 v1.2c LaTeX2e + Interactive address directory generation] +\documentclass[headsepline,10pt,twoside]{scrartcl} +\newcommand*\jj {j} +\newcommand*\ja {ja} +\newcommand*\y {y} +\newcommand*\yes{yes} +\newread\ttyin +\newcommand*{\gobble}[1]{} +\def\iden#1{#1} +\def\strip#1#2 \gobble{\def #1{#2}} +\def\defpar{\par} +\def\Ask#1#2{% + \message{#2}\read\ttyin to #1\ifx#1\defpar\def#1{}\else + \iden{\expandafter\strip\expandafter#1#1\gobble\gobble} + \gobble\fi} +\newif\ifGerman +\newif\ifRunningHead +\newdimen\leftfield +\newdimen\rightfield +\newdimen\adrindent +\oddsidemargin -1in +\evensidemargin -1in +\newcommand*\adrfile{} +\newcommand*\adrtitle{} +\typeout{^^J% + *** dir.tex v2.0 by Frank Neukam <01 Dec 1993>^^J% + *** LaTeX2e-changes by Markus Kohm 1994/10/29^^J% + *** ADRconv-changes by Axel Kielhorn 1999^^J% + *** ngerman-changes by Markus Kohm 2001^^J% + ^^J% + To create a address-directory just answer the questions:^^J% + ^^J} +\Ask\answer{Use german? [y/n]^^J% + Mit deutscher Sprachanpassung? [j/n]} +\ifx\jj\answer\Germantrue\else +\ifx\ja\answer\Germantrue\else +\ifx\y\answer\Germantrue\else +\ifx\yes\answer\Germantrue\else + \Germanfalse\fi\fi\fi\fi +\ifGerman + \def\germanpackage{ngerman} + \Ask\answer{Mit alter deutscher Rechtschreibung? [j/n]} + \ifx\jj\answer\def\germanpackage{german}\else + \ifx\ja\answer\def\germanpackage{german}\else + \ifx\y\answer\def\germanpackage{german}\else + \ifx\yes\answer\def\germanpackage{german}\fi\fi\fi\fi + \usepackage{\germanpackage} +\fi +\InputIfFileExists{dir.cfg}{% + \typeout{Load local configuration-file.}}{% + \typeout{No local configuration-file found.}} +\Ask\adrfile{^^J% + Name of address-file (without .adr)?^^J% + Name der Adressdatei (ohne .adr)?} +\Ask\adrtitle{^^J% + Title of directory/list?^^J% + Titel des Verzeichnisses?} +\Ask\adrformat{^^J% + Name of the layout^^J% + Layoutname?} +\Ask\answer{^^J% + With running head? [y/n]^^J% + Namen in der Kopfzeile? [j/n]} +\ifx\jj\answer\RunningHeadtrue\else +\ifx\ja\answer\RunningHeadtrue\else +\ifx\y\answer\RunningHeadtrue\else +\ifx\yes\answer\RunningHeadtrue\else + \RunningHeadfalse\fi\fi\fi\fi +\ifRunningHead +\usepackage{scrpage} +\renewpagestyle{headings}{% + (0pt,0pt)% + {\strut\rightmark\ -- \leftmark\hfil}% + {\hfil\strut\rightmark\ -- \leftmark}% + {\hfil\strut\rightmark\ -- \leftmark\hfil}% + (\textwidth,.4pt)% + }{% + (0pt,0pt)% + {\pagemark\hfill}% + {\hfill\pagemark}% + {\hfill\pagemark\hfill}% + (0pt,0pt)} +\fi +\def\headfont{\sffamily\bfseries} +\ifx\adrformat\empty + \def\adrformat{adrdir} +\fi +\InputIfFileExists{\adrformat.cfg}{}{% + \typeout{^^J% + *** File \adrformat.cfg not found!^^J% + *** Datei \adrformat.cfg nicht gefunden!^^J% + ^^J} + } +\begin{document} +\ifRunningHead + \def\adrchar#1{\typeout{#1}} +\else + \def\adrchar#1{\clearpage\typeout{#1}\markboth{#1}{#1}} +\fi +\def\adrentry#1#2#3#4#5#6#7#8{\hspace{\adrindent}% + \parbox[b]{\leftfield} + {\raggedright \hspace{-\adrindent}{\sc #1}% + \def\tempa{#1}\ifx \tempa\empty \else , #2\fi% + \def\tempa{#3}\ifx \tempa\empty \else \par #3\fi% + \def\tempa{#7}\ifx \tempa\empty \else \par (#7)\fi% + }% + \hfill% + \parbox[b]{\rightfield} + {\raggedleft% + \def\tempa{#8}\ifx \tempa\empty \else {\scriptsize #8}\par \fi + {\small #4}% + }\par% + \ifRunningHead + \markboth{#1}{#1} + \fi +} +\ifx\adrfile\empty \else + \InputIfFileExists{\adrfile.adr}{% + \pagestyle{empty} + \null\vfil + \begin{center} + {\Large \sfb \adrtitle\par} + \end{center} + \vfil\vfil\null + \cleardoublepage + \raggedbottom + \pagestyle{headings} + }{% + \typeout{^^J% + *** File \adrfile.adr not found!^^J% + *** Datei \adrfile.adr nicht gefunden!^^J% + ^^J} + } +\fi +\end{document} +\endinput +%% +%% End of file `adrdir.tex'. diff --git a/Master/texmf-dist/doc/latex/adrconv/adrfax.tex b/Master/texmf-dist/doc/latex/adrconv/adrfax.tex new file mode 100644 index 00000000000..3a244e4a038 --- /dev/null +++ b/Master/texmf-dist/doc/latex/adrconv/adrfax.tex @@ -0,0 +1,74 @@ +%% +%% This is file `adrfax.tex', +%% generated with the docstrip utility. +%% +%% The original source files were: +%% +%% adrconv.dtx (with options: `tex,fax') +%% Copyright 2006 Axel Kielhorn +%% +%% This file will generate fast loadable files from adrconv.dtx when +%% run through LaTeX or TeX. +%% +%% This work may be distributed and/or modified under the +%% conditions of the LaTeX Project Public License, either version 1.3 +%% 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.3 or later is part of all distributions of LaTeX +%% version 2003/12/01 or later. +%% +%% This file is part of the adrconv bundle. +%% +%% The adrconv bundle consists at least of the files adrconv.dtx, +%% adrconv.ins and adrguide.tex. +%% +%% You are NOT ALLOWED to change this file. +%% +%% You are NOT ALLOWED to distribute this file without adrconv.dtx, +%% adrconv.ins or adrguide.tex. +%% adrguide.dtx +%% Copyright 2006 Axel Kielhorn +\ifx\ProvidesFile\undefined\def\ProvidesFile#1[#2]{}\fi +\ProvidesFile{% + adrfax% + .tex% + } + [2006/04/19 v1.2c LaTeX2e + Interactive driver of BibTeX database to addressfile converter] +\catcode`\@=11 +\newlinechar`\^^J +\message{% + Now you have to typein the name of the BibTeX addressfile, you want + to^^J% + convert to script-address-file-format (without extension + `.bib'):^^J% + Geben Sie nun den Namen der BibTeX-Adressdatei ein, die sie in + das^^J% + Script-Adressdateiformat konvertieren wollen (ohne `.bib'):^^J% + ^^J% + addressfile=% +} +\def\skiplastspace#1 \@e@o@l@{#1} +\read-1 to \addressfile +\edef\addressfile{\expandafter\skiplastspace\addressfile\@e@o@l@} +\newwrite\auxfile +\immediate\openout\auxfile=\addressfile.aux +\immediate\write\auxfile{% + \string\citation{*}^^J% + \string\bibstyle{adrfax}^^J% + \string\bibdata{\addressfile}% +} +\immediate\closeout\auxfile +\message{% + After running BibTeX rename file `\addressfile.bbl' to + `\addressfile.adr'!^^J% + Nach dem BibTeX-Lauf benennen Sie bitte die Datei `\addressfile.bbl' + in^^J% + `\addressfile.adr' um!^^J% +} +\ifx\@@end\undefined\let\@@end\end\fi +\@@end +\endinput +%% +%% End of file `adrfax.tex'. diff --git a/Master/texmf-dist/doc/latex/adrconv/adrguide.pdf b/Master/texmf-dist/doc/latex/adrconv/adrguide.pdf index 3908effee49..0be90f262db 100644 Binary files a/Master/texmf-dist/doc/latex/adrconv/adrguide.pdf and b/Master/texmf-dist/doc/latex/adrconv/adrguide.pdf differ diff --git a/Master/texmf-dist/doc/latex/adrconv/adrguide.tex b/Master/texmf-dist/doc/latex/adrconv/adrguide.tex index 547e6dca80f..ef5cd5ab908 100644 --- a/Master/texmf-dist/doc/latex/adrconv/adrguide.tex +++ b/Master/texmf-dist/doc/latex/adrconv/adrguide.tex @@ -1,4 +1,35 @@ +%% adrguide.tex +%% Copyright 2006 Axel Kielhorn +% +% This work may be distributed and/or modified under the +% conditions of the LaTeX Project Public License, either version 1.3 +% 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.3 or later is part of all distributions of LaTeX +% version 2003/12/01 or later. +% +% This work has the LPPL maintenance status "maintained". +% +% This Current Maintainer of this work is Axel Kielhorn (A.Kielhorn@web.de) +% +% This work consists of the files adrconv.ins, adrconv.dtx, adrguide.tex +% and the derived file adrguide.pdf. +% +% Use +% tex adrconv.ins +% or +% latex adrconv.ins +% to generate the other files, which are indirect parts of the +% bundle. Use +% latex adrconv.dtx +% to generate the implementation documentation. Use +% latex adrguide.tex +% to generate the user documentation. + \documentclass{article} +\usepackage[T1]{fontenc} +\usepackage{ae} \usepackage{german} \newcommand*{\File}[1]{\texttt{#1}} @@ -8,9 +39,9 @@ \DeclareRobustCommand{\KOMAScript}{\textsf{K\kern.05em O\kern.05em% M\kern.05em A\kern.1em-\kern.1em Script}} -\title{ADRconv Anleitung\\Version 1.2b} -\author{Axel Kielhorn} -\date{31. Mai 2003} +\title{ADRconv Anleitung\\Version 1.2c} +\author{Axel Kielhorn\thanks{A.Kielhorn@web.de}} +\date{19. April 2006} \begin{document} \maketitle @@ -78,6 +109,19 @@ in einer \File{bib}-Datei: birthday = {13. August anno muri}, nbirthday = {0813} } + @address{OEKZ, + name = {{{"O}kologisches Zentrum~e.\,V.}}, + sortas = {Okologisches Zentrum}, + organization = {Verband der Vereine}, + city = {Heimstatt}, + zip = 01234, + country = {Germany}, + street = {Mauerstra{\ss}e 1}, + phone = {01234 / 5 67 89}, + fax = {01234 / 5 67 89}, + email = {hm{@}work.com}, + key = {OEKZ}, + } \end{verbatim} \end{small} @@ -89,6 +133,11 @@ ausf"uhrliche Form zeigt die Version~1.2. \begin{description} \item[name] Der Name im normalen Bib\TeX\ Format: Vorname von Nachname + + \item[sortas] Wenn der Name mit einem Umlaut beginnt, wird er falsch + einsortiert, bei der Verwendung von UTF-8 kodierten Datenbanken kommt + es sogar zu einem Bib\TeX\ Fehler. \texttt{sortas} hat Vorrang vor + \texttt{name}. (Neu in Version 1.2c.) \item[title] Akademischer Titel oder "ahnliches (Wird z.\,Zt. nicht unterst\"{u}tzt) @@ -113,7 +162,7 @@ ausf"uhrliche Form zeigt die Version~1.2. Erstellen eines Telefaxbuches verwendet. \item[email] E-mail Adresse, wird von \File{email.bst} zum - erstellen eines E-mail Verzeichnisses benutzt. + Erstellen eines E-mail Verzeichnisses benutzt. \item[url] Ein Link auf die Homepage. Hier w"are jetzt ein Konverter nach HTML gefragt. @@ -258,6 +307,7 @@ der so aussehen k"onnte: \begin{verbatim} @address{DANTE, name = {{DANTE~e.\,V.}}, + sortas = {Dante}, street = {Postfach 10 18 40}, zip = {69008}, city = {Heidelberg}, @@ -337,7 +387,7 @@ Die konvertierte Adressdatei hat folgenden Inhalt: {Langer Weg 17 \\ 38118 Braunschweig}{0531 / 113 34 89}{}{}{}{} \adrentry{Kohlmeise}{Rudolf} - {Stra{\ss}e des 11.~September 17 \\ + {Stra{\ss}e des 11.~September 73 \\ 12345 Neu Jorg}{0513 / 89 55 66}{}{}{}{} \adrentry{Kuchennascher}{Mattse} {Fichtenstra{\ss}e 1 \\ @@ -348,24 +398,16 @@ Die konvertierte Adressdatei hat folgenden Inhalt: {Einbahnstra{\ss}e 1 \\ 01234 Heimstatt}{01234 / 5 67 89}{}{}{}{} - \adrchar{{} + \adrchar{D} \adrentry{{DANTE~e.\,V.}}{} {Postfach 10 18 40 \\ 69008 Heidelberg}{0 62 21 / 2 97 66}{}{}{}{DANTE} \end{verbatim} \end{small} -Der fehlende Vorname f"uhrt hier zu einem Fehler im -\Macro{adrchar}-Eintrag. Nachdem Sie ihn in: - -\begin{small} -\begin{verbatim} - \adrchar{D} -\end{verbatim} -\end{small} +In Version 1.2~c musste man den \Macro{adrchar}-Eintrag noch von Hand korrigieren, durch den \texttt{sortas}-Eintrag erfolgt das nun automatisch. -verbessert und zusammen mit dem Adress-Eintrag an die richtige Stelle -verschoben haben, k"onnen Sie einen Brief an DANTE~e.\,V. dann +Einen Brief an DANTE~e.\,V. k"onnen Sie mit Hilfe der \KOMAScript{} Briefklasse so beginnen: \begin{small} @@ -384,11 +426,10 @@ Adressdatenbank vorgenommen haben. Bitte beachten Sie dabei, dass die drei Programme zum Erzeugen der \File{aux}-Datei (\File{adrconv.tex}, \File{birthday.tex} und -\File{email.tex}) sowohl mit (Plain)\TeX{} als auch mit \LaTeX{} -aufgerufen werden k"onnen, w"ahrend die beiden Programme -\File{dir.tex} und \File{phone.tex}, die Sie nach erfolgreicher -Konvertierung auf Ihre Adressdatei anwenden k"onnen, um daraus fertige -Adress-, E-Mail- bzw. +\File{email.tex}) sowohl mit (Plain)\TeX{} als auch mit \LaTeX{} aufgerufen +werden k"onnen, w"ahrend die beiden Programme \File{dir.tex} und +\File{phone.tex}, die Sie nach erfolgreicher Konvertierung auf Ihre +Adressdatei anwenden k"onnen, um daraus fertige Adress-, E-Mail- bzw. Telefonverzeichnisse zu produzieren, nur mit \LaTeX{} funktionieren. diff --git a/Master/texmf-dist/doc/latex/adrconv/birthday.tex b/Master/texmf-dist/doc/latex/adrconv/birthday.tex new file mode 100644 index 00000000000..c98438a4a80 --- /dev/null +++ b/Master/texmf-dist/doc/latex/adrconv/birthday.tex @@ -0,0 +1,74 @@ +%% +%% This is file `birthday.tex', +%% generated with the docstrip utility. +%% +%% The original source files were: +%% +%% adrconv.dtx (with options: `tex,birthday') +%% Copyright 2006 Axel Kielhorn +%% +%% This file will generate fast loadable files from adrconv.dtx when +%% run through LaTeX or TeX. +%% +%% This work may be distributed and/or modified under the +%% conditions of the LaTeX Project Public License, either version 1.3 +%% 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.3 or later is part of all distributions of LaTeX +%% version 2003/12/01 or later. +%% +%% This file is part of the adrconv bundle. +%% +%% The adrconv bundle consists at least of the files adrconv.dtx, +%% adrconv.ins and adrguide.tex. +%% +%% You are NOT ALLOWED to change this file. +%% +%% You are NOT ALLOWED to distribute this file without adrconv.dtx, +%% adrconv.ins or adrguide.tex. +%% adrguide.dtx +%% Copyright 2006 Axel Kielhorn +\ifx\ProvidesFile\undefined\def\ProvidesFile#1[#2]{}\fi +\ProvidesFile{% + birthday% + .tex% + } + [2006/04/19 v1.2c LaTeX2e + Interactive driver of BibTeX database to addressfile converter] +\catcode`\@=11 +\newlinechar`\^^J +\message{% + Now you have to typein the name of the BibTeX addressfile, you want + to^^J% + convert to script-address-file-format (without extension + `.bib'):^^J% + Geben Sie nun den Namen der BibTeX-Adressdatei ein, die sie in + das^^J% + Script-Adressdateiformat konvertieren wollen (ohne `.bib'):^^J% + ^^J% + addressfile=% +} +\def\skiplastspace#1 \@e@o@l@{#1} +\read-1 to \addressfile +\edef\addressfile{\expandafter\skiplastspace\addressfile\@e@o@l@} +\newwrite\auxfile +\immediate\openout\auxfile=\addressfile.aux +\immediate\write\auxfile{% + \string\citation{*}^^J% + \string\bibstyle{birthday}^^J% + \string\bibdata{\addressfile}% +} +\immediate\closeout\auxfile +\message{% + After running BibTeX rename file `\addressfile.bbl' to + `\addressfile.adr'!^^J% + Nach dem BibTeX-Lauf benennen Sie bitte die Datei `\addressfile.bbl' + in^^J% + `\addressfile.adr' um!^^J% +} +\ifx\@@end\undefined\let\@@end\end\fi +\@@end +\endinput +%% +%% End of file `birthday.tex'. diff --git a/Master/texmf-dist/doc/latex/adrconv/email.tex b/Master/texmf-dist/doc/latex/adrconv/email.tex new file mode 100644 index 00000000000..528ef61974b --- /dev/null +++ b/Master/texmf-dist/doc/latex/adrconv/email.tex @@ -0,0 +1,74 @@ +%% +%% This is file `email.tex', +%% generated with the docstrip utility. +%% +%% The original source files were: +%% +%% adrconv.dtx (with options: `tex,email') +%% Copyright 2006 Axel Kielhorn +%% +%% This file will generate fast loadable files from adrconv.dtx when +%% run through LaTeX or TeX. +%% +%% This work may be distributed and/or modified under the +%% conditions of the LaTeX Project Public License, either version 1.3 +%% 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.3 or later is part of all distributions of LaTeX +%% version 2003/12/01 or later. +%% +%% This file is part of the adrconv bundle. +%% +%% The adrconv bundle consists at least of the files adrconv.dtx, +%% adrconv.ins and adrguide.tex. +%% +%% You are NOT ALLOWED to change this file. +%% +%% You are NOT ALLOWED to distribute this file without adrconv.dtx, +%% adrconv.ins or adrguide.tex. +%% adrguide.dtx +%% Copyright 2006 Axel Kielhorn +\ifx\ProvidesFile\undefined\def\ProvidesFile#1[#2]{}\fi +\ProvidesFile{% + email% + .tex% + } + [2006/04/19 v1.2c LaTeX2e + Interactive driver of BibTeX database to addressfile converter] +\catcode`\@=11 +\newlinechar`\^^J +\message{% + Now you have to typein the name of the BibTeX addressfile, you want + to^^J% + convert to script-address-file-format (without extension + `.bib'):^^J% + Geben Sie nun den Namen der BibTeX-Adressdatei ein, die sie in + das^^J% + Script-Adressdateiformat konvertieren wollen (ohne `.bib'):^^J% + ^^J% + addressfile=% +} +\def\skiplastspace#1 \@e@o@l@{#1} +\read-1 to \addressfile +\edef\addressfile{\expandafter\skiplastspace\addressfile\@e@o@l@} +\newwrite\auxfile +\immediate\openout\auxfile=\addressfile.aux +\immediate\write\auxfile{% + \string\citation{*}^^J% + \string\bibstyle{email}^^J% + \string\bibdata{\addressfile}% +} +\immediate\closeout\auxfile +\message{% + After running BibTeX rename file `\addressfile.bbl' to + `\addressfile.adr'!^^J% + Nach dem BibTeX-Lauf benennen Sie bitte die Datei `\addressfile.bbl' + in^^J% + `\addressfile.adr' um!^^J% +} +\ifx\@@end\undefined\let\@@end\end\fi +\@@end +\endinput +%% +%% End of file `email.tex'. -- cgit v1.2.3