B10B: Print Room Image
| Print_RoomImage |
B10B |
PUSH IX |
|
B10D |
POP HL |
|
B10E |
LD DE,$0200 |
|
B111 |
ADD HL,DE |
|
B112 |
LD DE,$4000 |
|
B115 |
LD BC,$0200 |
| Print_RoomImage_0 |
B118 |
PUSH BC |
|
B119 |
LD B,$08 |
|
B11B |
LD C,(IX+$00) |
| Print_RoomImage_1 |
B11E |
SLA C |
|
B120 |
JR NC,Print_RoomImage_2 |
|
B122 |
LD A,(HL) |
|
B123 |
LD (DE),A |
|
B124 |
INC HL |
| Print_RoomImage_2 |
B125 |
INC DE |
|
B126 |
DJNZ Print_RoomImage_1 |
|
B128 |
INC IX |
|
B12A |
POP BC |
|
B12B |
DEC BC |
|
B12C |
LD A,B |
|
B12D |
OR C |
|
B12E |
JR NZ,Print_RoomImage_0 |
|
B130 |
PUSH HL |
|
B131 |
POP IX |
|
B133 |
LD HL,$5800 |
| Print_RoomImage_3 |
B136 |
LD A,(IX+$00) |
|
B139 |
LD B,(IX+$01) |
|
B13C |
INC IX |
|
B13E |
INC IX |
| Print_RoomImage_4 |
B140 |
LD (HL),A |
|
B141 |
INC HL |
|
B142 |
DJNZ Print_RoomImage_4 |
|
B144 |
LD A,H |
|
B145 |
CP $5A |
|
B147 |
JR NZ,Print_RoomImage_3 |
|
B149 |
RET |
