Überarbeitungsverlauf[Zurück]
Klicke auf Einblenden/Ausblenden von Überarbeitungen 15

29 Sep '13, 21:47

ctansearch's gravatar image

ctansearch
(ausgesetzt)

Diese Antwort wird fortschreitend modifiziert.(Update 2013-09-29 21:17)(Siehe Kommentare) \documentclass[a4paper]{article} \usepackage[ngerman]{babel} \usepackage[utf8]{inputenc} \usepackage{filecontents,csquotes} \usepackage[backend=biber,style=alphabetic]{biblatex} \begin{filecontents*}{\jobname.bib} @ARTICLE{Kar99, author = {Kartoffel.K}, title={Über die Kunst,Kartoffeln zu kochen}, journal = {Kochzeitung }, year = {1999}, volume = {2}, pages = {28-29} } @ARTICLE{Kar98, author = {Kartoffel.K}, title={Über die Kunst,Kartoffeln zu kochen}, journal = {Kochzeitung }, year = {1998}, volume = {2}, pages = {29-30} } \end{filecontents*} \addbibresource{\jobname.bib} \newwrite\extquotes \newcounter{quotes} \newcounter{choose} \immediate\openout\extquotes=\jobname.qot \renewenvironment{quote}[2]{% \list{}{\rightmargin\leftmargin}% \item #1 [#2]\relax \cite{#2}\relax }{% \endlist } \newenvironment{extquote}[2] %BEGIN Bereich {% \refstepcounter{quotes} \immediate\write\extquotes{\detokenize{\ifnum \thechoose=}\thequotes\detokenize{\vskip0.2\baselineskip} \noexpand\textsuperscript{[\thequotes]} (\jobname) \detokenize{\glqq #1 \grqq \vskip0.2\baselineskip \fi} }% \vskip\baselineskip \hspace{2em}{\glqq #1\grqq \textsuperscript{[\thequotes]}\cite{#2}} }% {%END Bereich \vskip\baselineskip } \newcommand{\theextquotes}[2]{\immediate\closeout\extquotes \setcounter{choose}{#2}\input #1.qot} \AtEndDocument{ \immediate\closeout\extquotes } \title{Zitate exportieren und importieren} \author{ctansearch} \begin{document} \parindent=0pt \maketitle Das ist der normale Text. Das ist der normale Text. Das ist der normale Text. Das ist der normale Text. \begin{extquote}{Das ist das normale Zitat}{Kar99} \end{extquote} \begin{extquote}{Das ist ein Zitat, das exportiert und importiert wird}{Kar99} \end{extquote} \begin{quote}{Das ist eine Quote}{Kar98} \end{quote} \section{(Re)Importierte Zitate} \theextquotes{extquote}{1} \printbibliography \end{document}
Klicke auf Einblenden/Ausblenden von Überarbeitungen 14
Neufassung

29 Sep '13, 21:27

ctansearch's gravatar image

ctansearch
(ausgesetzt)

Diese Antwort wird fortschreitend modifiziert.(Update 2013-09-28 00:11)(Siehe 2013-09-29 21:17)(Siehe Kommentare) Nun ist die Sache schon soweit fortgeschritten, daß ich ungern auf die Möglichkeiten verzichten möchte, die sich ergeben haben. Ich habe deshalb ein Möglichkeit eingefügt, im #1 mitzuteilen, daß man ein gewöhnliches Zitat anwenden will(noex), dann muß man die übliche \cite-Anweisung geben. Ansonsten ist bei der \\extquote-Lösung ja nur ein zusätzliches Klammerpaar notwendig, was durch die vielen Vorteile des "Päckchens" aufgewogen wird. \documentclass[a4paper]{article} \usepackage[ngerman]{babel} \usepackage[utf8]{inputenc} \usepackage{filecontents,csquotes} \usepackage[backend=biber,style=alphabetic]{biblatex} \begin{filecontents*}{\jobname.bib} @ARTICLE{Kar99, author = {Kartoffel.K}, title={Über die Kunst,Kartoffeln zu kochen}, journal = {Kochzeitung }, year = {1999}, volume = {2}, pages = {28-29} } @ARTICLE{Kar98, author = {Kartoffel.K}, title={Über die Kunst,Kartoffeln zu kochen}, journal = {Kochzeitung }, year = {1998}, volume = {2}, pages = {29-30} } \end{filecontents*} \addbibresource{\jobname.bib} \newwrite\extquotes \newcounter{quotes} \newcounter{choose} \immediate\openout\extquotes=\jobname.qot \renewenvironment{quote}[2]{% \list{}{\rightmargin\leftmargin}% \item #1 [#2]\relax }{% \endlist } \newenvironment{extquote}[2] %BEGIN Bereich {% \def\noexa{#1} \def\noexb{noex} \ifx \noexa \noexb \begin{quote}\end{quote}\hspace{1.2em} \else \refstepcounter{quotes} \immediate\write\extquotes{\detokenize{\ifnum \thechoose=}\thequotes\detokenize{\vskip0.2\baselineskip} \noexpand\textsuperscript{[\thequotes]} (\jobname) \detokenize{\glqq #1 \grqq \vskip0.2\baselineskip \fi} }% \vskip\baselineskip \hspace{2em}{\glqq #1\grqq \textsuperscript{[\thequotes]}\cite{#2}} \fi \textsuperscript{[\thequotes]}\cite{#2}} }% {%END Bereich \vskip\baselineskip } \newcommand{\theextquotes}[2]{\immediate\closeout\extquotes \setcounter{choose}{#2}\input #1.qot} \AtEndDocument{ \immediate\closeout\extquotes } \title{Zitate exportieren und importieren} \author{ctansearch} \begin{document} \parindent=0pt \maketitle Das ist der normale Text. Das ist der normale Text. Das ist der normale Text. Das ist der normale Text. \begin{extquote}{noex}{} \glqq Das \begin{extquote}{Das ist das normale Zitat \grqq \cite{Kar99} Zitat}{Kar99} \end{extquote} \begin{extquote}{Das ist ein Zitat, das exportiert und importiert wird}{Kar99} \end{extquote} \begin{extquote}{Das ist ein Zitat, das exportiert wird}{Kar98} \end{extquote} \begin{quote}{Das ist eine Quote}{Kar98} \end{quote} \section{(Re)Importierte Zitate} \theextquotes{extquote}{1} \printbibliography \end{document}\end{document}
Klicke auf Einblenden/Ausblenden von Überarbeitungen 13

29 Sep '13, 00:21

ctansearch's gravatar image

ctansearch
(ausgesetzt)

Klicke auf Einblenden/Ausblenden von Überarbeitungen 12

29 Sep '13, 00:21

ctansearch's gravatar image

ctansearch
(ausgesetzt)

Klicke auf Einblenden/Ausblenden von Überarbeitungen 11
Neufassung

28 Sep '13, 23:51

ctansearch's gravatar image

ctansearch
(ausgesetzt)

Klicke auf Einblenden/Ausblenden von Überarbeitungen 10

27 Sep '13, 00:44

ctansearch's gravatar image

ctansearch
(ausgesetzt)

Klicke auf Einblenden/Ausblenden von Überarbeitungen 9

27 Sep '13, 00:14

ctansearch's gravatar image

ctansearch
(ausgesetzt)

Klicke auf Einblenden/Ausblenden von Überarbeitungen 8

27 Sep '13, 00:13

ctansearch's gravatar image

ctansearch
(ausgesetzt)

Klicke auf Einblenden/Ausblenden von Überarbeitungen 7

26 Sep '13, 22:09

ctansearch's gravatar image

ctansearch
(ausgesetzt)

Klicke auf Einblenden/Ausblenden von Überarbeitungen 6
Update 22:02

26 Sep '13, 22:06

ctansearch's gravatar image

ctansearch
(ausgesetzt)

Klicke auf Einblenden/Ausblenden von Überarbeitungen 5

26 Sep '13, 00:57

ctansearch's gravatar image

ctansearch
(ausgesetzt)

Klicke auf Einblenden/Ausblenden von Überarbeitungen 4
Neufassung

26 Sep '13, 00:41

ctansearch's gravatar image

ctansearch
(ausgesetzt)

Klicke auf Einblenden/Ausblenden von Überarbeitungen 3
extquote.sty jetzt mit \detokenize

25 Sep '13, 20:10

ctansearch's gravatar image

ctansearch
(ausgesetzt)

Klicke auf Einblenden/Ausblenden von Überarbeitungen 2
Erneut die Code-Formatierung korrigiert

25 Sep '13, 08:56

saputello's gravatar image

saputello
11.1k174365

Klicke auf Einblenden/Ausblenden von Überarbeitungen 1

24 Sep '13, 21:57

ctansearch's gravatar image

ctansearch
(ausgesetzt)