On Tue, 11 Dec 2001, Marcin Adamski wrote:
> Klient zazyczyl sobie, zeby niektore fragmenty tekstu byly podkreslone
> Bo \underline czy \underbar robi/a \hbox-a.
> A tekst ma byc wyjustowany i w ogole.
>
W plain'ie można skorzystać z makra \textul (jest dostępne na CTAN'ie, ale
gdzie nie pamiętam; są też tam inne: \underwiggle - tekst pofalowany i
\letterspace). Już przypomniałem sobie!!! Prawdopodobnie pakiecik nazywa
się letterspace.tex. Na wszelki wypadek zamieszczam poniżej \textul:
%----------------- Druk podkreślony -----------------------
\def\textul#1{\leavevmode\let\textulnext=\textuli\textuli#1 & }
\def\textuli#1 {\ifx\unskip\let\textulnext=\relax\else
\textulword{#1}\textulspace\fi \textulnext}
\newskip\textulspskip %saved size of a space
\def\textulword#1{%
\setbox0\hbox{#1\space\global\textulspskip=\the\lastskip\unskip}%
\dimen0=\dp0\dp0=1.2pt
\setbox0\vtop{\box0\hrule}\ifdim\dp0<\dimen0\dp0=\dimen0\fi \box0}
\def\textulspace{\leaders\hrule height -1.2pt depth 1.6pt
\hskip\textulspskip}
%----------------- Druk podkreślony -----------------------
\textul{Ten tekst będzie podkreślony. I tu jeszcze trochę tekstu i dalej
bardzo długi tekst i tak dalej i tak dalej.......
}
\bye
