8E42: Subroutine
sub_8e42 |
8E42 |
LD HL,$0000 |
|
8E45 |
LD B,$00 |
sub_8e47_loop |
8E47 |
DJNZ sub_8e42_1 |
|
8E49 |
LD A,$14 |
|
8E4B |
DEC A |
|
8E4C |
LD ($8E4A),A |
|
8E4F |
RET NZ |
|
8E50 |
LD A,(HL) |
|
8E51 |
LD ($8E4A),A |
|
8E54 |
LD A,($8E46) |
|
8E57 |
INC A |
|
8E58 |
LD ($8E46),A |
|
8E5B |
INC B |
sub_8e42_1 |
8E5C |
INC HL |
|
8E5D |
LD A,(HL) |
|
8E5E |
AND A |
|
8E5F |
JR Z,sub_8e42_0 |
|
8E61 |
CALL print_message |
|
8E64 |
JR sub_8e47_loop |
sub_8e42_0 |
8E66 |
DEC HL |
|
8E67 |
LD A,(HL) |
|
8E68 |
LD ($A231),A |
|
8E6B |
RET |