Cestina a klikaci obsah v pdf

[Milan Vancura]

> \immediate\write\bookmarkx{#1}

Omlouvam se, to je samozrejme preklep, spravne ma byt \bookmark misto
\bookmarkx. Cele makro pak (i s doplnenou tabulkou ceskych znaku) vypada takto:

\newwrite\bookmark
\bgroup
\catcode`^^bb=13\catcode`^^ab=13
\catcode`^^f9=13\catcode`^^d9=13
\catcode`^^fa=13\catcode`^^da=13
\catcode`^^f3=13\catcode`^^d3=13
\catcode`^^ef=13\catcode`^^cf=13
\catcode`^^f2=13\catcode`^^d2=13
\catcode`^^ec=13\catcode`^^cc=13
\catcode`^^b9=13\catcode`^^a9=13
\catcode`^^e8=13\catcode`^^c8=13
\catcode`^^f8=13\catcode`^^d8=13
\catcode`^^be=13\catcode`^^ae=13
\catcode`^^fd=13\catcode`^^dd=13
\catcode`^^e1=13\catcode`^^c1=13
\catcode`^^ed=13\catcode`^^cd=13
\catcode`^^e9=13\catcode`^^c9=13
\gdef\makro#1{
\immediate\openout\bookmark=bookmark.tmp
\immediate\write\bookmark{#1}
\immediate\closeout\bookmark
\catcode`^^bb=13\catcode`^^ab=13
\catcode`^^f9=13\catcode`^^d9=13
\catcode`^^fa=13\catcode`^^da=13
\catcode`^^f3=13\catcode`^^d3=13
\catcode`^^ef=13\catcode`^^cf=13
\catcode`^^f2=13\catcode`^^d2=13
\catcode`^^ec=13\catcode`^^cc=13
\catcode`^^b9=13\catcode`^^a9=13
\catcode`^^e8=13\catcode`^^c8=13
\catcode`^^f8=13\catcode`^^d8=13
\catcode`^^be=13\catcode`^^ae=13
\catcode`^^fd=13\catcode`^^dd=13
\catcode`^^e1=13\catcode`^^c1=13
\catcode`^^ed=13\catcode`^^cd=13
\catcode`^^e9=13\catcode`^^c9=13
\def^^bb{t}\def^^ab{T}
\def^^f9{u}\def^^d9{U}
\def^^fa{u}\def^^da{U}
\def^^f3{o}\def^^d3{O}
\def^^ef{d}\def^^cf{D}
\def^^f2{n}\def^^d2{N}
\def^^ec{e}\def^^cc{E}
\def^^b9{s}\def^^a9{S}
\def^^e8{c}\def^^c8{C}
\def^^f8{r}\def^^d8{R}
\def^^be{z}\def^^ae{Z}
\def^^fd{y}\def^^dd{Y}
\def^^e1{a}\def^^c1{A}
\def^^ed{i}\def^^cd{I}
\def^^e9{e}\def^^c9{E}
\input bookmark.tmp
}
\egroup

Test:

Příliš žluťoučký kůň úpěl ďábelské ódy.

\makro{Příliš žluťoučký kůň úpěl ďábelské ódy.}


\bye

Milan Vancura