Zeď nářků

Podivín

Teda Vladane, nic ve zlým, ale při pohledu na tvé příspěvky se mi vnucuje něco o podivínech :-)). Jinak jsme si tak svinsky představovali, že tým majíci programátora (a že jich je) se na Podivína radostně vrhne a pěkně se vytrestá. Poznatek z testování byl totiž hlavně ten, že na papíře se hodně blbě debagruje…

Podivín

Tak první optimalizace nefunguje … záporné shifty nedělají to co bych chtěl:(. Odladěný kód je: OA QG RZ UQ DW FE %G ZL%G NB LF FG #M H% NV DB EN P? $Y #W EG A

Podivín

Když už vím, co měl program dělat, udělal bych následující mírnou modifikaci kódu: OA QG RZ UQ DW FC YL NB LF FG #M H% NV DB EL P? &Y #W EG A. Nepatrnou nevýhodou je, že eps není konstanta, ale program stále zůstává přehledný :). Příště budu orgům víc věřit …

Podivín

To formátování nějak nevyšlo :(. Asi to nebyl záměr, ale kdybych to programoval, použil bych místo DWFD%GZL%GNB radši DWFCYLNB. (Tak jak to je popsáno níže)

Podivín

Evidentně mám nějakou zkreslenou představu o tom, co se dá hezky přečíst.

Podivín

Teď když se na to dívám, tak to nebylo až tak strašný. Když si to člověk přeloží a mírně optimalizuje, dá se to hezky přečíst:
beta=A const delta=G const eps=Z loop: gamma=[delta=G,be­ta]
alpha=(eps=Z<gam­ma)?B:A
jnz neni_p pism: gamma shiftplus= beta
alpha=B neni_p: (alpha=B)&=beta
jnz odd even: PUSH gamma,gamma
(alpha=B)
jmp loopend odd: POP alpha,alpha
PUSH alpha,gamma loopend: beta–
alpha=V
alpha=(alpha=V)<be­ta?B:A
jnz loop podW: pop alpha,alpha
gamma=?
push alpha,gamma
halt data: GA: H GW:VNZHQ?SOUF

Podivín

Tak nějak to je. Přesně už si to nepamatuju, já to nesestavoval, já to jenom překládal ze svahilištiny do češtiny.

Podivín

Pardon, ještě na sedmém řádku první znak a posledních 10.

Podivín

A je potřeba jen prvních 50 znaků paměti (končí AA).

Podivín

Výpočet trvá 175 kroků, nezapisuje do paměti a nedochází k resetu. (jen nechápu proč ty skoky nejsou dle hodnot, ale dle hodnot+1 a proč push/pop převrací operandy)