[cstex] Jak zjistit skutečnou šířku textu na praporek

[Marcel Svitalský]

Děkuji, to je přesně co jsem potřeboval.
Marcel Svitalský


On 10.7.2017 11:26, Jan Sustek wrote:
> Dobrý den, nabízím makro \zjistinejdelsi, které vezme nějaký
> odstavcový text, klidně několik odstavců, klidně ručně nalámaný, a
> uloží do proměnné \tmpdim šířku nejširšího řádku. Například u
> uvedeného textu sázeného na 150pt má nejširší řádek 123pt.
>
> \input opmac
>
> \long\def\zjistinejdelsi#1{
>   \setbox0=\vbox{#1\par
>     \tmpdim0pt
>     \loop \unskip \unpenalty \setbox2=\lastbox
>       \ifhbox2
>       \setbox4=\hbox{\unhbox2}%
>       \ifdim\wd4>\tmpdim \tmpdim=\wd4 \fi
>     \repeat
>   \expandafter}\expandafter\tmpdim\the\tmpdim\relax}
>
> \hsize150pt
> \rightskip0ptplus\hsize
> \zjistinejdelsi{Sto roků v~šachtě žil, mlčel jsem. Sto roků kopal jsem
> $\arccos x+\arccos y$. Za $\sqrt{\sqrt{100\,000\,000}}$~let v~rameni
> bezmasém svaly mi v~železo ztuhly.}
> \the\tmpdim
> \bye
>
> Mějte se
> Jan Šustek
>
> ---------- Původní e-mail ----------
> Od: Marcel Svitalský <marcel.svitalsky at centrum.cz>
> Komu: Czech and Slovak TeX-related mailing list <cstex at cs.felk.cvut.cz>
> Datum: 9. 7. 2017 12:27:29
> Předmět: [cstex] Jak zjistit skutečnou šířku textu na praporek
>
>
>     Zdravím veleváženou konferenci! ;-)
>
>     Rád bych se zeptal, jak mohu plain-TeX-ovými prostředky zjistit
>     skutečnou šířku textu, jenž není vysázen do bloku, nýbrž používá
>     raggedright, ručně zalámané řádky typu veršů atp., čili vlastně
>     jak mohu najít (změřit) maximální délku několika předem neznámých
>     řádků.
>
>     Děkuji a zdravím
>     -- 
>     Marcel Svitalský/ /
>     _______________________________________________
>     csTeX mailing list
>     csTeX at cs.felk.cvut.cz
>     https://lists.felk.cvut.cz/mailman/listinfo/cstex
>
>
>
> _______________________________________________
> csTeX mailing list
> csTeX at cs.felk.cvut.cz
> https://lists.felk.cvut.cz/mailman/listinfo/cstex

-- 
Marcel Svitalský/ /
-------------- next part --------------
An HTML attachment was scrubbed...
URL: <http://lists.felk.cvut.cz/pipermail/cstex/attachments/20170724/cb6e9c22/attachment.html>
-------------- next part --------------
A non-text attachment was scrubbed...
Name: signature.asc
Type: application/pgp-signature
Size: 260 bytes
Desc: OpenPGP digital signature
URL: <http://lists.felk.cvut.cz/pipermail/cstex/attachments/20170724/cb6e9c22/attachment.bin>