55492: Routine at 55492
| L55492 |
55492 |
LD HL,(59671) |
|
55495 |
LD DE,3040 |
|
55498 |
AND A |
|
55499 |
SBC HL,DE |
|
55501 |
JP C,L57625 |
|
55504 |
LD A,(59653) |
|
55507 |
AND 127 |
|
55509 |
LD HL,22530 |
|
55512 |
LD DE,22531 |
|
55515 |
LD BC,61 |
|
55518 |
LD (HL),A |
|
55519 |
LDIR |
|
55521 |
LD HL,22978 |
|
55524 |
LD DE,22979 |
|
55527 |
LD BC,61 |
|
55530 |
LD (HL),A |
|
55531 |
LDIR |
|
55533 |
LD HL,22594 |
|
55536 |
LD DE,31 |
|
55539 |
LD B,3 |
| L55492_0 |
55541 |
LD (HL),A |
|
55542 |
INC HL |
|
55543 |
LD (HL),A |
|
55544 |
ADD HL,DE |
|
55545 |
DJNZ L55492_0 |
|
55547 |
LD HL,22882 |
|
55550 |
LD B,3 |
| L55492_1 |
55552 |
LD (HL),A |
|
55553 |
INC HL |
|
55554 |
LD (HL),A |
|
55555 |
ADD HL,DE |
|
55556 |
DJNZ L55492_1 |
|
55558 |
LD HL,22620 |
|
55561 |
LD B,12 |
| L55492_2 |
55563 |
LD (HL),A |
|
55564 |
INC HL |
|
55565 |
LD (HL),A |
|
55566 |
ADD HL,DE |
|
55567 |
DJNZ L55492_2 |
| L55492_3 |
55569 |
LD A,(59675) |
|
55572 |
CP 2 |
|
55574 |
JP NZ,L55492_4 |
|
55577 |
LD A,40 |
|
55579 |
LD (59678),A |
|
55582 |
XOR A |
|
55583 |
LD (59639),A |
|
55586 |
LD (59638),A |
|
55589 |
LD A,32 |
|
55591 |
LD (59677),A |
|
55594 |
LD A,80 |
|
55596 |
LD (59683),A |
|
55599 |
PUSH HL |
|
55600 |
LD H,11 |
|
55602 |
LD L,37 |
|
55604 |
LD (59640),HL |
|
55607 |
POP HL |
|
55608 |
LD A,(59675) |
| L55492_4 |
55611 |
DEC A |
|
55612 |
LD (59675),A |
|
55615 |
RET NZ |
|
55616 |
INC A |
|
55617 |
LD (59675),A |
|
55620 |
LD A,(59653) |
|
55623 |
BIT 7,A |
|
55625 |
JP NZ,L55492_6 |
|
55628 |
INC A |
|
55629 |
LD (59653),A |
| L55492_5 |
55632 |
AND 7 |
|
55634 |
RET NZ |
|
55635 |
LD A,(59653) |
|
55638 |
XOR 128 |
|
55640 |
LD (59653),A |
|
55643 |
JP L55492_3 |
| L55492_6 |
55646 |
DEC A |
|
55647 |
LD (59653),A |
|
55650 |
JP L55492_5 |