Unterdrückung der Nummer des/der ersten Verse eines Kapitels im Textkörper, jedoch nicht in der Kopfzeile

Unterdrückung der Nummer des/der ersten Verse eines Kapitels im Textkörper, jedoch nicht in der Kopfzeile

Wie kann ich im folgenden Beispiel die Nummer des ersten Verses (oder der ersten Verse wie 1-2) eines Bibelkapitels im Textkörper unterdrücken, ohne sie in den Überschriften zu unterdrücken? (Dies basiert auf gefundenem MaterialHier.)

\documentclass[12pt,openany,final]{memoir}

\usepackage{libertine}
\usepackage{xcolor}
\usepackage{lettrine}
\usepackage{lipsum}

%%% headers
\makeoddhead{headings}{\rightmark}{}{\thepage}
\makeevenhead{headings}{\thepage}{}{\leftmark}

%remove the marks set by \section.
\addtopsmarks{headings}{}{%
\renewcommand\sectionmark[1]{}
}

%%%%chapter format
\newcommand{\chaplabel}{}
\newcommand{\gnumChapters}{0}

\newcommand{\gChapter}[1]{\lettrine[lines=2,nindent=.5em,findent=0em]{{\textcolor{black}{#1}}}{}\markboth{\chaplabel\ #1:1}{\chaplabel\ #1:1}\renewcommand{\gnumChapters}{#1}}

%%%%verse format
\makeatletter
% define a 'smaller textsuperscript' macro
\DeclareRobustCommand*\textsmallsuperscript[1]{%
\@textsmallsuperscript{\selectfont#1}}
\def\@textsmallsuperscript#1{%
{\m@th\ensuremath{^{\mbox{\fontsize\ssf@size\z@#1}}}}}
\makeatletter

\newcommand{\gverse}[1]{{\textsmallsuperscript{#1}\hspace*{.1em}\ignorespaces\markboth{\chaplabel\ \gnumChapters:#1}{\chaplabel\gnumChapters:#1}}\ignorespaces}

\begin{document}
\gChapter{1}
\gverse{1-2}\lipsum[2]
\gverse{3}\lipsum[3]
\end{document}

Antwort1

Eine Möglichkeit besteht darin, im \gchapterMakro ein Flag zu setzen und dann zu testen, um die erste Verwendung von \gverse„after“ zu erkennen \gchapter.

Beachten Sie, dass das Zurücksetzen der Flagge abgeschlossen istdraußenIhr habt es verdoppelt {{...}}, \gversesonst betrifft es nur eine lokale Kopie der Flagge, was aber nicht funktioniert!

    ...
    %%%%chapter format
    \newcommand{\chaplabel}{}
    \newcommand{\gnumChapters}{0}
    \newif\ifshowverseno

    \newcommand{\gChapter}[1]{\showversenofalse\lettrine[lines=2,nindent=.5em,findent=0em]{{\textcolor{black}{#1}}}{}\markboth{\chaplabel\ #1:1}{\chaplabel\ #1:1}\renewcommand{\gnumChapters}{#1}}

    %%%%verse format
    \makeatletter
    % define a 'smaller textsuperscript' macro
    \DeclareRobustCommand*\textsmallsuperscript[1]{%
    \@textsmallsuperscript{\selectfont#1}}
    \def\@textsmallsuperscript#1{%
    {\m@th\ensuremath{^{\mbox{\fontsize\ssf@size\z@#1}}}}}
    \makeatletter

    \newcommand{\gverse}[1]{{\ifshowverseno\textsmallsuperscript{#1}\hspace*{.1em}\ignorespaces \fi%
       \markboth{\chaplabel\ \gnumChapters:#1}{\chaplabel\gnumChapters:#1}}\showversenotrue\ignorespaces}

    \begin{document}
    ...

Bildbeschreibung hier eingeben

verwandte Informationen