<!DOCTYPE html PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN">
<html>
<head>
<meta content="text/html;charset=ISO-8859-1" http-equiv="Content-Type">
<title></title>
</head>
<body bgcolor="#ffffff" text="#000000">
Dobry den.<br>
<br>
Vubec netusim, jak je to v ConTeXtu s aktivnimi znaky, i kdyz mam
pocit, ze neco na to tema jednou v konfere probehlo.<br>
<br>
Priklad z TBN je nasledujici:<br>
<br>
\newcount\tempnum<br>
{\catcode`\^^M=13 % budeme pracovat s koncem řádku "^^M" <br>
\gdef\tabulka{\bgroup \catcode`\^^M=13 \let^^M=\jedenradek}%<br>
\gdef\jedenradek #1^^M{\def\temp{#1}%<br>
\ifx \temp\posledniradek \def\next ##1 ^^M {\konectab}%<br>
\else \message{Další řádek:}%<br>
\tempnum=0 \let\next=\polozka %<br>
\fi \next #1 ^^M }% <br>
\gdef\poslednipolozka{^^M} \gdef\posledniradek{\konectabulky}%<br>
} <br>
\def\polozka #1 {\advance\tempnum by 1 \def\temp{#1}%<br>
\ifx \temp\poslednipolozka \let\next=\jedenradek<br>
\else \message{údaj č. \the\tempnum: #1.}%<br>
\fi \next}<br>
\def\konectab{\egroup}<br>
<br>
<br>
\tabulka<br>
11 112 15 18<br>
32 4 9 15 17 27<br>
142 17 321 92 141<br>
\konectabulky<br>
<br>
<br>
Nicmene tento priklad v ConTeXtu nefunguje ... resp. kompilace jakoby
probehne do konce, ale vysledne PDFko se nevytvori. <br>
Prubeh kompilace je nasledujici:<br>
<br>
TeXExec | processing document 'pokus1.tex'<br>
TeXExec | no ctx file found<br>
TeXExec | tex processing method: context<br>
TeXExec | TeX run 1<br>
TeXExec | writing option file pokus1.top<br>
TeXExec | using randomseed 1206<br>
TeXExec | tex engine: pdftex<br>
TeXExec | tex format: cont-en<br>
This is pdfTeXk, Version 3.1415926-1.40.9 (Web2C 7.5.7)<br>
%&-line parsing enabled.<br>
(c:/Program Files/texlive/2008/texmf/web2c/natural.tcx)<br>
entering extended mode<br>
(./pokus1.tex<br>
<br>
ConTeXt ver: 2009.07.17 17:23 MKII fmt: 2009.7.22 int:
english/english<br>
<br>
system : cont-new loaded<br>
(c:/Program Files/texlive/2008/texmf-dist/tex/context/base/cont-new.tex<br>
systems : beware: some patches loaded from cont-new.tex<br>
(c:/Program
Files/texlive/2008/texmf-dist/tex/context/base/cont-new.mkii))<br>
system : cont-fil loaded<br>
(c:/Program Files/texlive/2008/texmf-dist/tex/context/base/cont-fil.tex<br>
loading : ConTeXt File Synonyms<br>
)<br>
system : cont-sys.rme loaded<br>
(c:/Program Files/texlive/2008/texmf-dist/tex/context/user/cont-sys.rme<br>
(c:/Program Files/texlive/2008/texmf-dist/tex/context/base/type-tmf.tex<br>
(c:/Program
Files/texlive/2008/texmf-dist/tex/context/base/type-tmf.mkii))<br>
(c:/Program Files/texlive/2008/texmf-dist/tex/context/base/type-siz.tex<br>
(c:/Program
Files/texlive/2008/texmf-dist/tex/context/base/type-siz.mkii))<br>
(c:/Program Files/texlive/2008/texmf-dist/tex/context/base/type-one.tex<br>
(c:/Program
Files/texlive/2008/texmf-dist/tex/context/base/type-one.mkii)))<br>
system : pokus1.top loaded<br>
(./pokus1.top)<br>
bodyfont : 12pt rm is loaded<br>
language : patterns nl->texnansi:texnansi->1->2:2
nl->ec:ec->2->2:2 us-><br>
ec:ec->3->2:3 de->texnansi:texnansi->4->3:3
de->ec:ec->5->3:3 da->ec:ec->6->2:2<br>
sv->ec:ec->7->2:2 gb->ec:ec->8->2:2
fr->texnansi:texnansi->9->2:2 fr->ec:ec->1<br>
0->2:2 es->ec:ec->11->2:2 ca->ec:ec->12->2:2
it->texnansi:texnansi->13->2:2 it-<br>
>ec:ec->14->2:2 la->ec:ec->15->2:2
pt->texnansi:texnansi->16->2:2 pt->ec:ec->17<br>
->2:2 ro->ec:ec->18->2:2 pl->pl0:pl0->19->2:2
pl->ec:ec->20->2:2 pl->qx:qx->21-<br>
>2:2 cs->il2:il2->22->2:2 cs->ec:ec->23->2:2
sk->il2:il2->24->2:2 sk->ec:ec->25<br>
->2:2 hr->ec:ec->26->2:2 sl->ec:ec->27->2:2
tr->ec:ec->28->2:2 agr->agr:agr->30<br>
->2:2 fi->ec:ec->31->2:2 hu->ec:ec->32->2:2
ru->t2a:t2a->34->2:2 uk->t2a:t2a->3<br>
5->3:3 loaded<br>
specials : dvips loaded<br>
systems : system commands are disabled<br>
language : language en is active<br>
specials : loading definition file tpd<br>
(c:/Program Files/texlive/2008/texmf-dist/tex/context/base/spec-tpd.mkii<br>
specials : loading definition file fdf<br>
(c:/Program
Files/texlive/2008/texmf-dist/tex/context/base/spec-fdf.mkii))<br>
regime : regime cp1250 is loaded<br>
(c:/Program
Files/texlive/2008/texmf-dist/tex/context/base/regi-cp1250.mkii)<br>
(./pokus1.tuo) (./pokus1.tuo) (./pokus1.tuo) (./pokus1.tuo)
(./pokus1.tuo)<br>
(./pokus1.tuo) (./pokus1.tuo) (./pokus1.tuo) (./pokus1.tuo)
(./pokus1.tuo)<br>
(./pokus1.tuo) (./pokus1.tuo)<br>
systems : begin file pokus1 at line 23<br>
Dal\dochar {178}\dochar {237} \dochar {176}\dochar {225}dek:<br>
\dochar {250}daj \dochar {163}. 1: 11. \dochar {250}daj \dochar {163}.
2: 112.<br>
\dochar {250}daj \dochar {163}. 3: 15. \dochar {250}daj \dochar {163}.
4: 18.<br>
Dal\dochar {178}\dochar {237} \dochar {176}\dochar {225}dek:<br>
\dochar {250}daj \dochar {163}. 1: 32. \dochar {250}daj \dochar {163}.
2: 4.<br>
\dochar {250}daj \dochar {163}. 3: 9. \dochar {250}daj \dochar {163}.
4: 15.<br>
\dochar {250}daj \dochar {163}. 5: 17. \dochar {250}daj \dochar {163}.
6: 27.<br>
Dal\dochar {178}\dochar {237} \dochar {176}\dochar {225}dek:<br>
\dochar {250}daj \dochar {163}. 1: 142. \dochar {250}daj \dochar {163}.
2: 17.<br>
\dochar {250}daj \dochar {163}. 3: 321. \dochar {250}daj \dochar {163}.
4: 92.<br>
\dochar {250}daj \dochar {163}. 5: 141.<br>
systems : end file pokus1 at line 33<br>
system : cont-err loaded<br>
(c:/Program Files/texlive/2008/texmf-dist/tex/context/base/cont-err.tex<br>
systems : no file 'cont-sys.tex', using 'cont-sys.rme' instead<br>
) )<br>
No pages of output.<br>
Transcript written on pokus1.log.<br>
TeXUtil | parsing file pokus1.tui<br>
TeXUtil | shortcuts : 0<br>
TeXUtil | expansions: 0<br>
TeXUtil | reductions: 0<br>
TeXUtil | divisions : 0<br>
TeXUtil | loaded files: 1<br>
TeXUtil | temporary files: 0<br>
TeXUtil | commands: 8<br>
TeXUtil | programs: 0<br>
TeXUtil | tuo file saved<br>
TeXExec | runtime: 1.462<br>
<br>
<br>
<br>
<br>
<br>
Robert Marik napsal(a):
<blockquote
cite="mid:9d9199c20912120505t6ea8ee7ar5d360e4ef5da6af3@mail.gmail.com"
type="cite">
<pre wrap="">Je ten konec radku nastaven jako aktivni, tak jak je to v TBN? Je
ptoreba aby ho input procesor nezmenil na mezeru (nebo neco takoveho,
TBN ted nemam poruce).
Pekny den. R.M.
2009/12/12 Jaroslav Hajtmar <a class="moz-txt-link-rfc2396E" href="mailto:hajtmar@gyza.cz"><hajtmar@gyza.cz></a>:
</pre>
<blockquote type="cite">
<pre wrap="">Dobry den.
Nevite prosim nekdo, jak nacist cely radek (az do znaku crlf) do parametru
makra?
Priklad:
\def\jedenradek #1\\{Nacteny radek je: #1 \par}
\starttext
\jedenradek Prvni radek\\
\jedenradek Druhy radek\\
\jedenradek Treti radek\\
\stoptext
Nyni bych ale potreboval tohle:
\def\jedenradek #1<crlf>{Nacteny radek je: #1 \par}
\starttext
\jedenradek Prvni radek
\jedenradek Druhy radek
\jedenradek Treti radek
\stoptext
<crlf> je nejaka sekvence, kterou bere ConTeXt jako znak konce radku.
Zkousel jsem ^^M apod. dle TBN, ale nedari se mi to vyresit ani vygooglovat.
To co jsem napsal a potrebuju resit, je jen jakysi minimalni priklad,
normalne bych mohl sice cely zdrojovy text preznackovat a dat na konci radku
nejake ukoncovaci znaky, ale ty puvodni zdrojaky se mi nechce cele kvuli
tomu preznackovavat (byt by to slo v nejakem editoru i pomerne rychle
udelat) - chci stavajici zdrojak zachovat.
DIky a jsem s pozdravem
Jarda Hajtmar
_______________________________________________
csTeX mailing list
<a class="moz-txt-link-abbreviated" href="mailto:csTeX@cs.felk.cvut.cz">csTeX@cs.felk.cvut.cz</a>
<a class="moz-txt-link-freetext" href="http://lists.felk.cvut.cz/mailman/listinfo/cstex">http://lists.felk.cvut.cz/mailman/listinfo/cstex</a>
</pre>
</blockquote>
<pre wrap=""><!---->_______________________________________________
csTeX mailing list
<a class="moz-txt-link-abbreviated" href="mailto:csTeX@cs.felk.cvut.cz">csTeX@cs.felk.cvut.cz</a>
<a class="moz-txt-link-freetext" href="http://lists.felk.cvut.cz/mailman/listinfo/cstex">http://lists.felk.cvut.cz/mailman/listinfo/cstex</a>
</pre>
</blockquote>
<br>
</body>
</html>