TeX - LaTeX Stack Exchange is a question and answer site for users of TeX, LaTeX, ConTeXt, and related typesetting systems. It only takes a minute to sign up.
Sign up to join this community
I would like to add my own page number in my publications.
I have file: numerki.tex
zzzero
jEden
dWa
trZy
cztery
...
dwadzIescia
etc......
How I can add counter \counter\cyferki from file. each line is next counter
0=zzzero
1=jEden
2=dWa .....
(numbers are in utf-8 and different capitalic)
And next put it to page number in my specific font.
pages.txt:
One
Two (2)
3
FFFFOOOOUUUURRRR
five gold rings
document:
\documentclass{article}
\advance\textheight-20\baselineskip
\advance\paperheight-20\baselineskip
\pdfpageheight\paperheight
\makeatletter
%%%%%
% filler text
\def\txt#1#2{%
\count@#1\relax
\@tempcnta#2\relax
\@txt}
\def\@txt{%
\let\MessageBreak\space\fontencoding{T1}\selectfont
\ifnum\numexpr(\count@/7)*7=\count@\@eha\space \@ehb\space\fi
\ifnum\numexpr(\count@/5)*5=\count@\@eha\space \@ehc\space\fi
\ifodd\count@ Red yellow blue green balck white. \fi
\ifnum\numexpr(\count@/9)*9=\count@ One two three four five. \fi
\advance\count@\@ne
\ifnum\@tempcnta>\count@
\expandafter\@txt
\fi
}
%%%%%%%%%%%
\newread\pagenofile
\openin\pagenofile=pages.txt
\count@\z@
\loop
\advance\count@\@ne
\ifeof\pagenofile
\else
\read\pagenofile to \tmp
\expandafter\let\csname page=\the\count@\endcsname\tmp
%%%debugging\expandafter\show\csname page=\the\count@\endcsname
\repeat
\renewcommand\thepage{\csname page=\arabic{page}\endcsname}
\begin{document}
\txt{1}{100}
\end{document}
\show debugging line (I have those so often I didn't think to remove it:-) I have updated the code with that line commented out. The above is the whole code!
– David Carlisle
Apr 18 '13 at 14:31
\usepackage[utf8]{inputenc} to the tex file and the last number in the file would make any text following the page number bold change \bf{five} to \textbf{five} as \bf does not take an argument (and is not even defined by default in latex)
– David Carlisle
Apr 18 '13 at 15:21
For this numerki.tex file:
$x^2=\ln y$
zzzero
jEden
dWa
trZy
cztery
...
dwadzIescia
etc......
it works:
\documentclass{article}
\usepackage{readarray}
\usepackage{lipsum}
\renewcommand\thepage{\csname arg\roman{page}\endcsname}
\begin{document}
\readdef{numerki.tex}{\mypagenum}
\getargsC{\mypagenum}
\section{Test chapter one}
\lipsum[1-8]
\section{Test chapter two}
\lipsum[1-8]
\end{document}
Confirmed it works for math mode in pages, since user mentioned that.
This alternate version below, while a bit longer in code, will allow the use of regular spaces in your input lines without requiring you to change them to hardspaces.
\documentclass{article}
\usepackage{readarray}
\usepackage{lipsum}
\makeatletter
\renewcommand\readdef[2]{%
\def\first@row{T}%
\def\first@plane{T}%
\catcode\endlinechar=10\relax%
\def#2{}%
\newread\file%
\openin\file=#1%
\loop\unless\ifeof\file%
\read\file to\fileline % Reads a line of the file into \fileline%
\protected@edef#2{#2\fileline}%
\if T\first@row\getargsC{#2}\setcounter{@col}{\numexpr(\narg-1)}%
\edef\ncols{\arabic{@col}}\def\first@row{F}\setcounter{@row}{1}%
\else%
\if T\first@plane\getargsC{\fileline}\ifthenelse{\equal{\narg}{1}}{%
\edef\nrows{\arabic{@row}}\def\first@plane{F}}{%
\addtocounter{@row}{1}}%
\fi
\fi%
\expandafter\protected@edef\csname record\roman{@row}\endcsname{%
\fileline}%
\repeat%
\closein\file%
\catcode\endlinechar=5\relax%
}
\makeatother
\renewcommand\thepage{\csname record\roman{page}\endcsname}
\begin{document}
\readdef{numerki.tex}{\mypagenum}
\section{Test chapter one}
\lipsum[1-8]
\section{Test chapter two}
\lipsum[1-8]
\end{document}
\getargsC command grabs words, not lines. Thus, if you wish to have spaces in your page numbers, use hardspaces (~). And if you use a math formula, there can be no softspaces in it, or \getargsC will break the formula into multiple words (which for math mode, does not work out well).
– Steven B. Segletes
Apr 18 '13 at 14:29
