A3FF: Routine at A3FF
A3FF |
LD A,($6090) |
A402 |
SUB $1A |
A404 |
CP $10 |
A406 |
JR NC,$A45A |
A408 |
BIT 1,(IX+$08) |
A40C |
JR NZ,$A431 |
A40E |
CALL $945C |
A411 |
JR Z,$A431 |
A413 |
CALL $A4FC |
A416 |
JR NC,$A431 |
A418 |
XOR A |
A419 |
LD ($5EA3),A |
A41C |
LD A,($6080) |
A41F |
OR $01 |
A421 |
LD ($6080),A |
A424 |
LD A,(IX+$08) |
A427 |
AND %11110000 |
A429 |
OR %00000011 |
A42B |
LD (IX+$08),A |
A42E |
CALL $B8BD |
A431 |
LD A,($6090) |
A434 |
CP $22 |
A436 |
JR C,$A450 |
A438 |
LD BC,$FFF4 |
A43B |
LD HL,($6092) |
A43E |
ADD HL,BC |
A43F |
LD (IX+$02),L |
A442 |
LD (IX+$03),H |
A445 |
LD A,($6094) |
A448 |
SUB $16 |
A44A |
LD (IX+$04),A |
A44D |
JP $ABB4 |
A450 |
LD BC,$0012 |
A453 |
JR $A43B |
A455 |
CALL $A48D |
A458 |
JR $A46F |
A45A |
CALL $A579 |
A45D |
LD A,($5E42) |
A460 |
AND $01 |
A462 |
JR NZ,$A46F |
A464 |
CALL HandlerControls |
A467 |
LD D,A |
A468 |
BIT 3,D |
A46A |
JR Z,$A455 |
A46C |
CALL $A4A0 |
A46F |
LD A,($6078) |
A472 |
CP $16 |
A474 |
JR C,$A483 |
A476 |
LD A,$08 |
A478 |
CALL $A4AA |
A47B |
LD BC,$FFF4 |
A47E |
LD HL,($607A) |
A481 |
JR $A43E |
A483 |
LD A,$00 |
A485 |
CALL $A4AA |
A488 |
LD BC,$0012 |
A48B |
JR $A47E |
A48D |
LD A,(IX+$00) |
A490 |
LD C,A |
A491 |
AND $07 |
A493 |
CP $07 |
A495 |
RET Z |
A496 |
INC A |
A497 |
LD B,A |
A498 |
LD A,C |
A499 |
AND $F8 |
A49B |
OR B |
A49C |
LD (IX+$00),A |
A49F |
RET |
A4A0 |
LD A,(IX+$00) |
A4A3 |
LD C,A |
A4A4 |
AND $07 |
A4A6 |
RET Z |
A4A7 |
DEC A |
A4A8 |
JR $A497 |
A4AA |
XOR (IX+$08) |
A4AD |
AND $08 |
A4AF |
LD C,A |
A4B0 |
LD A,(IX+$00) |
A4B3 |
AND $F7 |
A4B5 |
OR C |
A4B6 |
LD (IX+$00),A |
A4B9 |
RET |