Presna pozicia od okraja

[Hans Ginzel]

Peter Bandzuch wrote:
>
>  Dobry den.
>    Mam nasledujuci problem. Potrebujem vytlacit text v zhruba takomto
>  formate:
>    text,.. feddc wsdxwq edfw                1
>    wedfwe, wedf,e  dfwe
>    fwedf, dca. FDWE ds fvrgbgv
>    regfsegv,fseaf .awegferrr                3
>    wefved.
>     .
>
>  Ide mi prave o tie cisla napravo, ktore by mali byt presne pod sebou.
>    Ako sa da zabezpecit, aby bol nejaky znak napriklad presne 10cm od
>  laveho okraja?
>  Problem vyplyva z roznej sirky pismen.

Pokud je cislo vzdy na zacatku odstavce, tak funguje nasledujici:
\hsize=XXX cm  % sirka textu
\def\cislo#1{\leavevmode\setbox0=\hbox to YYY cm{\hfil #1}\wd0=0pt\box0}
    \cislo1 text,.. feddc wsdxwq edfw
    wedfwe, wedf,e  dfwe
    fwedf, dca. FDWE ds fvrgbgv
    \par
    \cislo3 regfsegv,fseaf .awegferrr
    wefved.

To jest: na zacatku odstavce vkladam hbox skutecne sirky YYY, ale TeXu
reknu, ze ma sirku 0pt.
   Box obsahuje \hfil a ono cislo. Trochu se to musi dodelet s indentaci
odstavcu.

Tady je reseni nezavisle na rozlamani radku odstavce:
\hsize=13cm
\def\ref#1{\unskip\vadjust{%
   \setbox0=\vbox{%
      \vskip-\ht\strutbox   % strutbox je \hbox vysky a hloubky
normalniho radku
      \setbox0=\hbox to 14cm{\hfil#1}
      \wd0=0pt
      \box0}
   \ht0=0pt\dp0=0pt
   \box0}}
 fvrgbgv regfsegv,fseaf .awegferrr wefved.text f sjdf s feddc wsdxwq
edfw
 wedfwef  fdghdf, DVA \ref2 wedf,e  dfwe fwedf, dca.  ds fvrgbgv
regfsegv,fseaf
 .awegferrr wefved.text,.. feddc wsdxwq edfw wedfwe, wedf,e  dfwe
 regfsegv,fseaf .awegferrr wefved.text,.. feddc wsdxwq edfw wedfwe,
 wedf,e  TRI \ref{13} fwedf, dca.s fvrgbgv regfsegv,fseaf .awegferrr
 wefved.text,.. feddc wsdxwq edfw wedfwe, wedf,e  dfwe fwedf, dca.

Komemntar:
  If you say \vadjust{<vertical list>} within a paragraph,
TeX will insert the specified internal vertical list into the vertical
list that encloses the paragraph, immediately after whatever line
contained the position of the \vadjust. For example, you can say
\vadjust{\kern1pt} to increase the amount of space between lines of a
paragraph if those lines would otherwise come out too close together.
(TeXBook str. 105)
  Toz ja tam vadjustnu \vbox TeXovske vysky a hloubku 0pt, ketry
obsahuje skok o minus vysku normalniho radku a \hbox TeXovske sirky 0pt
s vyplni a s cislem.

Prijemne cislovani odstavcu preje
        _                              Hans
  ,~|  |/                    /~~~,                   ,
    | /|                    /       .               /
    |/ |/~/~~/  /~~/ \~~   |    _  / /~~/ ~~/ /~~/ /
   /| /| /  /_ /  / , \     \   / / /  /  /  /~~~ /
   ~  ~  ~~~  '  '  ~~~      ~~~|' '  ' '~~  ~~~ '
  Hans GINZEL                  /|   Room: B509
  Faculty of Mathematics      / /   Kolej 17. listopadu
    and Physics               ~~    Pa'tkova 3
  Charles University Prague         182 00 Praha 8
  E-mail: Hans at kolej.mff.cuni.cz    Tel.: ++42+2+8551040-49/761

 Dekuji Zdenku Wagnerovi za inspiraci.