B676: Routine at B676
| B676 |
LD HL,$C2C9 |
| B679 |
LD B,$00 |
| B67B |
CALL PrintCharacters |
| B67E |
LD B,$26 |
| B680 |
CALL PrintCharacters |
| B683 |
LD B,$64 |
| B685 |
LD A,$FD |
| B687 |
IN A,($FE) |
| B689 |
AND %00000010 |
| B68B |
JP Z,$B0BC |
| B68E |
PUSH BC |
| B68F |
LD HL,$0000 |
| B692 |
LD DE,$0000 |
| B695 |
LD BC,$0000 |
| B698 |
LDIR |
| B69A |
POP BC |
| B69B |
DJNZ $B685 |
| B69D |
LD HL,$4000 |
| B6A0 |
LD DE,$4001 |
| B6A3 |
LD BC,$17FF |
| B6A6 |
LD (HL),$00 |
| B6A8 |
LDIR |
| B6AA |
LD HL,$C3EF |
| B6AD |
LD B,$00 |
| B6AF |
CALL PrintCharacters |
| B6B2 |
LD B,$E2 |
| B6B4 |
CALL PrintCharacters |
| B6B7 |
LD B,$64 |
| B6B9 |
LD A,$FD |
| B6BB |
IN A,($FE) |
| B6BD |
AND $02 |
| B6BF |
JP Z,$B0BC |
| B6C2 |
PUSH BC |
| B6C3 |
LD HL,$0000 |
| B6C6 |
LD DE,$0000 |
| B6C9 |
LD BC,$0000 |
| B6CC |
LDIR |
| B6CE |
POP BC |
| B6CF |
DJNZ $B6B9 |
| B6D1 |
LD HL,$C8B4 |
| B6D4 |
LD ($5C36),HL |
| B6D7 |
JP $B1F4 |
| B6DA |
LD ($FE76),HL |
| B6DD |
CALL $B5FD |
| B6E0 |
LD A,$FD |
| B6E2 |
IN A,($FE) |
| B6E4 |
AND $02 |
| B6E6 |
JP Z,$B0BC |
| B6E9 |
LD A,($FE81) |
| B6EC |
CP $04 |
| B6EE |
JP P,$B6D7 |
| B6F1 |
LD HL,$4000 |
| B6F4 |
LD DE,$4001 |
| B6F7 |
LD BC,$1800 |
| B6FA |
LD (HL),$00 |
| B6FC |
LDIR |
| B6FE |
LD BC,$02FF |
| B701 |
LDIR |
| B703 |
LD HL,$3C00 |
| B706 |
LD ($5C36),HL |
| B709 |
JP $B716 |
| B70C |
LD A,(HL) |
| B70D |
PUSH HL |
| B70E |
PUSH BC |
| B70F |
RST $10 |
| B710 |
POP BC |
| B711 |
POP HL |
| B712 |
INC HL |
| B713 |
DJNZ $B70C |
| B715 |
RET |
| B716 |
LD HL,$C2DB |
| B719 |
LD B,$00 |
| B71B |
CALL $B70C |
| B71E |
LD B,$10 |
| B720 |
CALL $B70C |
| B723 |
LD B,$64 |
| B725 |
LD A,$FD |
| B727 |
IN A,($FE) |
| B729 |
AND $02 |
| B72B |
JP Z,$B0BC |
| B72E |
PUSH BC |
| B72F |
LD HL,$0000 |
| B732 |
LD DE,$0000 |
| B735 |
LD BC,$0000 |
| B738 |
LDIR |
| B73A |
POP BC |
| B73B |
DJNZ $B725 |
| B73D |
LD HL,$4000 |
| B740 |
LD DE,$4001 |
| B743 |
LD BC,$17FF |
| B746 |
LD (HL),$00 |
| B748 |
LDIR |
| B74A |
LD HL,$C3EB |
| B74D |
LD B,$00 |
| B74F |
CALL $B70C |
| B752 |
LD B,$EF |
| B754 |
CALL $B70C |
| B757 |
LD B,$64 |
| B759 |
LD A,$FD |
| B75B |
IN A,($FE) |
| B75D |
AND $02 |
| B75F |
JP Z,$B0BC |
| B762 |
PUSH BC |
| B763 |
LD HL,$0000 |
| B766 |
LD DE,$0000 |
| B769 |
LD BC,$0000 |
| B76C |
LDIR |
| B76E |
POP BC |
| B76F |
DJNZ $B759 |
| B771 |
LD HL,$C8B4 |
| B774 |
LD ($5C36),HL |
| B777 |
JP $B1F4 |
