%% %% This is file `adrfax.tex', %% generated with the docstrip utility. %% %% The original source files were: %% %% adrconv.dtx (with options: `tex,fax') %% Copyright 2006, 2010, 2018 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. %% %% adrguide.dtx %% Copyright 2006, 2010, 2018 Axel Kielhorn \ifx\ProvidesFile\undefined\def\ProvidesFile#1[#2]{}\fi \ProvidesFile{% adrfax% .tex% } [2018/01/30 v1.4 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'.