☰

número/contador contínuo (por exemplo, {244}{a}) para um texto

tag-icon • tag-icon cross-referencing numbering counters eledmac
número/contador contínuo (por exemplo, {244}{a}) para um texto

Para atribuir um contador corrido a partes (não parágrafos, não linhas) de um documento com texto grego e tradução (finalmente usarei eledpar), preciso de um comando (chame-o \Steph) que 1a) insere uma marca (de preferência \apexde teubner.sty) no texto , b) imprime o número corrente na margem e 2. atribui um número a cada parte do texto, para que eu possa consultá-lo posteriormente (por exemplo, \labelSteph& \refSteph).

Nós, platônicos, nos referimos a qualquer passagem com um número de duas partes: A número de páginada primeira edição impressa (-->http://en.wikipedia.org/wiki/Stephanus_paginationcom http://upload.wikimedia.org/wikipedia/en/a/ae/Theaetetus_stephanus_page142.jpg) e uma letra (a, b, c, d, e) para opapela página (original). Portanto, a primeira parte do meu texto de exemplo é, por exemplo, 244a, seguida por 244b... 244e, 245a, 245b...

MAS: não quero que imprima 244a, 244b ... na margem, mas 244 (="244a começa"), b (="244b, 244 tirado de cima"), c ... 245, b ...

Dos muitos pacotes LuaLaTeX ( xpatch, suffix...), eu uso apenas um \xparse-command, que realmente não faz o que eu quero.

% -*- mode: latex; TeX-engine: luatex; coding: utf-8; -*-
\documentclass[parskip=false]{scrbook}
\usepackage{eledmac,savesym,fontspec}
\setmainfont{texgyrepagella-regular.otf}
\newfontfamily\greekfont{GFS Porson}
\usepackage{polyglossia}
\setmainlanguage[babelshorthands = true]{german}
\setotherlanguage{greek}
\usepackage{teubner}
\savesymbol{breve} %to avoid a clash
\sidenotemargin{outer}
\NewDocumentCommand{\Steph}{ m m }{\ledsidenote{\textlatin{\emph{#1"|#2}}}\apex}
\usepackage{xparse}
\begin{document}
\beginnumbering
\selectlanguage{greek}
  \pstart ΣΩ.\quad Οὑτωσὶ τοίνυν, ὦ παῖ καλέ, ἐννόησον, ὡς ὁ μὲν
  πρότερος ἦν \Steph{244}{a}λόγος Φαίδρου τοῦ Πυθοκλέους, Μυρρινουσίου
  ἀνδρός. ὃν δὲ μέλλω λέγειν Στησιχόρου τοῦ Εὐφήμου, Ἱμεραίου. λεκτέος
  δὲ ὧδε, ὅτι οὐκ ἔστ’\,ἔτυμος λόγος ὃς ἂν παρόντος ἐραστοῦ τῷ μὴ
  ἐρῶντι φῇ δεῖν χαρίζεσθαι, διότι δὴ ὁ μὲν μαίνεται, ὁ δὲ
  σωφρονεῖ. [...]

  Ἥ τε γὰρ ἐν ∆ελφοῖς \labelSteph{Delphi}προφῆτις αἵ τ’\,ἐν
  ∆ω\Steph{244}{b}δώνῃ ἱέρειαι μανεῖσαι μὲν πολλὰ δὴ καὶ καλὰ ἰδίᾳ τε
  καὶ δημοσίᾳ τὴν Ἑλλάδα ἠργάσαντο, σωφρονοῦσαι δὲ βραχέα ἢ οὐδέν. καὶ
  ἐὰν δὴ λέγωμεν Σίβυλλάν τε καὶ ἄλλους, ὅσοι μαντικῇ χρώμενοι ἐνθέῳ
  πολλὰ δὴ πολλοῖς προλέγοντες εἰς τὸ μέλλον ὤρθωσαν, [...]\pend
\endnumbering

\selectlanguage{german}Over Delphi speaken Plato in \refSteph{Delphi}.
\end{document}

Responder1

A pergunta não está muito clara, mas acho que você quer algo como:

insira a descrição da imagem aqui

\documentclass[parskip=false]{scrbook}
\usepackage{eledmac,savesym,fontspec}
\setmainfont{texgyrepagella-regular.otf}
\newfontfamily\greekfont{GFS Porson}
\usepackage{polyglossia}
\setmainlanguage[babelshorthands = true]{german}
\setotherlanguage{greek}
\usepackage{teubner}
\savesymbol{breve} %to avoid a clash
\sidenotemargin{outer}
\makeatletter

% don't know what these commands do
%\NewDocumentCommand{\Steph}{ m m }{\def\@currentlabel{#1#2}\ledsidenote{\textlatin{\emph{#1"|#2}}}\apex}
\NewDocumentCommand{\Steph}{ m m }{\def\@currentlabel{#1#2}\ledsidenote{%
\textlatin{\if a#2 #1\else #2\fi}}}
\makeatother

\begin{document}
\beginnumbering
\selectlanguage{greek}
  \pstart ΣΩ.\quad Οὑτωσὶ τοίνυν, ὦ παῖ καλέ, ἐννόησον, ὡς ὁ μὲν
  πρότερος ἦν \Steph{244}{a}λόγος Φαίδρου τοῦ Πυθοκλέους, Μυρρινουσίου
  ἀνδρός. ὃν δὲ μέλλω λέγειν Στησιχόρου τοῦ Εὐφήμου, Ἱμεραίου. λεκτέος
  δὲ ὧδε, ὅτι οὐκ ἔστ’\,ἔτυμος λόγος ὃς ἂν παρόντος ἐραστοῦ τῷ μὴ
  ἐρῶντι φῇ δεῖν χαρίζεσθαι, διότι δὴ ὁ μὲν μαίνεται, ὁ δὲ
  σωφρονεῖ. [...]

  Ἥ τε γὰρ ἐν ∆ελφοῖς \label{Delphi}προφῆτις αἵ τ’\,ἐν
  ∆ω\Steph{244}{b}δώνῃ ἱέρειαι μανεῖσαι μὲν πολλὰ δὴ καὶ καλὰ ἰδίᾳ τε
  καὶ δημοσίᾳ τὴν Ἑλλάδα ἠργάσαντο, σωφρονοῦσαι δὲ βραχέα ἢ οὐδέν. καὶ
  ἐὰν δὴ λέγωμεν Σίβυλλάν τε καὶ ἄλλους, ὅσοι μαντικῇ χρώμενοι ἐνθέῳ
  πολλὰ δὴ πολλοῖς προλέγοντες εἰς τὸ μέλλον ὤρθωσαν, [...]\pend
\endnumbering

\selectlanguage{german}Over Delphi speaken Plato in \ref{Delphi}.
\end{document}

informação relacionada