我有一些不想更改或复制的数据。我希望在每个空行后添加一个行号。如果仅通过一些演示就能做到这一点,那就太好了。
数据
This is a sentence.
This is a sentence 2.
应该显示为
1 This is a sentence.
2 This is a sentence 2.
您可以选择显示数字的位置(正文旁边的边距等)。
如何在每行的开头添加这样的行号?
答案1
在普通的 \TeX nique 中,我会这样做。“每个空行”应该是\everypar
。我通过 消除了对空行的需求\obeylines
。
\newdimen\linenowd\setbox0=\hbox{9999}\linenowd=\wd0
\newdimen\linenoskipamount\linenoskipamount=5pt
\newcount\lineno\lineno=1
\def\linenoskip{\hskip \linenoskipamount}
\def\beginlineno{\begingroup\obeylines\global\advance\lineno by -1\everypar={\global\advance\lineno by 1\hbox to \linenowd{\hfill\the\lineno\linenoskip}}}
\def\endlineno{\endgroup}
\beginlineno
This is a sentence.
This is another sentence.
\endlineno
\bye