Google Groups Home
Help | Sign in
Message from discussion Is it possible to use \startlock and \endlock in Ledmac to number sentences instead of lines?
The group you are posting to is a Usenet group. Messages posted to this group will make your email address visible to anyone on the Internet.
Your reply message has not been sent.
Your post was successful
Dirk-Jan Dekker  
View profile
 More options Aug 19 2005, 6:56 am
Newsgroups: comp.text.tex
From: Dirk-Jan Dekker <djdek...@see.sig.below>
Date: 19 Aug 2005 10:56:34 GMT
Local: Fri, Aug 19 2005 6:56 am
Subject: Re: Is it possible to use \startlock and \endlock in Ledmac to number sentences instead of lines?
Stefano,

Thanks for the complete example. Now I understand better what you
are looking for. The code below should get you in the right
direction.

Dirk-Jan

=======================================
\documentclass[11pt]{article}
\usepackage[italian]{babel}
\usepackage{ledmac}
\usepackage[latin1]{inputenc}
\usepackage[T1]{fontenc}

\makeatletter
   \def\printlines#1|#2|#3|#4|#5|#6|#7|{\begingroup
     \setprintlines{#1}{#2}{#3}{#4}{#5}{#6}%
     \ifl@d@pnum #1\fullstop\fi
%     \ifledplinenum \linenumrep{#2}\else \symplinenum\fi
      \speaker\csname the\speaker turn\endcsname\fullstop#2%
     \ifl@d@ssub \fullstop \sublinenumrep{#3}\fi
%     \ifl@d@dash \endashchar\fi
     \ifl@d@pnum #4\fullstop\fi
%     \ifl@d@elin \linenumrep{#5}\fi
     \ifl@d@esl \ifl@d@elin \fullstop\fi \sublinenumrep{#6}\fi
   \endgroup}
\makeatother

\renewcommand{\notenumfont}{\footnotesize}
\newcommand{\notetextfont}{\footnotesize}
\renewcommand{\numlabfont}{\footnotesize}
\firstlinenum{9999}
\linenumincrement{1}

\bigskipamount=14pt plus 7pt minus 7pt

\newcounter{sentence}\setcounter{sentence}{0}

%% SPEAKERS
\newcommand{\speaker}{}
\newcommand{\speakername}{}
\newcounter{POturn}\setcounter{POturn}{0}
\newcounter{ARturn}\setcounter{ARturn}{0}
\newcounter{PIturn}\setcounter{PIturn}{0}  

\newcommand{\newspeaker}{%
   \noindent\llap{\notenumfont\speaker~%
   \csname the\speaker turn\endcsname\hspace{12pt}}%
   \centerline{\speakername}%
   \setcounter{sentence}{0}
   }

\newcommand{\Polysopho}{%
   \renewcommand{\speaker}{PO}
   \renewcommand{\speakername}{POLYSOPHO}
   \refstepcounter{POturn}
   \newspeaker
   }

\newcommand{\Archophilo}{%
   \renewcommand{\speaker}{AR}
   \renewcommand{\speakername}{ARCHOPHILO}
   \refstepcounter{ARturn}
   \newspeaker
   }

\newcommand{\Pistotato}{%
   \renewcommand{\speaker}{PI}
   \renewcommand{\speakername}{PISTOTATO}
   \refstepcounter{PIturn}
   \newspeaker
   }

%% TURNS
\newcommand{\turn}{\medskip\noindent}

%% SENTENCENUMBERING

\newcommand{\pgf}{\stepcounter{sentence}
   \ledleftnote{\numlabfont{\thesentence}}%

}

\let\oldedtext=\edtext
\renewcommand{\edtext}[2]{%
   \oldedtext{#1}{\linenum{|\thesentence}#2}%
   }

%% FOOTNOTES FORMAT
% Transcription [A]
\makeatletter
\newcommand{\newpaleofootfmt}[3]{%
   \ledsetnormalparstuff
   \notenumfont\printlines#1|\enspace%
   {\select@lemmafont#1|#2\rbracket}\enskip #3\penalty-10%
   }
\makeatother

%% NOTES STYLES
\footparagraph{A}
\let\Afootfmt=\newpaleofootfmt
\let\paleo=\Afootnote
\renewcommand{\interparanoteglue}{1em plus.5em minus.1em}

%% MARGINALIA ALLIGNMENT
\makeatletter
\newcommand*{\allignmarginalia}[3]{%
   {\parindent\z@\hsize=\ledrsnotewidth\ledrsnotefontsetup%
   \global\setbox\l@drp@rbox=\vbox to\z@{#3\vss}}}% aligns on top line
\let\setl@drp@rbox=\allignmarginalia%
\makeatother

\begin{document}
    %========== POLYSOPHO 1 ==========%
    \beginnumbering\Polysopho

    %========== TURN ==========%
    \pstart\turn\pgf A questi giorni passati,
    \edtext{clementissimo}{\linenum{|\thesentence}\paleo{clmentissimo}}
    Signore mio, hanno
    insieme meco Amore e Reverenza summamente contrastato.~\pgf Da uno
    canto, Reverenza me ha tenuto ritratto et arestito interrogarti e
    chiederti quello che, non lo chiedendo, me è uno coltello e,
    chiedendolo, ho temuto essere accusato da te de arroganza e
    presoncione.~\pgf Perché, quantunque talvolta tu mi
    \edtext{riconoschi}{\paleo{riconosci.}} per preceptore e tu ti degni
    imparare qualche doctrina da me, non è però che io non te habbia per
    mio observandissimo signore, e in me non gli acada verso di te la
    servitute;\pgf\ledrightnote{marginalia} la qual pare che licitamente
    non comporti che io
    habbia ardire adimandarti quello che è secreto collocato nel tuo
    pecto e che è fuori de l'offitio et exercitio che io ho a fare;~\pgf
    la quale cosa die' fugire e schiffare qualunque discreto e amorevole
    servitore.~\pgf Da l'altro, el singulare amore, la pura fede,
    isviscerata dilectione e dolce benivolenza ti porto, ha vinta e
    superata la reverenza.~\pgf E atterratala e gettatala sotto li
    piedi, non me ho potuto contenere che io non mi sia quivi
    ingienocchiato inanzi al tuo dulcissimo conspecto\ldots
    \pgf Tu dèi sapere, benignissimo Signore mio, che innumerabili sono
    et infiniti
    li benifitii che continuo mi sono conferiti e contribuiti da te; per
    li quali, posso credere e existimare che me ami e che assai sia la
    dilectione mi porti.
    \pend\endnumbering\bigskip
    %========== ARCHOPHILO 1 ==========%
    \beginnumbering\Archophilo
    %========== TURN ==========%
    \pstart\turn \pgf Ahimè, quanto è cosa dignissima di
    laude, gloria e commendacione, uno signore havere conversatione de
    homini docti e valenti, e havere virtuosi sempre seco in compagnia,
    e fugire gli adulatori, maldicenti, invidi e malivoli, da cui, se
    non fraude e inganni, e
    \edtext{pessimi}{\linenum{|\thesentence}\paleo{just another note.}}
    costumi resurgono e provengono; ché,
    conversando e praticando loro, ogni celeste e angelica natura in
    perfida, nequissima e diabolica si pervertiria!~\pgf Ahimè, quanto è
    dolce ioconda e suavissima cosa, la vita con quelli consumare, dai
    quali, continuamente conferendo, fructo e dolceza di doctrina si
    colga, e sapienza, e precepti se imparino, e documenti, tali che fia
    la vita loro eterna et immortale!~\pgf Che altro è, nì nobeltate nì
    signoria, se non la propria vera purissima virtute?~et essere
    possessore di quelle cose che in sé contengano perpetuitate e
    eternitate, e non che 'l tempo e la etate le consumi e infatisca, e
    fortuna le vexi contamini et adversi?~\pgf Clausule hora ho audite,
    et argumenti, con ragione da me mai più intese, viste e
    conosciute\ldots.
    \pend\endnumbering
    \end{document}


    Reply to author    Forward  
You must Sign in before you can post messages.
To post a message you must first join this group.
Please update your nickname on the subscription settings page before posting.
You do not have the permission required to post.

Create a group - Google Groups - Google Home - Terms of Service - Privacy Policy
©2008 Google