7. August 2017 um 15:54

Hi Hans,

https://mailman.ntg.nl/pipermail/ntg-context/2017/089431.html

For the current writing project: It seems I've gotten about as far as I'm going to get on the list with this. Could you kindly take a look at the two automation challenges at the end of the message when you get a chance?

Eventually we want to also get, e.g.

1.01
2.01

etc. but the full decimal version is a start. Here is a link to the book that illustrates the layout:

https://www.dropbox.com/s/q7znlu0y362abno/Mure-Introduction-to-Hegel-OCR.pdf?dl=0

Thanks in advance for your help.

Idris

Wolfgang Schuster

7. August 2017 um 20:17

\defineexpandable[1]\PreviousNumber
{\number\numexpr#1-1\relax}

\defineconversion[PreviousNumber][\PreviousNumber]

\defineconversionset[ParagraphNumber][n,PreviousNumber,PreviousNumber]
\defineseparatorset [ParagraphNumber][.,]

\definecounter[ParagraphNumber][numberconversionset=ParagraphNumber,numberseparatorset=ParagraphNumber]

\define\ParagraphNumber
{\incrementcounter[ParagraphNumber]%
   \incrementcounter[ParagraphNumber][2]%
   \incrementcounter[ParagraphNumber][3]%
   \convertedcounter[ParagraphNumber][numbersegments=1]\quad}

\define\subParagraphNumber
{\incrementcounter[ParagraphNumber][2]%
   \incrementcounter[ParagraphNumber][3]%
   \convertedcounter[ParagraphNumber][numbersegments=1:2]\quad}

\define\subsubParagraphNumber
{\incrementcounter[ParagraphNumber][3]%
   \convertedcounter[ParagraphNumber][numbersegments=1:3]\quad}

\setupwhitespace[line]

\starttext

\ParagraphNumber\input ward

\subsubParagraphNumber\input ward

\subParagraphNumber\input ward

\subsubParagraphNumber\input ward

\subsubParagraphNumber\input ward

\subParagraphNumber\input ward

\subsubParagraphNumber\input ward

\ParagraphNumber\input ward

\stoptext