Export+zobrazeni_zdrojoveho_kodu

[krumpha]

Dobry den.

Mozna jsem svuj problem definoval prilis krkolomne. Nicmene potrebuji
makro, ktere udela nasledujici

\begin{makro}
radek1, mohou tu byt i @#$%^&*
radek2
radek3
\end{makro}

po kompilaci bude vytvoren soubor .dvi dokumentu, kde obsah bude vysazen
ve verbatim a druhy soubor(nejaky) s obsahem

radek1, mohou tu byt i @#$%^&*
radek2
radek3

S pozdravem

Jiri Krumphanzl


On Wed, 26 Jun 2002, Zdenek Wagner wrote:

> On Wed, 26 Jun 2002, krumpha wrote:
>
> > Dobry den.
> >
> > Mohl by mi nekdo poradit s nasledujicim problemem? Vytvoril jsem
> > optimalizacni soft. knihovnu, jejiz popis(a vypis) ma byt soucasti diz.
> > prace psane v LaTeXu. Chtel bych, aby po kompilaci dizertacky do .dvi
> > vznikl i soubor se zdrojovym kodem popisovane knihovny. Makro \WriteToFile
> > dobre uklada v nezmene forme text(kod) az do zarazky definovane v
> > \endofps, ale kod bohuzel nezobrazi. Lze nejakou modifikaci tohoto
> > makra soucasne zobrazit kod jako v prostredi verbatim? Uvitam i jine
> > reseni.
> >
> Da se, mozna po nejakych upravach, pouzit cweb, fweb, noweb, nuweb nebo
> podobny nastroj, ale na to se melo myslet na zacatku vyvoje. Pouziti "ex
> post" by asi bylo prilis pracne. Spis bych se zamyslel, jestli nejde
> vyuzit ltxdoc a docstrip nebo XML.
>
> > S pozdravem
> >
> > Jiri Krumphanzl
> >
> > Czech Technical University
> > Faculty of Electrical Engineering
> > Department of Electroenergetics
> > Technicka 2, 166 27 Praha 6
> >
> > -----------------------------------
> >
> > \documentclass{report}
> >
> > \newcommand{\OpenNewFile}[1]{\newwrite\out  \immediate\openout\out=#1}
> > \newcommand{\CloseFile}[0]{\immediate\closeout\out}
> >
> > \def\endofps{EndOfTheIncludedSourceCodeMagicCookie}
> >
> > \chardef\other=12
> > \outer\def\WriteToFile{\par\medbreak
> >   \copytoblankline}
> >
> > \def\copytoblankline{\begingroup\setupcopy\copypsline}
> >
> > \def\setupcopy{\def\do##1{\catcode`##1=\other}\dospecials
> >   \catcode`\\=\other \obeylines}
> > 	      {\obeylines \gdef\copypsline#1
> > 		{\def\next{#1}%
> > 		  \ifx\next\endofps\let\next=\endgroup %
> > 		  \else\immediate\write\out{\next}
> > \let\next=\copypsline\fi\next}}
> >
> > \begin{document}
> >
> > \OpenNewFile{./zdrojak.m}
> >
> > \WriteToFile
> >
> > ZdrojakPrvniFunkce[]:={
> >   ...
> > }
> >
> > EndOfTheIncludedSourceCodeMagicCookie
> >
> > \noindent Tady bude popis funkce ZdrojakPrvniFunkce[]
> >
> > \WriteToFile
> >
> > ZdrojakDruheFunkce[]:={
> >   ...
> > }
> >
> > EndOfTheIncludedSourceCodeMagicCookie
> >
> > \noindent Tady bude popis funkce ZdrojakDruheFunkce[]
> >
> > \CloseFile
> >
> > \end{document}
> >
> >
> >
> >
> >
> >
>
> Zdenek Wagner
> e-mail: wagner at mbox.cesnet.cz  or  wagner at icpf.cas.cz
>
> see also http://www.icpf.cas.cz/wagner/
>          http://icebearsoft.euweb.cz
>
>
>
>
>