Svisla cara vedle textu

[Jaromir Kuben]

BREJCHA at kma.zcu.cz píše:
> 
> Dobry den,
> 
> potreboval bych poradit jak dosahnout svisle cary vedle textu a to
> jak cary "plne" tak i presurovane. Pouzivam LATEX 2.09
> 
> Dekuji za radu.
> S pozdravem
>    Milos Brejcha
>  ----------------------------------------------------------------
>   Milos Brejcha                    E-mail: brejcha at udv.zcu.cz
>   Ustav dalsiho vzdelavani         Phone:  +420- 19- 74 91 370
>   Zapadoceska univerzita           Fax:    +420-19-27 99 89
>   P. O. Box 314                    http://www.udv.zcu.cz
>   306 14  Plzen
>  ----------------------------------------------------------------

Dobry den.
Nasledujici kod je ponekud neucesany, ale funguje.
Dejte ho pred \begin{document}

% #1 = tloustka cary
% #2 = delka carky
% #3 = delka carky + mezery
\newcommand\motiv[3]{\vbox to #3{\vss\hbox to 0mm{\vrule height #2 width
#1\hss }}}

% #1 = tloustka cary
% #2 = delka carky
% #3 = delka carky + mezery
% #4 = celkova delka cary
% #5 = vertikalni pohyb cary
\newcommand\carkovana[5]{%
\raisebox{#5}[0mm][0mm]{\vbox{\leaders\motiv{#1}{#2}{#3}\vskip #4}}}

% #1 = tloustka cary
% #2 = celkova delka cary
% #3 = vertikalni pohyb cary
\newcommand\plna[3]{%
\raisebox{#3}[0mm][0mm]{\hbox to 0mm{\vbox{\leaders\vrule width #1\vskip
#2}\hss}}}

\makeatletter
\def\ps at moje{\let\@mkboth\@gobbletwo
     \let\@oddhead\@empty\def\@oddfoot{%
     \llap{\carkovana{.5mm}{7mm}{10mm}{120mm}{10mm} \hskip
3mm}\reset at font\rm\hfil\thepage
     \hfil\rlap{\hskip
5mm\plna{.3mm}{130mm}{-5mm}}}\let\@evenhead\@empty\let\@evenfoot\@oddfoot}
\makeatother


Pak prikaz \pagestyle{moje} udela vlevo carkovanou a vpravo plnou caru.
Delky a umisteni na strance si upravite dle potreby. Horizontalni posuv
nastavite pomoci velikosti \hskip v \rlap resp. \llap.
Zmenou definice \motiv muzete dostat i cerchovane cary a pod.
Pokud pouzivate nejake hlavicky nebo specialni patky, musite adekvatne
upravit definice \@evenhead a pod. v definici \ps at moje. Podivejte se
na definice \ps at headings resp.\ps at myheadings v report.sty.

Zdravi
         Jaromir Kuben