KTUGFaq: Karnes/2006-06

KTUGFaq

KTUG FAQ

트랙백 핑 보내기

You are unscrupulously dishonest, false, and deceitful.

CategoryGraphicTools
EmEditorTip/ActiveString
CategoryCode
KTUGFaqMook

Karnes/2006-06

FrontPage › Karnes/2006-06

TrackBack Ping URL:
Title:

KTUGOperate:18146''''''에 답변은 lineno를 소개하는 것으로 달았지만, 답변을 작성하는 과정에서 *문단 개수*를 세는 짧은 코드를 작성하였기 때문에 여기에 적어둔다. 여기서는 everypar를 이용해서 *문단*의 개수를 세었는데, everyline 비슷한 명령을 만들어서 진짜로 행의 개수를 세는 방법도 있지 않을까 한다.
{{{#!vim tex
\documentclass{article}

\newcounter{mycnt}\setcounter{mycnt}{0}
\newwrite\myOutput
\def\OutputName{\jobname.tmp}
\makeatletter
\newcommand\showmethenumber{%
	\IfFileExists{\jobname.tmp}{\input{\jobname.tmp}}{??}%
}
\newenvironment{countthelines}%
	{\setcounter{mycnt}{0}\everypar\expandafter{\stepcounter{mycnt}}%
	 \openout\myOutput\OutputName
	}
	{\everypar{\empty}\par We have \themycnt~lines.
	 \protected@write{\myOutput}{}{\themycnt\string\ignorespaces}%
	 \closeout\myOutput
	}
\makeatletter

\begin{document}

The following paragraph has \showmethenumber~lines.

\begin{countthelines}
a line\par
a line\par
a line\par
a line\par
a line\par
a line\par
a line\par
a line\par
a line\par
a line\par
a line\par
a line\par
a line\par
a line\par
a line\par
a line\par
a line\par
a line\par
a line\par
a line\par
a line\par
a line\par
a line
\end{countthelines}
\end{document}
\}}}

mb encoded:

last modified 2006-06-30 00:21:29
Processing time 0.0275 sec

로그인:
비밀번호:
가입