617F: Routine at 617F
| 617F |
LD A,$01 |
| 6181 |
LD ($5E43),A |
| 6184 |
LD A,$40 |
| 6186 |
JR $617B |
| 6188 |
IN A,($1F) |
| 618A |
CPL |
| 618B |
RET |
| 618C |
LD A,($5E3E) |
| 618F |
BIT 1,A |
| 6191 |
JR NZ,$6188 |
| 6193 |
LD A,$FE |
| 6195 |
OUT ($FD),A |
| 6197 |
IN A,($FE) |
| 6199 |
AND $1E |
| 619B |
CP $1E |
| 619D |
JR Z,$61A7 |
| 619F |
AND $14 |
| 61A1 |
CP $14 |
| 61A3 |
JR Z,$61B9 |
| 61A5 |
JR $61BC |
| 61A7 |
LD A,$7F |
| 61A9 |
OUT ($FD),A |
| 61AB |
IN A,($FE) |
| 61AD |
AND $1E |
| 61AF |
CP $1E |
| 61B1 |
JR Z,$61BF |
| 61B3 |
AND $14 |
| 61B5 |
CP $14 |
| 61B7 |
JR Z,$61BC |
| 61B9 |
LD A,$FD |
| 61BB |
RET |
| 61BC |
LD A,$FE |
| 61BE |
RET |
| 61BF |
LD A,$FF |
| 61C1 |
RET |