; **************************************************** ; Zápis řádků bude probíhat zprava doleva kvůli ; možnosti použít instrukci PUSH pro zrychlený zápis. ; **************************************************** ; Na konci každého driveru se nastaví číslo nové ; dvojice mikrořádků (udává se číslo prvního, sudého ; mikrořádku z dvojice) a adresa driveru této dvojice. ; Číslo mikrořádku je jeho fyzická výška na obrazovce ; PMD-85, počítáno shora v rozsahu 0..255. ; **************************************************** ; řazení dvojřádků cesty shora dolů je následující: ; LINE #7 (dvojřádky 130/132) ; LINE #6 (dvojřádky 134-140) ; LINE #5 (dvojřádky 142-150) ; LINE #4 (dvojřádky 152-164) ; LINE #3 (dvojřádky 166-184) předpočítávají se přechody ; LINE #2 (dvojřádky 186-212) předpočítávají se přechody ; LINE #1 (dvojřádky 214-254) předpočítávají se přechody ; ******************************************************* ; obsluha mikrořádků 130/131 ; délka 239T ; ******************************************************* ; pouze tento driver se vyplatí dělat přes klasiku STAX D ; ostatní drivery jsou již rychlejší s instrukcemi PUSH ; ******************************************************* lin130: lxi d,0e098h ; adresa pravého konce mikrořádku lhld colr70 ; H = textura a barva pásů A-C-E ; L = textura a barva pásů B-D mvi a,0d9h ; pravý koncový bajt mikrořádku 130 ana h mov b,a mvi a,0c6h ana l ora b stax d dcx d mvi a,0e6h ana h mov c,a mvi a,0d8h ana l ora c stax d ; levý koncový bajt mikrořádku 130 lhld colr71 ; nyní totéž pro mikrořádek 131 lxi d,0e0d8h mvi a,0f3h ana h mov b,a mvi a,0cch ana l ora b stax d dcx d stax d mvi a,226 ; další dvojice mikrořádků sta linhei lxi h,lin226 ; adresa následujícího řádkového driveru shld shfstd+1 ; (významově souvisí s proměnnou linhei) lxi sp,STACK-2 ; obnovit SP (všechna volání driverů ret ; ************************** ; obsluha mikrořádků 132/133 ; délka 339T ; ************************** lin132: lxi sp,0e11ah lhld colr70 ; H = ACE, L = BD mvi a,0c1h ; mikrořádek 132 ana h mov b,a mvi a,0f3h ana h mov c,a mvi a,0cch ana l ora c mov c,a push b mov b,c mvi a,0e0h ana h mov c,a push b lhld colr71 ; H = ACE, L = BD lxi sp,0e15ah mvi a,0c3h ; mikrořádek 133 ana h mov b,a mvi a,0e3h ana h mov c,a mvi a,0dch ana l ora c mov c,a push b mvi a,0f1h ana h mov b,a mvi a,0ceh ana l ora b mov b,a mvi a,0f0h ana h mov c,a push b mvi a,246 ; další dvojice mikrořádků sta linhei lxi h,lin246 ; další driver shld shfstd+1 lxi sp,STACK-2 ; obnovit SP (všechna volání driverů ret ; jsou upravena tak, aby volala ; ze stejné hloubky zásobníku) ; ************************** ; obsluha mikrořádků 134/135 ; délka 370T ; ************************** lin134: lxi sp,0e19ah lhld colr60 ; H = ACE, L = BD mvi a,0c7h ; mikrořádek 134 ana h mov b,a mvi a,0e3h ana h mov c,a mvi a,0dch ana l ora c mov c,a push b mvi a,0f1h ana h mov b,a mvi a,0ceh ana l ora b mov b,a mvi a,0f8h ana h mov c,a push b lhld colr61 ; H = ACE, L = BD lxi sp,0e1dah mvi a,0cfh ; mikrořádek 135 ana h mov b,a mvi a,0c3h ana h mov c,a mvi a,0fch ana l ora c mov c,a push b mvi a,0f0h ana h mov b,a mvi a,0cfh ana l ora b mov b,a mvi a,0fch ana h mov c,a push b mvi a,218 ; další dvojice mikrořádků sta linhei lxi h,lin218 ; další driver shld shfstd+1 lxi sp,STACK-2 jmp nxmicf ; nová fáze míče ; ************************** ; obsluha mikrořádků 136/137 ; délka 450T ; ************************** lin136: lxi sp,0e21ah lhld colr60 ; H = ACE, L = BD mvi a,0deh ; mikrořádek 136 ana h mov b,a mvi a,0c1h ana l ora b mov b,a mvi a,0c7h ana h mov c,a mvi a,0f8h ana l ora c mov c,a push b mvi a,0f8h ana h mov b,a mvi a,0c7h ana l ora b mov b,a mvi a,0deh ana h mov c,a mvi a,0e0h ana l ora c mov c,a push b lhld colr61 ; H = ACE, L = BD lxi sp,0e25ah mvi a,0feh ; mikrořádek 137 ana h mov b,a mvi a,0c1h ana l ora b mov b,a mvi a,0c7h ana h mov c,a mvi a,0f8h ana l ora c mov c,a push b mvi a,0f8h ana h mov b,a mvi a,0c7h ana l ora b mov b,a mvi a,0dfh ana h mov c,a mvi a,0e0h ana l ora c mov c,a push b mvi a,228 ; další dvojice mikrořádků sta linhei lxi h,lin228 ; další driver shld shfstd+1 lxi sp,STACK-2 jmp nxmicf ; nová fáze míče ; ************************** ; obsluha mikrořádků 138/139 ; délka 536T ; ************************** lin138: lxi sp,0e29bh lhld colr60 ; H = ACE, L = BD mvi a,0c1h ; mikrořádek 138 ana h mov b,a mvi a,0fch ana h mov c,a mvi a,0c3h ana l ora c mov c,a push b mvi a,0c7h ana h mov b,a mvi a,0f8h ana l ora b mov b,a mvi a,0f8h ana h mov c,a mvi a,0c7h ana l ora c mov c,a push b mvi a,0cfh ana h mov b,a mvi a,0f0h ana l ora b mov b,a mvi a,0e0h ana h mov c,a push b lhld colr61 ; H = ACE, L = BD lxi sp,0e2dbh mvi a,0c3h ; mikrořádek 139 ana h mov b,a mvi a,0fch ana h mov c,a mvi a,0c3h ana l ora c mov c,a push b mvi a,0c7h ana h mov b,a mvi a,0f8h ana l ora b mov b,a mvi a,0f8h ana h mov c,a mvi a,0c7h ana l ora c mov c,a push b mvi a,0cfh ana h mov b,a mvi a,0f0h ana l ora b mov b,a mvi a,0f0h ana h mov c,a push b mvi a,238 ; další dvojice mikrořádků sta linhei lxi h,lin238 ; další driver shld shfstd+1 lxi sp,STACK-2 jmp nxmicf ; nová fáze míče ; ************************** ; obsluha mikrořádků 140/141 ; délka 432T ; ************************** lin140: lxi sp,0e31bh lhld colr60 ; H = ACE, L = BD mvi a,0c7h ; mikrořádek 140 ana h mov b,a mvi a,0f8h ana h mov c,a mvi a,0c7h ana l ora c mov c,a push b mvi a,0f8h ana l ora b mov b,a push b mvi a,0f8h ana h mov c,a push b lhld colr61 ; H = ACE, L = BD lxi sp,0e35bh mvi a,0cfh ; mikrořádek 141 ana h mov b,a mvi a,0f0h ana h mov c,a mvi a,0cfh ana l ora c mov c,a push b mvi a,0f0h ana l ora b mov b,a mvi a,0fch ana h mov c,a mvi a,0c3h ana l ora c mov c,a push b mvi a,0c3h ana h mov b,a mvi a,0fch ana l ora b mov b,a mvi a,0fch ana h mov c,a push b mvi a,248 ; další dvojice mikrořádků sta linhei lxi h,lin248 ; další driver shld shfstd+1 lxi sp,STACK-2 jmp nxmicf ; nová fáze míče ; ************************** ; obsluha mikrořádků 142/143 ; délka 514T ; ************************** lin142: lxi sp,0e39bh lhld colr50 ; H = ACE, L = BD mvi a,0dfh ; mikrořádek 142 ana h mov b,a mvi a,0f0h ana h mov c,a mvi a,0cfh ana l ora c mov c,a push b mvi a,0cfh ana h mov b,a mvi a,0f0h ana l ora b mov b,a mvi a,0fch ana h mov c,a mvi a,0c3h ana l ora c mov c,a push b mvi a,0c3h ana h mov b,a mvi a,0fch ana l ora b mov b,a mvi a,0feh ana h mov c,a push b lhld colr51 ; H = ACE, L = BD lxi sp,0e3dbh mov b,h ; mikrořádek 143 mvi a,0e0h ana h mov c,a mvi a,0dfh ana l ora c mov c,a push b mvi a,0cfh ana h mov b,a mvi a,0f0h ana l ora b mov b,a mvi a,0fch ana h mov c,a mvi a,0c3h ana l ora c mov c,a push b mvi a,0c1h ana h mov b,a mvi a,0feh ana l ora b mov b,a mov c,h push b mvi a,222 ; další dvojice mikrořádků sta linhei lxi h,lin222 ; další driver shld shfstd+1 lxi sp,STACK-2 ret ; ************************** ; obsluha mikrořádků 144/145 ; délka 516T ; ************************** lin144: lxi sp,0e41ch lhld colr50 ; H = ACE, L = BD mvi a,0c1h ; mikrořádek 144 ana h mov b,a mov c,h push b mvi a,0e0h ana h mov b,a mvi a,0dfh ana l ora b mov b,a mvi a,0cfh ana h mov c,a mvi a,0f0h ana l ora c mov c,a push b mvi a,0fch ana h mov b,a mvi a,0c3h ana l ora b mov b,a mvi a,0c1h ana h mov c,a mvi a,0feh ana l ora c mov c,a push b mov b,h mvi a,0e0h ana h mov c,a push b lhld colr51 ; H = ACE, L = BD lxi sp,0e45ch mvi a,0c3h ; mikrořádek 145 ana h mov b,a mov c,h push b mov b,l mvi a,0cfh ana h mov c,a mvi a,0f0h ana l ora c mov c,a push b mvi a,0fch ana h mov b,a mvi a,0c3h ana l ora b mov b,a mov c,l push b mov b,h mvi a,0f0h ana h mov c,a push b mvi a,230 ; další dvojice mikrořádků sta linhei lxi h,lin230 ; další driver shld shfstd+1 lxi sp,STACK-2 ret ; ************************** ; obsluha mikrořádků 146/147 ; délka 434T ; ************************** lin146: lxi sp,0e49ch lhld colr50 ; H = ACE, L = BD mvi a,0c7h ; mikrořádek 146 ana h mov b,a mvi a,0feh ana h mov c,a mvi a,0c1h ana l ora c mov c,a push b mov d,l mvi a,0dfh ana h mov e,a mvi a,0e0h ana l ora e mov e,a push d mov b,c mov c,l push b mov d,e mvi a,0f8h ana h mov e,a push d lhld colr51 ; H = ACE, L = BD lxi sp,0e4dch mvi a,0cfh ; mikrořádek 147 ana h mov b,a mvi a,0feh ana h mov c,a mvi a,0c1h ana l ora c mov c,a push b mov d,l mvi a,0dfh ana h mov e,a mvi a,0e0h ana l ora e mov e,a push d mov b,c mov c,l push b mov d,e mvi a,0fch ana h mov e,a push d mvi a,138 ; další dvojice mikrořádků sta linhei lxi h,lin138 ; další driver shld shfstd+1 lxi sp,STACK-2 ret ; ************************** ; obsluha mikrořádků 148/149 ; délka 536T ; ************************** lin148: lxi sp,0e51ch lhld colr50 ; H = ACE, L = BD mvi a,0dfh ; mikrořádek 148 ana h mov b,a mvi a,0fch ana h mov c,a mvi a,0c3h ana l ora c mov c,a push b mov b,l mvi a,0dfh ana h mov c,a mvi a,0e0h ana l ora c mov c,a push b mvi a,0feh ana h mov b,a mvi a,0c1h ana l ora b mov b,a mov c,l push b mvi a,0cfh ana h mov b,a mvi a,0f0h ana l ora b mov b,a mvi a,0feh ana h mov c,a push b lhld colr51 ; H = ACE, L = BD lxi sp,0e55ch mov b,h ; mikrořádek 149 mvi a,0fch ana h mov c,a mvi a,0c3h ana l ora c mov c,a push b mov b,l mvi a,0dfh ana h mov c,a mvi a,0e0h ana l ora c mov c,a push b mvi a,0feh ana h mov b,a mvi a,0c1h ana l ora b mov b,a mov c,l push b mvi a,0cfh ana h mov b,a mvi a,0f0h ana l ora b mov b,a mov c,h push b mvi a,132 ; další dvojice mikrořádků sta linhei lxi h,lin132 ; další driver shld shfstd+1 lxi sp,STACK-2 ret ; ************************** ; obsluha mikrořádků 150/151 ; délka 517T ; ************************** lin150: lxi sp,0e59dh lhld colr50 ; H = ACE, L = BD mvi a,0c1h ; mikrořádek 150 ana h mov b,a mov c,h push b mvi a,0f8h ana h mov b,a mvi a,0c7h ana l ora b mov b,a mov c,l push b mvi a,0dfh ana h mov b,a mvi a,0e0h ana l ora b mov b,a mvi a,0feh ana h mov c,a mvi a,0c1h ana l ora c mov c,a push b mov b,l mvi a,0c7h ana h mov c,a mvi a,0f8h ana l ora c mov c,a push b mov b,h mvi a,0e0h ana h mov c,a push b lhld colr51 ; H = ACE, L = BD lxi sp,0e5ddh mvi a,0c3h ; mikrořádek 151 ana h mov b,a mov c,h push b mvi a,0f0h ana h mov d,a mvi a,0cfh ana l ora d mov d,a mov e,l push d mov d,h mov e,h push d mvi a,0fch ana l ora b mov c,a mov b,l push b mvi a,0f0h ana h mov e,a push d mvi a,254 ; další dvojice mikrořádků sta linhei lxi h,lin254 ; další driver shld shfstd+1 lxi sp,STACK-2 ret ; ************************** ; obsluha mikrořádků 152/153 ; délka 476T ; ************************** lin152: lxi sp,0e61dh lhld colr40 ; H = ACE, L = BD mvi a,0c7h ; mikrořádek 152 ana h mov b,a mov c,h push b mvi a,0f0h ana h mov d,a mvi a,0cfh ana l ora d mov d,a mov e,l push d mov b,h push b mov d,l mvi a,0c3h ana h mov e,a mvi a,0fch ana l ora e mov e,a push d mvi a,0f8h ana h mov c,a push b lhld colr41 ; H = ACE, L = BD lxi sp,0e65dh mvi a,0cfh ; mikrořádek 153 ana h mov b,a mov c,h push b mvi a,0e0h ana h mov d,a mvi a,0dfh ana l ora d mov d,a mov e,l push d mov b,h push b mov d,l mvi a,0c1h ana h mov e,a mvi a,0feh ana l ora e mov e,a push d mvi a,0fch ana h mov c,a push b mvi a,220 ; další dvojice mikrořádků sta linhei lxi h,lin220 ; další driver shld shfstd+1 lxi sp,STACK-2 ret ; ************************** ; obsluha mikrořádků 154/155 ; délka 352T ; ************************** lin154: lhld colr40 ; H = ACE, L = BD lxi sp,0e69dh mvi a,0dfh ; mikrořádek 154 ana h mov b,a mov c,h push b mvi a,0e0h ana h mov d,a mvi a,0dfh ana l ora d mov d,a mov e,l push d mov b,h push b mov d,l mvi a,0c1h ana h mov e,a mvi a,0feh ana l ora e mov e,a push d mvi a,0feh ana h mov c,a push b lhld colr41 ; H = ACE, L = BD lxi sp,0e6ddh mov b,h ; mikrořádek 155 mov c,h push b mov d,l mov e,l push d push b push d push b mvi a,130 ; další dvojice mikrořádků sta linhei lxi h,lin130 ; další driver shld shfstd+1 lxi sp,STACK-2 ret ; ************************** ; obsluha mikrořádků 156/157 ; délka 631T ; ************************** lin156: lhld colr40 ; H = ACE, L = BD lxi sp,0e71eh mvi a,0c1h ; mikrořádek 156 ana h mov b,a mov c,h push b mvi a,0feh ana h mov d,a mvi a,0c1h ana l ora d mov d,a mov e,l push d mvi a,0feh ana l ora b mov b,a push b mov b,h mvi a,0e0h ana h mov c,a mvi a,0dfh ana l ora c mov c,a push b mov d,l mvi a,0dfh ana h mov e,a mvi a,0e0h ana l ora e mov e,a push d mvi a,0e0h ana h mov c,a push b lhld colr41 ; H = ACE, L = BD lxi sp,0e75eh mvi a,0c3h ; mikrořádek 157 ana h mov b,a mov c,h push b mvi a,0feh ana h mov b,a mvi a,0c1h ana l ora b mov b,a mov c,l push b mvi a,0c1h ana h mov b,a mvi a,0feh ana l ora b mov b,a mov c,h push b mov b,h mvi a,0e0h ana h mov c,a mvi a,0dfh ana l ora c mov c,a push b mov d,l mvi a,0dfh ana h mov e,a mvi a,0e0h ana l ora e mov e,a push d mvi a,0f0h ana h mov c,a push b mvi a,232 ; další dvojice mikrořádků sta linhei lxi h,lin232 ; další driver shld shfstd+1 lxi sp,STACK-2 ret ; ************************** ; obsluha mikrořádků 158/159 ; délka 611T ; ************************** lin158: lhld colr40 ; H = ACE, L = BD lxi sp,0e79eh mvi a,0c7h ; mikrořádek 158 ana h mov b,a mov c,h push b mvi a,0fch ana h mov d,a mvi a,0c3h ana l ora d mov d,a mov e,l push d mvi a,0c1h ana h mov b,a mvi a,0feh ana l ora b mov b,a push b mov b,h mvi a,0e0h ana h mov c,a mvi a,0dfh ana l ora c mov c,a push b mov d,l mvi a,0cfh ana h mov e,a mvi a,0f0h ana l ora e mov e,a push d mvi a,0f8h ana h mov c,a push b lhld colr41 ; H = ACE, L = BD lxi sp,0e7deh mvi a,0cfh ; mikrořádek 159 ana h mov b,a mov c,h push b mvi a,0fch ana h mov d,a mvi a,0c3h ana l ora d mov d,a mov e,l push d mvi a,0c1h ana h mov d,a mvi a,0feh ana l ora d mov d,a mov e,h push d mov d,h mvi a,0e0h ana h mov e,a mvi a,0dfh ana l ora e mov e,a push d mvi a,0f0h ana l ora b mov c,a mov b,l push b mvi a,0fch ana h mov e,a push d mvi a,146 ; další dvojice mikrořádků sta linhei lxi h,lin146 ; další driver shld shfstd+1 lxi sp,STACK-2 ret ; ************************** ; obsluha mikrořádků 160/161 ; délka 620T ; ************************** lin160: lhld colr40 ; H = ACE, L = BD lxi sp,0e81eh mvi a,0dfh ; mikrořádek 160 ana h mov b,a mov c,h push b mvi a,0f8h ana h mov d,a mvi a,0c7h ana l ora d mov d,a mov e,l push d mvi a,0c1h ana h mov b,a mvi a,0feh ana l ora b mov b,a push b mov b,h mvi a,0e0h ana h mov c,a mvi a,0dfh ana l ora c mov c,a push b mov d,l mvi a,0c7h ana h mov e,a mvi a,0f8h ana l ora e mov e,a push d mvi a,0feh ana h mov c,a push b lhld colr41 ; H = ACE, L = BD lxi sp,0e85eh mov d,h ; mikrořádek 161 mov e,h push d mvi a,0f0h ana h mov b,a mvi a,0cfh ana l ora b mov b,a mov c,l push b mvi a,0c3h ana h mov b,a mvi a,0fch ana l ora b mov b,a mov c,h push b mov b,h mvi a,0f0h ana h mov c,a mvi a,0cfh ana l ora c mov c,a push b mov b,l mvi a,0c3h ana h mov c,a mvi a,0fch ana l ora c mov c,a push b push d mvi a,244 ; další dvojice mikrořádků sta linhei lxi h,lin244 ; další driver shld shfstd+1 lxi sp,STACK-2 ret ; ************************** ; obsluha mikrořádků 162/163 ; délka 642T ; ************************** lin162: lhld colr40 ; H = ACE, L = BD lxi sp,0e89fh mvi a,0c1h ; mikrořádek 162 ana h mov b,a mov c,h push b mov b,h mvi a,0f0h ana h mov c,a mvi a,0cfh ana l ora c mov c,a push b mov d,l mvi a,0c3h ana h mov e,a mvi a,0fch ana l ora e mov e,a push d mov d,h mov e,h push d mov b,c mov c,l push b mvi a,0c3h ana h mov b,a mvi a,0fch ana l ora b mov b,a mov c,h push b mvi a,0e0h ana h mov e,a push d lhld colr41 ; H = ACE, L = BD lxi sp,0e8dfh mvi a,0c3h ; mikrořádek 163 ana h mov b,a mov c,h push b mov d,h mvi a,0e0h ana h mov e,a mvi a,0dfh ana l ora e mov e,a push d mvi a,0fch ana l ora b mov c,a mov b,l push b mov e,h push d mvi a,0f0h ana h mov b,a mvi a,0cfh ana l ora b mov b,a mov c,l push b mvi a,0c1h ana h mov d,a mvi a,0feh ana l ora d mov d,a push d mov b,h mvi a,0f0h ana h mov c,a push b mvi a,250 ; další dvojice mikrořádků sta linhei lxi h,lin250 ; další driver shld shfstd+1 lxi sp,STACK-2 ret ; ************************** ; obsluha mikrořádků 164/165 ; délka 602T ; ************************** lin164: lhld colr40 ; H = ACE, L = BD lxi sp,0e91fh mvi a,0c7h ; mikrořádek 164 ana h mov b,a mov c,h push b mov d,h mvi a,0e0h ana h mov e,a mvi a,0dfh ana l ora e mov e,a push d mov d,l mvi a,0c3h ana h mov e,a mvi a,0fch ana l ora e mov e,a push d mov b,h push b mvi a,0f0h ana h mov d,a mvi a,0cfh ana l ora d mov d,a mov e,l push d mvi a,0c1h ana h mov b,a mvi a,0feh ana l ora b mov b,a push b mvi a,0f8h ana h mov l,a push h lhld colr41 ; H = ACE, L = BD lxi sp,0e95fh mvi a,0cfh ; mikrořádek 165 ana h mov b,a mov c,h push b push h mov d,l mvi a,0c3h ana h mov e,a mvi a,0fch ana l ora e mov e,a push d mov b,h push b mvi a,0f0h ana h mov d,a mvi a,0cfh ana l ora d mov d,a mov e,l push d mov b,l push b mvi a,0fch ana h mov l,a push h l164sp: lxi sp,STACK-2 ; obnovit SP mvi a,214 ; další dvojice mikrořádků sta linhei lxi h,lin214 ; další driver shld shfstd+1 jmp nxtdla ; poslední mikrořádek => ; přisunout další řadu dlaždic ; ************************** ; obsluha mikrořádků 166/167 ; délka 513T ; ************************** lin166: lxi sp,0e99fh lhld colr30 ; H = ACE, L = BD mvi a,0dfh ; mikrořádek 166 ana h mov b,a mov c,h push b lda c30b1a5 mov d,a mov e,l push d mov d,l lda c30a3b3 mov e,a push d mov b,h push b lda c30b3a3 mov b,a mov c,l push b mov b,l lda c30a5b1 mov c,a push b mvi a,0feh ana h mov l,a push h lxi sp,0e9dfh lhld colr31 ; H = ACE, L = BD mov b,h ; mikrořádek 167 mov c,h push b lda c31b1a5 mov d,a mov e,l push d mov d,l lda c31a3b3 mov e,a push d push b lda c31b3a3 mov b,a mov c,l push b mov b,l lda c31a5b1 mov c,a push b mov l,h push h l166sp: lxi sp,STACK-2 ; obnovit SP mvi a,216 ; další dvojice mikrořádků sta linhei lxi h,lin216 ; další driver shld shfstd+1 ret ; ************************** ; obsluha mikrořádků 168/169 ; délka 552T ; ************************** lin168: lxi sp,0ea20h lhld colr30 ; H = ACE, L = BD mvi a,0c1h ; mikrořádek 168 ana h mov b,a mov c,h push b mov b,h lda c30b2a4 mov c,a push b mov d,l mov e,l push d lda c30a3b3 mov b,a mov c,h push b mov b,h lda c30b3a3 mov c,a push b push d lda c30a4b2 mov b,a mov c,h push b mvi a,0e0h ana h mov l,a push h lxi sp,0ea60h lhld colr31 ; H = ACE, L = BD mvi a,0c3h ; mikrořádek 169 ana h mov b,a mov c,h push b mov b,h lda c31b2a4 mov c,a push b mov d,l mov e,l push d lda c31a3b3 mov b,a mov c,h push b mov b,h lda c31b3a3 mov c,a push b push d lda c31a4b2 mov b,a mov c,h push b mvi a,0f0h ana h mov l,a push h l168sp: lxi sp,STACK-2 mvi a,152 ; další dvojice mikrořádků sta linhei lxi h,lin152 ; další driver shld shfstd+1 ret ; ************************** ; obsluha mikrořádků 170/171 ; délka 572T ; ************************** lin170: lxi sp,0eaa0h lhld colr30 ; H = ACE, L = BD mvi a,0c7h ; mikrořádek 170 ana h mov b,a mov c,h push b mov b,h lda c30b3a3 mov c,a push b mov d,l mov e,l push d lda c30a3b3 mov b,a mov c,h push b mov b,h lda c30b3a3 mov c,a push b push d lda c30a3b3 mov b,a mov c,h push b mvi a,0f8h ana h mov l,a push h lxi sp,0eae0h lhld colr31 ; H = ACE, L = BD mvi a,0cfh ; mikrořádek 171 ana h mov b,a mov c,h push b mov b,h lda c31b4a2 mov c,a push b mov d,l mov e,l push d lda c31a4b2 mov b,a mov c,h push b mov b,h lda c31b2a4 mov c,a push b push d lda c31a2b4 mov b,a mov c,h push b mvi a,0fch ana h mov l,a push h l170sp: lxi sp,STACK-2 ; obnova SP mvi a,224 ; další dvojice mikrořádků sta linhei lxi h,lin224 ; další driver shld shfstd+1 ret ; ************************** ; obsluha mikrořádků 172/173 ; délka 525T ; ************************** lin172: lxi sp,0eb20h lhld colr30 ; H = ACE, L = BD mvi a,0dfh ; mikrořádek 172 ana h mov b,a mov c,h push b mov b,h lda c30b4a2 mov c,a push b mov d,l mov e,l push d lda c30a4b2 mov b,a mov c,h push b mov b,h lda c30b2a4 mov c,a push b push d lda c30a2b4 mov b,a mov c,h push b mvi a,0feh ana h mov l,a push h lxi sp,0eb60h lhld colr31 ; H = ACE, L = BD mov b,h ; mikrořádek 173 mov c,h push b lda c31b5a1 mov c,a push b mov d,l mov e,l push d lda c31a4b2 mov b,a mov c,h push b mov b,h lda c31b2a4 mov c,a push b push d lda c31a1b5 mov b,a mov c,h push b mov l,h push h l172sp: lxi sp,STACK-2 ; obnova SP mvi a,136 ; další dvojice mikrořádků sta linhei lxi h,lin136 ; další driver shld shfstd+1 ret ; ************************** ; obsluha mikrořádků 174/175 ; délka 553T ; ************************** lin174: lxi sp,0eba1h lhld colr30 ; H = ACE, L = BD mvi a,0c1h ; mikrořádek 174 ana h mov b,a mov c,h push b mov d,h mov e,h push d lda c30b5a1 mov b,a mov c,l push b mov b,l lda c30a4b2 mov c,a push b push d lda c30b2a4 mov b,a mov c,l push b mov b,l lda c30a1b5 mov c,a push b push d mvi a,0e0h ana h mov l,a push h lxi sp,0ebe1h lhld colr31 ; H = ACE, L = BD mvi a,0c3h ; mikrořádek 175 ana h mov b,a mov c,h push b mov b,h push b mov d,l mov e,l push d mov b,l lda c31a4b2 mov c,a push b mov b,h mov c,h push b lda c31b2a4 mov b,a mov c,l push b push d mov b,h mov c,h push b mvi a,0f0h ana h mov l,a push h l174sp: lxi sp,STACK-2 ; obnova SP mvi a,156 ; další dvojice mikrořádků sta linhei lxi h,lin156 ; další driver shld shfstd+1 ret ; ************************** ; obsluha mikrořádků 176/177 ; délka 614T ; ************************** lin176: lxi sp,0ec21h lhld colr30 ; H = ACE, L = BD mvi a,0c7h ; mikrořádek 176 ana h mov b,a mov c,h push b mov b,h lda c30b1a5 mov c,a push b mov d,l mov e,l push d mov b,l lda c30a5b1 mov c,a push b mov b,h mov c,h push b lda c30b1a5 mov b,a mov c,l push b push d lda c30a5b1 mov b,a mov c,h push b mvi a,0f8h ana h mov l,a push h lxi sp,0ec61h lhld colr31 ; H = ACE, L = BD mvi a,0cfh ; mikrořádek 177 ana h mov b,a mov c,h push b mov b,h lda c31b1a5 mov c,a push b mov d,l mov e,l push d mov b,l lda c31a5b1 mov c,a push b mov b,h mov c,h push b lda c31b1a5 mov b,a mov c,l push b push d lda c31a5b1 mov b,a mov c,h push b mvi a,0fch ana h mov l,a push h l176sp: lxi sp,STACK-2 ; obnova SP mvi a,236 ; další dvojice mikrořádků sta linhei lxi h,lin236 ; další driver shld shfstd+1 ret ; ************************** ; obsluha mikrořádků 178/179 ; délka 587T ; ************************** lin178: lxi sp,0eca1h lhld colr30 ; H = ACE, L = BD mvi a,0dfh ; mikrořádek 178 ana h mov b,a mov c,h push b mov b,h lda c30b2a4 mov c,a push b mov d,l mov e,l push d mov b,l lda c30a5b1 mov c,a push b mov b,h mov c,h push b lda c30b1a5 mov b,a mov c,l push b push d lda c30a4b2 mov b,a mov c,h push b mvi a,0feh ana h mov l,a push h lxi sp,0ece1h lhld colr31 ; H = ACE, L = BD mov b,h ; mikrořádek 179 mov c,h push b lda c31b2a4 mov c,a push b mov d,l mov e,l push d lda c31a5b1 mov c,a mov b,l push b mov b,h mov c,h push b lda c31b1a5 mov b,a mov c,l push b push d lda c31a4b2 mov b,a mov c,h push b mov l,h push h l178sp: lxi sp,STACK-2 ; obnova SP mvi a,240 ; další dvojice mikrořádků sta linhei lxi h,lin240 ; další driver shld shfstd+1 ret ; ************************** ; obsluha mikrořádků 180/181 ; délka 560T ; ************************** lin180: lxi sp,0ed22h lhld colr30 ; H = ACE, L = BD mvi a,0c1h ; mikrořádek 180 ana h mov b,a mov c,h push b mov b,h push b lda c30b3a3 mov b,a mov c,l push b mov b,l push b lda c30a5b1 mov d,a mov e,h push d lda c30b1a5 mov e,a mov d,h push d push b lda c30a3b3 mov c,a push b mov b,h mov c,h push b mvi a,0e0h ana h mov l,a push h lxi sp,0ed62h lhld colr31 ; H = ACE, L = BD mvi a,0c3h ; mikrořádek 181 ana h mov b,a mov c,h push b mov b,h push b lda c31b4a2 mov b,a mov c,l push b mov b,l push b mov d,h mov e,h push d push d push b lda c31a2b4 mov c,a push b push d mvi a,0f0h ana h mov l,a push h l180sp: lxi sp,STACK-2 ; obnova SP mvi a,160 ; další dvojice mikrořádků sta linhei lxi h,lin160 ; další driver shld shfstd+1 ret ; ************************** ; obsluha mikrořádků 182/183 ; délka 514T ; ************************** lin182: lxi sp,0eda2h lhld colr30 ; H = ACE, L = BD mvi a,0c7h ; mikrořádek 182 ana h mov b,a mov c,h push b mov b,h push b lda c30b4a2 mov b,a mov c,l push b mov b,l push b mov d,h mov e,h push d push d push b lda c30a2b4 mov c,a push b push d mvi a,0f8h ana h mov l,a push h lxi sp,0ede2h lhld colr31 ; H = ACE, L = BD mvi a,0cfh ; mikrořádek 183 ana h mov b,a mov c,h push b mov b,h push b lda c31b5a1 mov b,a mov c,l push b mov b,l push b mov d,h mov e,h push d push d push b lda c31a1b5 mov c,a push b push d mvi a,0fch ana h mov l,a push h l182sp: lxi sp,STACK-2 ; obnova SP mvi a,140 ; další dvojice mikrořádků sta linhei lxi h,lin140 ; další driver shld shfstd+1 ret ; ************************** ; obsluha mikrořádků 184/185 ; délka 476T ; ************************** lin184: lxi sp,0ee22h lhld colr30 ; H = ACE, L = BD mvi a,0dfh ; mikrořádek 184 ana h mov b,a mov c,h push b mov b,h push b lda c30b5a1 mov b,a mov c,l push b mov d,l mov e,l push d mov b,h mov c,h push b push b push d mov b,l lda c30a1b5 mov c,a push b mov b,h mov c,h push b mvi a,0feh ana h mov l,a push h lxi sp,0ee62h lhld colr31 ; H = ACE, L = BD mov b,h ; mikrořádek 185 mov c,h push b push b mov d,l mov e,l push d push d push b push b push d push d push b push b l184sp: lxi sp,STACK-2 ; obnova SP mvi a,252 ; další dvojice mikrořádků sta linhei lxi h,lin252 ; další driver shld shfstd+1 ret ; ************************** ; obsluha mikrořádků 186/187 ; délka 638T ; ************************** lin186: lxi sp,0eea3h lhld colr20 ; H = ACE, L = BD mvi a,0c1h ; mikrořádek 186 ana h mov b,a mov c,h push b mov d,h mov e,h push d lda c20b1a5 mov b,a mov c,l push b mov b,l push b lda c20a1b5 mov b,a mov c,h push b push d mov b,h lda c20b5a1 mov c,a push b mov b,l mov c,l push b lda c20a5b1 mov c,a push b push d mvi a,0e0h ana h mov l,a push h lxi sp,0eee3h lhld colr21 ; H = ACE, L = BD mvi a,0c3h ; mikrořádek 187 ana h mov b,a mov c,h push b mov d,h mov e,h push d lda c21b1a5 mov b,a mov c,l push b mov b,l push b lda c21a1b5 mov b,a mov c,h push b push d mov b,h lda c21b5a1 mov c,a push b mov b,l mov c,l push b lda c21a5b1 mov c,a push b push d mvi a,0f0h ana h mov l,a push h l186sp: lxi sp,STACK-2 ; obnova SP mvi a,166 ; další dvojice mikrořádků sta linhei lxi h,lin166 ; další driver shld shfstd+1 ret ; ************************** ; obsluha mikrořádků 188/189 ; délka 638T ; ************************** lin188: lxi sp,0ef23h lhld colr20 ; H = ACE, L = BD mvi a,0c7h ; mikrořádek 188 ana h mov b,a mov c,h push b mov d,h mov e,h push d lda c20b2a4 mov b,a mov c,l push b mov b,l push b lda c20a1b5 mov b,a mov c,h push b push d mov b,h lda c20b5a1 mov c,a push b mov b,l mov c,l push b lda c20a4b2 mov c,a push b push d mvi a,0f8h ana h mov l,a push h lxi sp,0ef63h lhld colr21 ; H = ACE, L = BD mvi a,0cfh ; mikrořádek 189 ana h mov b,a mov c,h push b mov d,h mov e,h push d lda c21b2a4 mov b,a mov c,l push b mov b,l push b lda c21a1b5 mov b,a mov c,h push b push d mov b,h lda c21b5a1 mov c,a push b mov b,l mov c,l push b lda c21a4b2 mov c,a push b push d mvi a,0fch ana h mov l,a push h l188sp: lxi sp,STACK-2 ; obnova SP mvi a,134 ; další dvojice mikrořádků sta linhei lxi h,lin134 ; další driver shld shfstd+1 ret ; ************************** ; obsluha mikrořádků 190/191 ; délka 601T ; ************************** lin190: lxi sp,0efa3h lhld colr20 ; H = ACE, L = BD mvi a,0dfh ; mikrořádek 190 ana h mov b,a mov c,h push b mov d,h mov e,h push d lda c20b3a3 mov b,a mov c,l push b mov b,l push b lda c20a1b5 mov b,a mov c,h push b push d mov b,h lda c20b5a1 mov c,a push b mov b,l mov c,l push b lda c20a3b3 mov c,a push b push d mvi a,0feh ana h mov l,a push h lxi sp,0efe3h lhld colr21 ; H = ACE, L = BD mov d,h ; mikrořádek 191 mov e,h push d push d lda c21b4a2 mov b,a mov c,l push b mov b,l push b lda c21a2b4 mov b,a mov c,h push b push d mov b,h lda c21b4a2 mov c,a push b mov b,l mov c,l push b lda c21a2b4 mov c,a push b push d push d l190sp: lxi sp,STACK-2 ; obnova SP mvi a,142 ; další dvojice mikrořádků sta linhei lxi h,lin142 ; další driver shld shfstd+1 ret ; ************************** ; obsluha mikrořádků 192/193 ; délka 698T ; ************************** lin192: lxi sp,0f024h lhld colr20 ; H = ACE, L = BD mvi a,0c1h ; mikrořádek 192 ana h mov b,a mov c,h push b mov d,h mov e,h push d mov b,h lda c20b4a2 mov c,a push b mov b,l mov c,l push b lda c20a2b4 mov c,a push b push d push d lda c20b4a2 mov b,a mov c,l push b mov b,l push b lda c20a2b4 mov b,a mov c,h push b push d mvi a,0e0h ana h mov l,a push h lxi sp,0f064h lhld colr21 ; H = ACE, L = BD mvi a,0c3h ; mikrořádek 193 ana h mov b,a mov c,h push b mov d,h mov e,h push d mov b,h lda c21b5a1 mov c,a push b mov b,l mov c,l push b lda c21a2b4 mov c,a push b push d push d lda c21b4a2 mov b,a mov c,l push b mov b,l push b lda c21a1b5 mov b,a mov c,h push b push d mvi a,0f0h ana h mov l,a push h l192sp: lxi sp,STACK-2 ; obnova SP mvi a,170 ; další dvojice mikrořádků sta linhei lxi h,lin170 ; další driver shld shfstd+1 ret ; ************************** ; obsluha mikrořádků 194/195 ; délka 672T ; ************************** lin194: lxi sp,0f0a4h lhld colr20 ; H = ACE, L = BD mvi a,0c7h ; mikrořádek 194 ana h mov b,a mov c,h push b mov d,h mov e,h push d mov b,h lda c20b5a1 mov c,a push b mov b,l mov c,l push b lda c20a2b4 mov c,a push b push d push d lda c20b4a2 mov b,a mov c,l push b mov b,l push b lda c20a1b5 mov b,a mov c,h push b push d mvi a,0f8h ana h mov l,a push h lxi sp,0f0e4h lhld colr21 ; H = ACE, L = BD mvi a,0cfh ; mikrořádek 195 ana h mov b,a mov c,h push b mov d,h mov e,h push d mov b,h mov c,l push b mov b,l mov c,l push b lda c21a2b4 mov c,a push b push d push d lda c21b4a2 mov b,a mov c,l push b mov b,l push b mov b,l mov c,h push b push d mvi a,0fch ana h mov l,a push h l194sp: lxi sp,STACK-2 ; obnova SP mvi a,172 ; další dvojice mikrořádků sta linhei lxi h,lin172 ; další driver shld shfstd+1 ret ; ************************** ; obsluha mikrořádků 196/197 ; délka 641T ; ************************** lin196: lxi sp,0f124h lhld colr20 ; H = ACE, L = BD mvi a,0dfh ; mikrořádek 196 ana h mov b,a mov c,h push b mov d,h mov e,h push d lda c20b1a5 mov b,a mov c,l push b mov b,l push b lda c20a3b3 mov c,a push b push d push d lda c20b3a3 mov b,a mov c,l push b mov b,l push b lda c20a5b1 mov c,a push b push d mvi a,0feh ana h mov l,a push h lxi sp,0f164h lhld colr21 ; H = ACE, L = BD mov d,h ; mikrořádek 197 mov e,h push d push d lda c21b1a5 mov b,a mov c,l push b mov b,l push b lda c21a3b3 mov c,a push b push d push d lda c21b3a3 mov b,a mov c,l push b mov b,l push b lda c21a5b1 mov c,a push b push d push d l196sp: lxi sp,STACK-2 ; obnova SP mvi a,144 ; další dvojice mikrořádků sta linhei lxi h,lin144 ; další driver shld shfstd+1 ret ; ************************** ; obsluha mikrořádků 198/199 ; délka 713T ; ************************** lin198: lxi sp,0f1a5h lhld colr20 ; H = ACE, L = BD mvi a,0c1h ; mikrořádek 198 ana h mov b,a mov c,h push b mov b,h push b lda c20b2a4 mov c,a push b mov d,l mov e,l push d push d lda c20a3b3 mov b,a mov c,h push b mov b,h push b lda c20b3a3 mov c,a push b push d push d lda c20a4b2 mov b,a mov c,h push b mov b,h push b mvi a,0e0h ana h mov l,a push h lxi sp,0f1e5h lhld colr21 ; H = ACE, L = BD mvi a,0c3h ; mikrořádek 199 ana h mov b,a mov c,h push b mov b,h push b lda c21b2a4 mov c,a push b mov d,l mov e,l push d push d lda c21a3b3 mov b,a mov c,h push b mov b,h push b lda c21b3a3 mov c,a push b push d push d lda c21a4b2 mov b,a mov c,h push b mov b,h push b mvi a,0f0h ana h mov l,a push h l198sp: lxi sp,STACK-2 ; obnova SP mvi a,234 ; další dvojice mikrořádků sta linhei lxi h,lin234 ; další driver shld shfstd+1 ret ; ************************** ; obsluha mikrořádků 200/201 ; délka 710T ; ************************** lin200: lxi sp,0f225h lhld colr20 ; H = ACE, L = BD mvi a,0c7h ; mikrořádek 200 ana h mov b,a mov c,h push b mov b,h push b lda c20b3a3 mov c,a push b mov d,l mov e,l push d push d lda c20a3b3 mov b,a mov c,h push b mov b,h push b lda c20b3a3 mov c,a push b push d push d lda c20a3b3 mov b,a mov c,h push b mov b,h push b mvi a,0f8h ana h mov l,a push h lxi sp,0f265h lhld colr21 ; H = ACE, L = BD mvi a,0cfh ; mikrořádek 201 ana h mov b,a mov c,h push b mov b,h push b lda c21b4a2 mov c,a push b mov d,l mov e,l push d push d lda c21a4b2 mov b,a mov c,h push b mov b,h push b lda c21b2a4 mov c,a push b push d push d lda c21a2b4 mov b,a mov c,h push b mov b,h push b mvi a,0fch ana h mov l,a push h l200sp: lxi sp,STACK-2 ; obnova SP mvi a,176 ; další dvojice mikrořádků sta linhei lxi h,lin176 ; další driver shld shfstd+1 ret ; ************************** ; obsluha mikrořádků 202/203 ; délka 678T ; ************************** lin202: lxi sp,0f2a5h lhld colr20 ; H = ACE, L = BD mvi a,0dfh ; mikrořádek 202 ana h mov b,a mov c,h push b mov b,h push b lda c20b4a2 mov c,a push b mov d,l mov e,l push d push d lda c20a4b2 mov b,a mov c,h push b mov b,h push b lda c20b2a4 mov c,a push b push d push d lda c20a2b4 mov b,a mov c,h push b mov b,h push b mvi a,0feh ana h mov l,a push h lxi sp,0f2e5h lhld colr21 ; H = ACE, L = BD mov b,h ; mikrořádek 203 mov c,h push b push b lda c21b5a1 mov c,a push b mov d,l mov e,l push d push d lda c21a4b2 mov b,a mov c,h push b mov b,h push b lda c21b2a4 mov c,a push b push d push d lda c21a1b5 mov b,a mov c,h push b mov b,h push b push b l202sp: lxi sp,STACK-2 ; obnova SP mvi a,178 ; další dvojice mikrořádků sta linhei lxi h,lin178 ; další driver shld shfstd+1 ret ; ************************** ; obsluha mikrořádků 204/205 ; délka 689T ; ************************** lin204: lxi sp,0f326h lhld colr20 ; H = ACE, L = BD mvi a,0c1h ; mikrořádek 204 ana h mov b,a mov c,h push b mov d,h mov e,h push d push d lda c20b5a1 mov b,a mov c,l push b mov b,l push b lda c20a4b2 mov c,a push b push d push d lda c20b2a4 mov b,a mov c,l push b mov b,l push b lda c20a1b5 mov c,a push b push d push d mvi a,0e0h ana h mov l,a push h lxi sp,0f366h lhld colr21 ; H = ACE, L = BD mvi a,0c3h ; mikrořádek 205 ana h mov b,a mov c,h push b mov d,h mov e,h push d push d mov b,l mov c,l push b push b lda c21a4b2 mov c,a push b push d push d lda c21b2a4 mov b,a mov c,l push b mov b,l push b push b push d push d mvi a,0f0h ana h mov l,a push h l204sp: lxi sp,STACK-2 ; obnova SP mvi a,242 ; další dvojice mikrořádků sta linhei lxi h,lin242 ; další driver shld shfstd+1 ret ; ************************** ; obsluha mikrořádků 206/207 ; délka 742T ; ************************** lin206: lxi sp,0f3a6h lhld colr20 ; H = ACE, L = BD mvi a,0c7h ; mikrořádek 206 ana h mov b,a mov c,h push b mov d,h mov e,h push d mov b,h lda c20b1a5 mov c,a push b mov b,l mov c,l push b push b lda c20a5b1 mov c,a push b push d push d lda c20b1a5 mov b,a mov c,l push b mov b,l push b push b lda c20a5b1 mov b,a mov c,h push b push d mvi a,0f8h ana h mov l,a push h lxi sp,0f3e6h lhld colr21 ; H = ACE, L = BD mvi a,0cfh ; mikrořádek 207 ana h mov b,a mov c,h push b mov d,h mov e,h push d mov b,h lda c21b1a5 mov c,a push b mov b,l mov c,l push b push b lda c21a5b1 mov c,a push b push d push d lda c21b1a5 mov b,a mov c,l push b mov b,l push b push b lda c21a5b1 mov b,a mov c,h push b push d mvi a,0fch ana h mov l,a push h l206sp: lxi sp,STACK-2 ; obnova SP mvi a,148 ; další dvojice mikrořádků sta linhei lxi h,lin148 ; další driver shld shfstd+1 ret ; ************************** ; obsluha mikrořádků 208/209 ; délka 705T ; ************************** lin208: lxi sp,0f426h lhld colr20 ; H = ACE, L = BD mvi a,0dfh ; mikrořádek 208 ana h mov b,a mov c,h push b mov d,h mov e,h push d mov b,h lda c20b2a4 mov c,a push b mov b,l mov c,l push b push b lda c20a5b1 mov c,a push b push d push d lda c20b1a5 mov b,a mov c,l push b mov b,l push b push b lda c20a4b2 mov b,a mov c,h push b push d mvi a,0feh ana h mov l,a push h lxi sp,0f466h lhld colr21 ; H = ACE, L = BD mov d,h ; mikrořádek 209 mov e,h push d push d mov b,h lda c21b2a4 mov c,a push b mov b,l mov c,l push b push b lda c21a5b1 mov c,a push b push d push d lda c21b1a5 mov b,a mov c,l push b mov b,l push b push b lda c21a4b2 mov b,a mov c,h push b push d push d l208sp: lxi sp,STACK-2 ; obnova SP mvi a,182 ; další dvojice mikrořádků sta linhei lxi h,lin182 ; další driver shld shfstd+1 ret ; ************************** ; obsluha mikrořádků 210/211 ; délka 708T ; ************************** lin210: lxi sp,0f4a7h lhld colr20 ; H = ACE, L = BD mvi a,0c1h ; mikrořádek 210 ana h mov b,a mov c,h push b mov d,h mov e,h push d push d lda c20b3a3 mov b,a mov c,l push b mov b,l push b push b lda c20a5b1 mov b,a mov c,h push b push d mov b,h lda c20b1a5 mov c,a push b mov b,l mov c,l push b push b lda c20a3b3 mov c,a push b push d push d mvi a,0e0h ana h mov l,a push h lxi sp,0f4e7h lhld colr21 ; H = ACE, L = BD mvi a,0c3h ; mikrořádek 211 ana h mov b,a mov c,h push b mov d,h mov e,h push d push d lda c21b4a2 mov b,a mov c,l push b mov b,l push b push b push d push d push d push b push b lda c21a2b4 mov c,a push b push d push d mvi a,0f0h ana h mov l,a push h l210sp: lxi sp,STACK-2 ; obnova SP mvi a,184 ; další dvojice mikrořádků sta linhei lxi h,lin184 ; další driver shld shfstd+1 ret ; ************************** ; obsluha mikrořádků 212/213 ; délka 652T ; ************************** lin212: lxi sp,0f527h lhld colr20 ; H = ACE, L = BD mvi a,0c7h ; mikrořádek 212 ana h mov b,a mov c,h push b mov d,h mov e,h push d push d lda c20b4a2 mov b,a mov c,l push b mov b,l push b push b push d push d push d push b push b lda c20a2b4 mov c,a push b push d push d mvi a,0f8h ana h mov l,a push h lxi sp,0f567h lhld colr21 ; H = ACE, L = BD mvi a,0cfh ; mikrořádek 213 ana h mov b,a mov c,h push b mov d,h mov e,h push d push d lda c21b5a1 mov b,a mov c,l push b mov b,l push b push b push d push d push d push b push b lda c21a1b5 mov c,a push b push d push d mvi a,0fch ana h mov l,a push h l212sp: lxi sp,STACK-2 ; obnova SP mvi a,150 ; další dvojice mikrořádků sta linhei lxi h,lin150 ; další driver shld shfstd+1 ret ; ************************** ; obsluha mikrořádků 214/215 ; délka 579T ; ************************** lin214: lxi sp,0f5a7h lhld colr10 ; H = ACE, L = BD mvi a,0dfh ; mikrořádek 214 ana h mov b,a mov c,h push b mov d,h mov e,h push d push d lda c10b5a1 mov b,a mov c,l push b mov b,l push b push b push d push d push d push b push b lda c10a1b5 mov c,a push b push d push d mvi a,0feh ana h mov l,a push h lxi sp,0f5e7h lhld colr11 ; H = ACE, L = BD mov d,h ; mikrořádek 215 mov e,h push d push d push d mov b,l mov c,l push b push b push b push d push d push d push b push b push b push d push d push d l214sp: lxi sp,STACK-2 ; obnova SP mvi a,186 ; další dvojice mikrořádků sta linhei lxi h,lin186 ; další driver shld shfstd+1 ret ; ************************** ; obsluha mikrořádků 216/217 ; délka 786T ; ************************** lin216: lxi sp,0f628h lhld colr10 ; H = ACE, L = BD mvi a,0c1h ; mikrořádek 216 ana h mov b,a mov c,h push b mov d,h mov e,h push d push d lda c10b1a5 mov b,a mov c,l push b mov b,l push b push b lda c10a1b5 mov b,a mov c,h push b push d push d mov b,h lda c10b5a1 mov c,a push b mov b,l mov c,l push b push b lda c10a5b1 mov c,a push b push d push d mvi a,0e0h ana h mov l,a push h lxi sp,0f668h lhld colr11 ; H = ACE, L = BD mvi a,0c3h ; mikrořádek 217 ana h mov b,a mov c,h push b mov d,h mov e,h push d push d lda c11b1a5 mov b,a mov c,l push b mov b,l push b push b lda c11a1b5 mov b,a mov c,h push b push d push d mov b,h lda c11b5a1 mov c,a push b mov b,l mov c,l push b push b lda c11a5b1 mov c,a push b push d push d mvi a,0f0h ana h mov l,a push h l216sp: lxi sp,STACK-2 ; obnova SP mvi a,188 ; další dvojice mikrořádků sta linhei lxi h,lin188 ; další driver shld shfstd+1 ret ; ************************** ; obsluha mikrořádků 218/219 ; délka 786T ; ************************** lin218: lxi sp,0f6a8h lhld colr10 ; H = ACE, L = BD mvi a,0c7h ; mikrořádek 218 ana h mov b,a mov c,h push b mov d,h mov e,h push d push d lda c10b2a4 mov b,a mov c,l push b mov b,l push b push b lda c10a1b5 mov b,a mov c,h push b push d push d mov b,h lda c10b5a1 mov c,a push b mov b,l mov c,l push b push b lda c10a4b2 mov c,a push b push d push d mvi a,0f8h ana h mov l,a push h lxi sp,0f6e8h lhld colr11 ; H = ACE, L = BD mvi a,0cfh ; mikrořádek 219 ana h mov b,a mov c,h push b mov d,h mov e,h push d push d lda c11b2a4 mov b,a mov c,l push b mov b,l push b push b lda c11a1b5 mov b,a mov c,h push b push d push d mov b,h lda c11b5a1 mov c,a push b mov b,l mov c,l push b push b lda c11a4b2 mov c,a push b push d push d mvi a,0fch ana h mov l,a push h l218sp: lxi sp,STACK-2 ; obnova SP mvi a,168 ; další dvojice mikrořádků sta linhei lxi h,lin168 ; další driver shld shfstd+1 ret ; ************************** ; obsluha mikrořádků 220/221 ; délka 749T ; ************************** lin220: lxi sp,0f728h lhld colr10 ; H = ACE, L = BD mvi a,0dfh ; mikrořádek 220 ana h mov b,a mov c,h push b mov d,h mov e,h push d push d lda c10b3a3 mov b,a mov c,l push b mov b,l push b push b lda c10a1b5 mov b,a mov c,h push b push d push d mov b,h lda c10b5a1 mov c,a push b mov b,l mov c,l push b push b lda c10a3b3 mov c,a push b push d push d mvi a,0feh ana h mov l,a push h lxi sp,0f768h lhld colr11 ; H = ACE, L = BD mov d,h ; mikrořádek 221 mov e,h push d push d push d lda c11b4a2 mov b,a mov c,l push b mov b,l push b push b lda c11a2b4 mov b,a mov c,h push b push d push d mov b,h lda c11b4a2 mov c,a push b mov b,l mov c,l push b push b lda c11a2b4 mov c,a push b push d push d push d l220sp: lxi sp,STACK-2 ; obnova SP mvi a,190 ; další dvojice mikrořádků sta linhei lxi h,lin190 ; další driver shld shfstd+1 ret ; ************************** ; obsluha mikrořádků 222/223 ; délka 811T ; ************************** lin222: lxi sp,0f7a9h lhld colr10 ; H = ACE, L = BD mvi a,0c1h ; mikrořádek 222 ana h mov b,a mov c,h push b mov d,h mov e,h push d push d mov b,h lda c10b4a2 mov c,a push b mov b,l mov c,l push b push b lda c10a2b4 mov c,a push b push d push d push d lda c10b4a2 mov b,a mov c,l push b mov b,l push b push b lda c10a2b4 mov b,a mov c,h push b push d push d mvi a,0e0h ana h mov l,a push h lxi sp,0f7e9h lhld colr11 ; H = ACE, L = BD mvi a,0c3h ; mikrořádek 223 ana h mov b,a mov c,h push b mov d,h mov e,h push d push d mov b,h lda c11b5a1 mov c,a push b mov b,l mov c,l push b push b lda c11a2b4 mov c,a push b push d push d push d lda c11b4a2 mov b,a mov c,l push b mov b,l push b push b lda c11a1b5 mov b,a mov c,h push b push d push d mvi a,0f0h ana h mov l,a push h l222sp: lxi sp,STACK-2 ; obnova SP mvi a,192 ; další dvojice mikrořádků sta linhei lxi h,lin192 ; další driver shld shfstd+1 ret ; ************************** ; obsluha mikrořádků 224/225 ; délka 772T ; ************************** lin224: lxi sp,0f829h lhld colr10 ; H = ACE, L = BD mvi a,0c7h ; mikrořádek 224 ana h mov b,a mov c,h push b mov d,h mov e,h push d push d mov b,h lda c10b5a1 mov c,a push b mov b,l mov c,l push b push b lda c10a2b4 mov c,a push b push d push d push d lda c10b4a2 mov b,a mov c,l push b mov b,l push b push b lda c10a1b5 mov b,a mov c,h push b push d push d mvi a,0f8h ana h mov l,a push h lxi sp,0f869h lhld colr11 ; H = ACE, L = BD mvi a,0cfh ; mikrořádek 225 ana h mov b,a mov c,h push b mov d,h mov e,h push d push d mov b,h mov c,l push b mov b,l push b push b lda c11a2b4 mov c,a push b push d push d push d lda c11b4a2 mov b,a mov c,l push b mov b,l push b push b mov c,h push b push d push d mvi a,0fch ana h mov l,a push h l224sp: lxi sp,STACK-2 ; obnova SP mvi a,154 ; další dvojice mikrořádků sta linhei lxi h,lin154 ; další driver shld shfstd+1 ret ; ************************** ; obsluha mikrořádků 226/227 ; délka 754T ; ************************** lin226: lxi sp,0f8a9h lhld colr10 ; H = ACE, L = BD mvi a,0dfh ; mikrořádek 226 ana h mov b,a mov c,h push b mov d,h mov e,h push d push d lda c10b1a5 mov b,a mov c,l push b mov b,l push b push b lda c10a3b3 mov c,a push b push d push d push d lda c10b3a3 mov b,a mov c,l push b mov b,l push b push b lda c10a5b1 mov c,a push b push d push d mvi a,0feh ana h mov l,a push h lxi sp,0f8e9h lhld colr11 ; H = ACE, L = BD mov d,h ; mikrořádek 227 mov e,h push d push d push d lda c11b1a5 mov b,a mov c,l push b mov b,l push b push b lda c11a3b3 mov c,a push b push d push d push d lda c11b3a3 mov b,a mov c,l push b mov b,l push b push b lda c11a5b1 mov c,a push b push d push d push d l226sp: lxi sp,STACK-2 ; obnova SP mvi a,194 ; další dvojice mikrořádků sta linhei lxi h,lin194 ; další driver shld shfstd+1 ret ; ************************** ; obsluha mikrořádků 228/229 ; délka 853T ; ************************** lin228: lxi sp,0f92ah lhld colr10 ; H = ACE, L = BD mvi a,0c1h ; mikrořádek 228 ana h mov b,a mov c,h push b mov d,h mov e,h push d push d mov b,h lda c10b2a4 mov c,a push b mov b,l mov c,l push b push b push b lda c10a3b3 mov b,a mov c,h push b push d push d mov b,h lda c10b3a3 mov c,a push b mov b,l mov c,l push b push b push b lda c10a4b2 mov b,a mov c,h push b push d push d mvi a,0e0h ana h mov l,a push h lxi sp,0f96ah lhld colr11 ; H = ACE, L = BD mvi a,0c3h ; mikrořádek 229 ana h mov b,a mov c,h push b mov d,h mov e,h push d push d mov b,h lda c11b2a4 mov c,a push b mov b,l mov c,l push b push b push b lda c11a3b3 mov b,a mov c,h push b push d push d mov b,h lda c11b3a3 mov c,a push b mov b,l mov c,l push b push b push b lda c11a4b2 mov b,a mov c,h push b push d push d mvi a,0f0h ana h mov l,a push h l228sp: lxi sp,STACK-2 ; obnova SP mvi a,196 ; další dvojice mikrořádků sta linhei lxi h,lin196 ; další driver shld shfstd+1 ret ; ************************** ; obsluha mikrořádků 230/231 ; délka 850T ; ************************** lin230: lxi sp,0f9aah lhld colr10 ; H = ACE, L = BD mvi a,0c7h ; mikrořádek 230 ana h mov b,a mov c,h push b mov d,h mov e,h push d push d mov b,h lda c10b3a3 mov c,a push b mov b,l mov c,l push b push b push b lda c10a3b3 mov b,a mov c,h push b push d push d mov b,h lda c10b3a3 mov c,a push b mov b,l mov c,l push b push b push b lda c10a3b3 mov b,a mov c,h push b push d push d mvi a,0f8h ana h mov l,a push h lxi sp,0f9eah lhld colr11 ; H = ACE, L = BD mvi a,0cfh ; mikrořádek 231 ana h mov b,a mov c,h push b mov d,h mov e,h push d push d mov b,h lda c11b4a2 mov c,a push b mov b,l mov c,l push b push b push b lda c11a4b2 mov b,a mov c,h push b push d push d mov b,h lda c11b2a4 mov c,a push b mov b,l mov c,l push b push b push b lda c11a2b4 mov b,a mov c,h push b push d push d mvi a,0fch ana h mov l,a push h l230sp: lxi sp,STACK-2 ; obnova SP mvi a,174 ; další dvojice mikrořádků sta linhei lxi h,lin174 ; další driver shld shfstd+1 ret ; ************************** ; obsluha mikrořádků 232/233 ; délka 816T ; ************************** lin232: lxi sp,0fa2ah lhld colr10 ; H = ACE, L = BD mvi a,0dfh ; mikrořádek 232 ana h mov b,a mov c,h push b mov d,h mov e,h push d push d mov b,h lda c10b4a2 mov c,a push b mov b,l mov c,l push b push b push b lda c10a4b2 mov b,a mov c,h push b push d push d mov b,h lda c10b2a4 mov c,a push b mov b,l mov c,l push b push b push b lda c10a2b4 mov b,a mov c,h push b push d push d mvi a,0feh ana h mov l,a push h lxi sp,0fa6ah lhld colr11 ; H = ACE, L = BD mov d,h ; mikrořádek 233 mov e,h push d push d push d mov b,h lda c11b5a1 mov c,a push b mov b,l mov c,l push b push b push b lda c11a4b2 mov b,a mov c,h push b push d push d mov b,h lda c11b2a4 mov c,a push b mov b,l mov c,l push b push b push b lda c11a1b5 mov b,a mov c,h push b push d push d push d l232sp: lxi sp,STACK-2 ; obnova SP mvi a,198 ; další dvojice mikrořádků sta linhei lxi h,lin198 ; další driver shld shfstd+1 ret ; ************************** ; obsluha mikrořádků 234/235 ; délka 799T ; ************************** lin234: lxi sp,0faabh lhld colr10 ; H = ACE, L = BD mvi a,0c1h ; mikrořádek 234 ana h mov b,a mov c,h push b mov d,h mov e,h push d push d push d lda c10b5a1 mov b,a mov c,l push b mov b,l push b push b lda c10a4b2 mov c,a push b push d push d push d lda c10b2a4 mov b,a mov c,l push b mov b,l push b push b lda c10a1b5 mov c,a push b push d push d push d mvi a,0e0h ana h mov l,a push h lxi sp,0faebh lhld colr11 ; H = ACE, L = BD mvi a,0c3h ; mikrořádek 235 ana h mov b,a mov c,h push b mov d,h mov e,h push d push d push d mov b,l mov c,l push b push b push b lda c11a4b2 mov c,a push b push d push d push d lda c11b2a4 mov b,a mov c,l push b mov b,l push b push b push b push d push d push d mvi a,0f0h ana h mov l,a push h l234sp: lxi sp,STACK-2 ; obnova SP mvi a,200 ; další dvojice mikrořádků sta linhei lxi h,lin200 ; další driver shld shfstd+1 ret ; ************************** ; obsluha mikrořádků 236/237 ; délka 852T ; ************************** lin236: lxi sp,0fb2bh lhld colr10 ; H = ACE, L = BD mvi a,0c7h ; mikrořádek 236 ana h mov b,a mov c,h push b mov d,h mov e,h push d push d mov b,h lda c10b1a5 mov c,a push b mov b,l mov c,l push b push b push b lda c10a5b1 mov c,a push b push d push d push d lda c10b1a5 mov b,a mov c,l push b mov b,l push b push b push b lda c10a5b1 mov b,a mov c,h push b push d push d mvi a,0f8h ana h mov l,a push h lxi sp,0fb6bh lhld colr11 ; H = ACE, L = BD mvi a,0cfh ; mikrořádek 237 ana h mov b,a mov c,h push b mov d,h mov e,h push d push d mov b,h lda c11b1a5 mov c,a push b mov b,l mov c,l push b push b push b lda c11a5b1 mov c,a push b push d push d push d lda c11b1a5 mov b,a mov c,l push b mov b,l push b push b push b lda c11a5b1 mov b,a mov c,h push b push d push d mvi a,0fch ana h mov l,a push h l236sp: lxi sp,STACK-2 ; obnova SP mvi a,158 ; další dvojice mikrořádků sta linhei lxi h,lin158 ; další driver shld shfstd+1 ret ; ************************** ; obsluha mikrořádků 238/239 ; délka 818T ; ************************** lin238: lxi sp,0fbabh lhld colr10 ; H = ACE, L = BD mvi a,0dfh ; mikrořádek 238 ana h mov b,a mov c,h push b mov d,h mov e,h push d push d mov b,h lda c10b2a4 mov c,a push b mov b,l mov c,l push b push b push b lda c10a5b1 mov c,a push b push d push d push d lda c10b1a5 mov b,a mov c,l push b mov b,l push b push b push b lda c10a4b2 mov b,a mov c,h push b push d push d mvi a,0feh ana h mov l,a push h lxi sp,0fbebh lhld colr11 ; H = ACE, L = BD mov d,h ; mikrořádek 239 mov e,h push d push d push d lda c11b2a4 mov e,a push d mov b,l mov c,l push b push b push b lda c11a5b1 mov c,a push b mov e,h push d push d push d lda c11b1a5 mov b,a mov c,l push b mov b,l push b push b push b lda c11a4b2 mov b,a mov c,h push b push d push d push d l238sp: lxi sp,STACK-2 ; obnova SP mvi a,202 ; další dvojice mikrořádků sta linhei lxi h,lin202 ; další driver shld shfstd+1 ret ; ************************** ; obsluha mikrořádků 240/241 ; délka 821T ; ************************** lin240: lxi sp,0fc2ch lhld colr10 ; H = ACE, L = BD mvi a,0c1h ; mikrořádek 240 ana h mov b,a mov c,h push b mov d,h mov e,h push d push d push d lda c10b3a3 mov b,a mov c,l push b mov b,l push b push b push b lda c10a5b1 mov b,a mov c,h push b push d push d mov b,h lda c10b1a5 mov c,a push b mov b,l mov c,l push b push b push b lda c10a3b3 mov c,a push b push d push d push d mvi a,0e0h ana h mov l,a push h lxi sp,0fc6ch lhld colr11 ; H = ACE, L = BD mvi a,0c3h ; mikrořádek 241 ana h mov b,a mov c,h push b mov d,h mov e,h push d push d push d lda c11b4a2 mov b,a mov c,l push b mov b,l push b push b push b push d push d push d push d push b push b push b lda c11a2b4 mov c,a push b push d push d push d mvi a,0f0h ana h mov l,a push h l240sp: lxi sp,STACK-2 ; obnova SP mvi a,204 ; další dvojice mikrořádků sta linhei lxi h,lin204 ; další driver shld shfstd+1 ret ; ************************** ; obsluha mikrořádků 242/243 ; délka 762T ; ************************** lin242: lxi sp,0fcach lhld colr10 ; H = ACE, L = BD mvi a,0c7h ; mikrořádek 242 ana h mov b,a mov c,h push b mov d,h mov e,h push d push d push d lda c10b4a2 mov b,a mov c,l push b mov b,l push b push b push b push d push d push d push d push b push b push b lda c10a2b4 mov c,a push b push d push d push d mvi a,0f8h ana h mov l,a push h lxi sp,0fcech lhld colr11 ; H = ACE, L = BD mvi a,0cfh ; mikrořádek 243 ana h mov b,a mov c,h push b mov d,h mov e,h push d push d push d lda c11b5a1 mov b,a mov c,l push b mov b,l push b push b push b push d push d push d push d push b push b push b lda c11a1b5 mov c,a push b push d push d push d mvi a,0fch ana h mov l,a push h l242sp: lxi sp,STACK-2 ; obnova SP mvi a,180 ; další dvojice mikrořádků sta linhei lxi h,lin180 ; další driver shld shfstd+1 ret ; ************************** ; obsluha mikrořádků 244/245 ; délka 692T ; ************************** lin244: lxi sp,0fd2ch lhld colr10 ; H = ACE, L = BD mvi a,0dfh ; mikrořádek 244 ana h mov b,a mov c,h push b mov d,h mov e,h push d push d push d lda c10b5a1 mov b,a mov c,l push b mov b,l push b push b push b push d push d push d push d push b push b push b lda c10a1b5 mov c,a push b push d push d push d mvi a,0feh ana h mov l,a push h lxi sp,0fd6ch lhld colr11 ; H = ACE, L = BD mov d,h ; mikrořádek 245 mov e,h push d push d push d push d mov b,l mov c,l push b push b push b push b push d push d push d push d push b push b push b push b push d push d push d push d l244sp: lxi sp,STACK-2 ; obnova SP mvi a,206 ; další dvojice mikrořádků sta linhei lxi h,lin206 ; další driver shld shfstd+1 ret ; ************************** ; obsluha mikrořádků 246/247 ; délka 899T ; ************************** lin246: lxi sp,0fdadh lhld colr10 ; H = ACE, L = BD mvi a,0c1h ; mikrořádek 246 ana h mov b,a mov c,h push b mov d,h mov e,h push d push d push d lda c10b1a5 mov b,a mov c,l push b mov b,l push b push b push b lda c10a1b5 mov b,a mov c,h push b push d push d push d mov b,h lda c10b5a1 mov c,a push b mov b,l mov c,l push b push b push b lda c10a5b1 mov c,a push b push d push d push d mvi a,0e0h ana h mov l,a push h lxi sp,0fdedh lhld colr11 ; H = ACE, L = BD mvi a,0c3h ; mikrořádek 247 ana h mov b,a mov c,h push b mov d,h mov e,h push d push d push d lda c11b1a5 mov b,a mov c,l push b mov b,l push b push b push b lda c11a1b5 mov b,a mov c,h push b push d push d push d mov b,h lda c11b5a1 mov c,a push b mov b,l mov c,l push b push b push b lda c11a5b1 mov c,a push b push d push d push d mvi a,0f0h ana h mov l,a push h l246sp: lxi sp,STACK-2 ; obnova SP mvi a,208 ; další dvojice mikrořádků sta linhei lxi h,lin208 ; další driver shld shfstd+1 ret ; ************************** ; obsluha mikrořádků 248/249 ; délka 896T ; ************************** lin248: lxi sp,0fe2dh lhld colr10 ; H = ACE, L = BD mvi a,0c7h ; mikrořádek 248 ana h mov b,a mov c,h push b mov d,h mov e,h push d push d push d lda c10b2a4 mov b,a mov c,l push b mov b,l push b push b push b lda c10a1b5 mov b,a mov c,h push b push d push d push d mov b,h lda c10b5a1 mov c,a push b mov b,l mov c,l push b push b push b lda c10a4b2 mov c,a push b push d push d push d mvi a,0f8h ana h mov l,a push h lxi sp,0fe6dh lhld colr11 ; H = ACE, L = BD mvi a,0cfh ; mikrořádek 249 ana h mov b,a mov c,h push b mov d,h mov e,h push d push d push d lda c11b2a4 mov b,a mov c,l push b mov b,l push b push b push b lda c11a1b5 mov b,a mov c,h push b push d push d push d mov b,h lda c11b5a1 mov c,a push b mov b,l mov c,l push b push b push b lda c11a4b2 mov c,a push b push d push d push d mvi a,0fch ana h mov l,a push h l248sp: lxi sp,STACK-2 ; obnova SP mvi a,162 ; další dvojice mikrořádků sta linhei lxi h,lin162 ; další driver shld shfstd+1 ret ; ************************** ; obsluha mikrořádků 250/251 ; délka 862T ; ************************** lin250: lxi sp,0feadh lhld colr10 ; H = ACE, L = BD mvi a,0dfh ; mikrořádek 250 ana h mov b,a mov c,h push b mov d,h mov e,h push d push d push d lda c10b3a3 mov b,a mov c,l push b mov b,l push b push b push b lda c10a1b5 mov b,a mov c,h push b push d push d push d mov b,h lda c10b5a1 mov c,a push b mov b,l mov c,l push b push b push b lda c10a3b3 mov c,a push b push d push d push d mvi a,0feh ana h mov l,a push h lxi sp,0feedh lhld colr11 ; H = ACE, L = BD mov d,h ; mikrořádek 251 mov e,h push d push d push d push d lda c11b4a2 mov b,a mov c,l push b mov b,l push b push b push b lda c11a2b4 mov b,a mov c,h push b push d push d push d mov b,h lda c11b4a2 mov c,a push b mov b,l mov c,l push b push b push b lda c11a2b4 mov c,a push b push d push d push d push d l250sp: lxi sp,STACK-2 ; obnova SP mvi a,210 ; další dvojice mikrořádků sta linhei lxi h,lin210 ; další driver shld shfstd+1 ret ; ************************** ; obsluha mikrořádků 252/253 ; délka 989T ; vzorkuje dlažbu pod míčem ; ************************** lin252: lxi sp,0ff2eh lhld colr10 ; H = ACE, L = BD mvi a,0c1h ; mikrořádek 252 ana h mov b,a mov c,h push b mov d,h mov e,h push d push d push d mov b,h lda c10b4a2 mov c,a push b mov b,l mov c,l push b push b push b lda c10a2b4 mov c,a push b push d push d push d push d lda c10b4a2 mov b,a mov c,l push b mov b,l push b push b push b lda c10a2b4 mov b,a mov c,h push b push d push d push d mvi a,0e0h ana h mov l,a push h lxi sp,0ff6eh lhld colr11 ; H = ACE, L = BD mvi a,0c3h ; mikrořádek 253 ana h mov d,a mov e,h push d mov d,h push d push d push d mov b,h lda c11b5a1 mov c,a push b mov b,l mov c,l push b push b push b lda c11a2b4 mov c,a push b push d push d push d push d lda c11b4a2 mov b,a mov c,l push b mov b,l push b push b push b lda c11a1b5 mov b,a mov c,h push b push d push d push d mvi a,0f0h ana h mov l,a push h l252sp: lxi sp,STACK-2 ; obnova SP mvi a,212 ; další dvojice mikrořádků sta linhei lxi h,lin212 ; další driver shld shfstd+1 lxi h,ln1def mov a,m ; načíst aktuální duokód dlažby sta waycode ; uložit rar ; speciální příznak rar ; pro stranovou reverzi rar rar ora m ani 0eh sta reverse ret ; ************************** ; obsluha mikrořádků 254/255 ; délka 844T ; ************************** lin254: lxi sp,0ffaeh lhld colr10 ; H = ACE, L = BD mvi a,0c7h ; mikrořádek 254 ana h mov b,a mov c,h push b mov d,h mov e,h push d push d push d mov b,h lda c10b5a1 mov c,a push b mov b,l mov c,l push b push b push b lda c10a2b4 mov c,a push b push d push d push d push d lda c10b4a2 mov b,a mov c,l push b mov b,l push b push b push b lda c10a1b5 mov b,a mov c,h push b push d push d push d mvi a,0f8h ana h mov l,a push h lxi sp,0ffeeh lhld colr11 ; H = ACE, L = BD mvi a,0cfh ; mikrořádek 255 ana h mov d,a mov e,h push d mov d,h push d push d push d mov b,h mov c,l push b mov b,l push b push b push b lda c11a2b4 mov c,a push b push d push d push d push d lda c11b4a2 mov b,a mov c,l push b mov b,l push b push b push b mov b,l mov c,h push b push d push d push d mvi a,0fch ana h mov l,a push h l254sp: lxi sp,STACK-2 ; obnova SP mvi a,164 ; další dvojice mikrořádků sta linhei lxi h,lin164 ; další driver shld shfstd+1 ret