blob: 7104f52c2f2eb6bce24cb5a55a10305b51a6b281 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
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'.
|
