lhld height ; načíst pozici postavičky lxi d,i_man ; adresa předlohy postavičky lxi b,64-2 ; konstanta posunu v ose Y ; během kreslení do videoram mvi a,23 ; 23 mikrořádků na výšku loop2: push psw ; uschovat počitadlo mikrořádků ldax d ; načíst bajt předlohy inx d ; a posun na další bajt mov m,a ; zapsat do videoram (X=0) inr l ; a posun na pozici vpravo ldax d ; načíst bajt předlohy inx d ; a posun na další bajt mov m,a ; zapsat do videoram (X=1) inr l ; a posun na pozici vpravo ldax d ; načíst bajt předlohy inx d ; a posun na další bajt mov m,a ; zapsat do videoram (X=2) dad b ; další mikrořádek a X=0 pop psw ; obnovit počitadlo mikrořádků dcr a ; snížit o jeden jnz loop2 ; nebyl poslední => next