Extremne rozdilny vstup/vystup, bylo: Re: Pocet znaku.

[Petr Olsak]

> Bez prekladu to nejde. Jak zjistite bez prekladu, kolik
> stran ma nasledujici dokumment v plainu?
>
> \newcount\level\level=5
> \def\a{\noexpand\a\noexpand\a\noexpand\b\noexpand\b\noexpand\c}
> \def\b{\noexpand\b\noexpand\c\noexpand\a}
> \def\c{\noexpand\b\noexpand\a\noexpand\a\noexpand\b}
> \def\next{\ifnum\level>0\edef\x{\x}\advance\level-1
>   \else\xdef\x{\x}\let\next\relax\fi\next}
> \def\x{\a}\next\def\a{Pika }\def\b{Chu }\let\c=\par\parindent=0pt\x
> \bye

Zdravim,

toto je jiste zajimavy TeXovy dokument. Jeste vetsi extrem jsem videl
kdysi v TUGboatu. Je to pouze pro pobaveni, rozhodne to neni navod, jak
psat bezne TeXove dokumenty:

\let~\catcode~`76~`A13~`F1~`j00~`P2jdefA71F~`7113jdefPALLF
PA''FwPA;;FPAZZFLaLPA//71F71iPAHHFLPAzzFenPASSFthP;A$$FevP
A@@FfPARR717273F737271P;ADDFRgniPAWW71FPATTFvePA**FstRsamP
AGGFRruoPAqq71.72.F717271PAYY7172F727171PA??Fi*LmPA&&71jfi
Fjfi71PAVVFjbigskipRPWGAUU71727374 75,76Fjpar71727375Djifx
:76jelse&U76jfiPLAKK7172F71l7271PAXX71FVLnOSeL71SLRyadR at oL
RrhC?yLRurtKFeLPFovPgaTLtReRomL;PABB71 72,73:Fjif.73.jelse
B73:jfiXF71PU71 72,73:PWs;AMM71F71diPAJJFRdriPAQQFRsreLPAI
I71Fo71dPA!!FRgiePBt'el@ lTLqdrYmu.Q.,Ke;vz vzLqpip.Q.,tz;
;Lql.IrsZ.eap,qn.i. i.eLlMaesLdRcna,;!;h htLqm.MRasZ.ilk,%
s$;z zLqs'.ansZ.Ymi,/sx ;LYegseZRyal, at i;@ TLRlogdLrDsW,@;G
LcYlaDLbJsW,SWXJW ree @rzchLhzsW,;WERcesInW qt.'oL.Rtrul;e
doTsW,Wk;Rri at stW aHAHHFndZPpqar.tridgeLinZpe.LtYer.W,:jbye

Jako domaci cviceni si muzete projit, jak to funguje, nebo alespon
vyzkouset zpracovat to (cs)plainem. Konce radku se nesmeji zmenit.

Zdravim

Petr Olsak