Caesar

CAESAR



packer by +GAMA



Caesar funguje pouze a jedině na D40 a je to textově packer,

který texty vlastně nedepakuje, ale krátkou rutinkou si je můžete

číst zapakované. No prostě něco jako Tolkien, kterého se mi v té

době (a přiznám se, že dodnes) nepodařilo ovládnout. Proto

vzniklo něco, co by měl umět používat i idiot mého ražení. Výkon

tahle hračka nemá nic moc (pakování na 50% původní délky, které

George K. u Tolkiena inzeroval, rozhodně nedosáhnete), ale

funguje to...

Soubor TXTDPK.ASM (nebo jak se jmenuje, jméno se asi změnilo při

převodu na PeC) je zdroják do Promíka (diskového), s jehož pomocí

si zapakované texty můžete do omrzení louskat.

Jak se pakuje: nahrajete Caesara (stačí LOAD*"caesar" SCREEN$ :

RANDOMIZE USR 16384), zadejte jméno textu a... nejlépe čekejte,

po dopakování zadejte jméno, pod kterým chcete packát uložit.

Tabulka vystačí, nepletu-li se po letech, na zkrácení libovolného

počtu libovolně se opakujících 128 různých řetězců. Když se

zaplní, s pakováním se končí stejně, jako kdyby se text úplně

spakoval (to kecám, protože je pack časově strašně náročný a

protože se stejně v nadpoloviční většině případů přeplní tabulka,

se text nikdy nespakuje úplně, abych to doprogramval, na to už

nebyly nervy, zvlášť měl-li bych jednotlivé verze zkoušet a

testovat). Momentálně si nejsem vědom existence nějaké chybové

hlášky, asi tam žádná není.

No a teď něco ke struktuře textu: Rozhodně nezkoušejte nativní

text z Desktopu (ani T soubor), text musí být depakovaně a navíc

prost řídících znaků jako jsou nuly a tak. Čeština může být

kódována podle Desktopu. Na psaní takovýchto textů je nejlepší

Livius (kdo ten program nezná?). Ukončovací znak není žádný

(program přece délku souboru sám pozná, ne?). No a víc mne toho

nenapadá, kdyžtak se kochejte tím, jak se pakovaný text zkracuje

ajajajajaj. protože se pack provádí in situ, tedy na místě (jako

u charpressu nebo turboimploderu), můžou se pakovat i texty velmi

dlouhé (ale nepamatuji se užm jak moc dlouhé. Asi to bude

necelých 32767 nebo tak nějak, ale to si zjistěte či vyzkoušejte

sami...). Pack, pack, pack!