35537: Routine at 8AD1
35537 |
PUSH AF |
35538 |
LD A,(35571) |
35541 |
AND A |
35542 |
JP Z,35553 |
35545 |
POP AF |
35546 |
PUSH HL |
35547 |
LD L,A |
35548 |
LD H,184 |
35550 |
LD A,(HL) |
35551 |
POP HL |
35552 |
RET |
35553 |
POP AF |
35554 |
PUSH HL |
35555 |
LD L,A |
35556 |
LD H,185 |
35558 |
LD A,(HL) |
35559 |
POP HL |
35560 |
RET |
35561 |
NOP |
35562 |
NOP |
35563 |
NOP |
35564 |
NOP |
35565 |
NOP |
35566 |
NOP |
35567 |
NOP |
35568 |
NOP |
35569 |
NOP |
35570 |
NOP |
35571 |
NOP |
35572 |
NOP |
35573 |
NOP |
35574 |
NOP |
35575 |
NOP |
35576 |
NOP |
35577 |
NOP |
35578 |
NOP |
35579 |
NOP |
35580 |
NOP |
35581 |
NOP |
35582 |
NOP |
35583 |
NOP |
35584 |
NOP |
35585 |
NOP |
35586 |
NOP |
35587 |
NOP |
35588 |
NOP |
35589 |
NOP |
35590 |
NOP |
35591 |
NOP |
35592 |
NOP |
35593 |
NOP |
35594 |
NOP |
35595 |
NOP |
35596 |
NOP |
35597 |
NOP |
35598 |
NOP |
35599 |
NOP |
35600 |
NOP |
35601 |
NOP |
35602 |
NOP |
35603 |
NOP |
35604 |
NOP |
35605 |
NOP |
35606 |
NOP |
35607 |
NOP |
35608 |
NOP |
35609 |
NOP |
35610 |
RET NZ |
35611 |
NOP |
35612 |
NOP |
35613 |
NOP |
35614 |
NOP |
35615 |
CP 1 |
35617 |
JP NZ,35626 |
35620 |
LD HL,(35794) |
35623 |
JP 35629 |
35626 |
LD HL,(35814) |
35629 |
LD A,0 |
35631 |
LD (36877),A |
35634 |
PUSH DE |
35635 |
PUSH HL |
35636 |
LD DE,35906 |
35639 |
XOR A |
35640 |
SBC HL,DE |
35642 |
JP NZ,35650 |
35645 |
LD A,1 |
35647 |
LD (36877),A |
35650 |
POP HL |
35651 |
POP DE |
35652 |
LD C,0 |
35654 |
CALL 35752 |
35657 |
JP Z,35662 |
35660 |
SET 0,C |
35662 |
INC HL |
35663 |
INC HL |
35664 |
CALL 35752 |
35667 |
JP Z,35674 |
35670 |
SET 0,C |
35672 |
SET 3,C |
35674 |
INC HL |
35675 |
INC HL |
35676 |
CALL 35752 |
35679 |
JP Z,35684 |
35682 |
SET 3,C |
35684 |
INC HL |
35685 |
INC HL |
35686 |
CALL 35752 |
35689 |
JP Z,35696 |
35692 |
SET 1,C |
35694 |
SET 3,C |
35696 |
INC HL |
35697 |
INC HL |
35698 |
CALL 35752 |
35701 |
JP Z,35706 |
35704 |
SET 1,C |
35706 |
INC HL |
35707 |
INC HL |
35708 |
CALL 35752 |
35711 |
JP Z,35718 |
35714 |
SET 1,C |
35716 |
SET 2,C |
35718 |
INC HL |
35719 |
INC HL |
35720 |
CALL 35752 |
35723 |
JP Z,35728 |
35726 |
SET 2,C |
35728 |
INC HL |
35729 |
INC HL |
35730 |
CALL 35752 |
35733 |
JP Z,35740 |
35736 |
SET 0,C |
35738 |
SET 2,C |
35740 |
INC HL |
35741 |
INC HL |
35742 |
CALL 35752 |
35745 |
JP Z,35750 |
35748 |
SET 4,C |
35750 |
LD A,C |
35751 |
RET |
35752 |
PUSH HL |
35753 |
PUSH BC |
35754 |
PUSH DE |
35755 |
LD D,(HL) |
35756 |
INC HL |
35757 |
LD B,(HL) |
35758 |
LD A,B |
35759 |
PUSH BC |
35760 |
LD B,A |
35761 |
LD A,(36877) |
35764 |
AND A |
35765 |
LD A,B |
35766 |
POP BC |
35767 |
JP NZ,35775 |
35770 |
IN A,(254) |
35772 |
JP 35779 |
35775 |
LD A,0 |
35777 |
IN A,(31) |
35779 |
LD B,A |
35780 |
LD A,(36877) |
35783 |
AND A |
35784 |
LD A,B |
35785 |
JP NZ,35789 |
35788 |
CPL |
35789 |
AND D |
35790 |
POP DE |
35791 |
POP BC |
35792 |
POP HL |
35793 |
RET |