Re: Problema TeXnico: parsing di righe

#55781
Up
0
Down
::


`\documentclass[a4paper]{article}
\usepackage[latin1]{inputenc}
\usepackage[T1]{fontenc}

\makeatletter
\newcount\r@wcounti
\newcount\r@wcount
\def\pp@sentinel{\hfuzz}
\def\pprows{\begingroup\parindent=\z@\endlinechar=\m@ne\ppr@ws}
\def\ppr@ws#1{%
\r@wcounti=\z@\r@wcount=\z@\ppr@w#1\\\hfuzz\\}
\def\ppr@w#1\\{%
% incremento contatore esterno
\advance\r@wcounti\@ne
% controlliamo se siamo alla fine
\def\pp@temp{#1}%
\ifx\pp@temp\pp@sentinel
\expandafter\endgroup
\else
\processr@w{#1}\expandafter\ppr@w
\fi}

\def\pppr@fix{%
\ifcase\r@wcounti\or
\textbullet\ \or % 1
\or %2
\or %3
\or %4
$\star$\ \or %5
% …
\fi}

\def\processr@w#1{\advance\r@wcount\@ne
\ifx\pp@temp\@empty
\r@wcount=\z@ \strut\par
\else
\pppr@fix
\ifcase\r@wcount\or
\textbf{#1}\par\or
\textit{#1}\par\else
#1\par
\fi
\fi}
\makeatother

\begin{document}

Elenco generico di destinatari:

\pprows{%
Assessorato alle politiche sociali\\
Respons. Quart. Vicaria, dott.ssa Rosa Russo\\
P.zza Vicario, 31bis\\
\\
Comando VV. UU.\\
Com. Luigi Fariello\\
\\
Ufficio Stampa\\
\\
Comando VV. FF.\\
Com. ing. Tiberio Sauro\\
Sede
}
\end{document}
`

Grazie.
Ciao,
Agostino

Go to top