Bred #01
30 сентября 2002 |
![]() |

Для програмистов Павел Стахов / Studio Stall Предлагаю доработанню мною процедру вы- вода спрайта размером 2*2 знакоместа. ;b=y c=x ;a=номер спрайта SPRITE1 DI LD (WSP1+1),SP LD H,0 LD L,A ADD HL,HL ADD HL,HL ADD HL,HL ADD HL,HL ADD HL,HL ADD HL,HL LD DE,S_ADR ADD HL,DE LD C,A CALL 8880 NEG ADD A,8 LD (LSB+2),A LD SP,HL LD A,16 S15 EX AF,AF' LD A,D CP #58 JR NC,WSP1 POP HL POP IX XOR A LSB LD BC,#00FF S_LP1 ADD HL,HL SET 0,L RL C ADD IX,IX RLA DJNZ S_LP1 LD B,A LD A,(DE) AND C OR B LD (DE),A INC E LD A,(DE) AND B OR HX LD (DE),A INC E LD A,(DE) AND L OR LX LD (DE),A DEC E DEC E INC D LD A,D AND 7 JR NZ,S14 LD A,E ADD A,#20 LD E,A JR C,S14 LD A,D SUB 8 LD D,A S14 EX AF,AF' DEC A JR NZ,S15 WSP1 LD SP,0 EI RET S_SDR ЗАГРЖАЕМ СПРАЙТ... ----------------------------------------
Other articles:
|
|
|
|
|
|
|
|
Similar articles:
В этот день... 1 April
Info Guide #13,
ACNews #50,
Avro News #01,
ACNews #47,
ACNews #40,
ACNews #29,
Black Metall #01,
ACNews #16,
Adventurer #13,
Polesse #19,
Subliminal Extacy #03,
ZX Pilot #37,
Always #03,
Born Dead #0G,
Odyssey paper #08,
Optron #26,
City #08,
Zodiac #02,
Polesse #05,
Nicron #108,
X-Magazine #10,
Nicron #82,
Energy #01,
Sorrow News #03,
Sorrow News #02,
Proton #27,
Think #08,
Wallpaper #01,
Spectrum Progress #03,
Spectrum Expert #02,
Micro #01,
X-Files #02,
Gorodok #05,
Deja Vu #04,
Anecdotes #01,
X-Files #02,
Maximum #35,
Impulse #01,
Spectrofun #01,
Faultless #07,
Breeze #06,
Nicron #27,
Echo #03,
Oberon #01,
Spectrofon #19,
On-Line #30,
Sinclair Town #01,
Sinclair Classic #04,
Spectrofon #04