A014: Move the lifts
| A014 |
LD A,($7350) |
| A017 |
XOR $FF |
| A019 |
RET Z |
| A01A |
LD IX,$72D8 |
| A01E |
LD HL,($734E) |
| A021 |
LD C,$00 |
| A023 |
CALL $A07B |
| A026 |
LD A,($7351) |
| A029 |
INC A |
| A02A |
CP $A6 |
| A02C |
JR C,$A03B |
| A02E |
LD HL,$9787 |
| A031 |
LD BC,$0004 |
| A034 |
LD DE,$734E |
| A037 |
LDIR |
| A039 |
LD A,$03 |
| A03B |
LD ($7351),A |
| A03E |
LD HL,($734E) |
| A041 |
CALL $A0A9 |
| A044 |
LD ($734E),HL |
| A047 |
LD C,$FF |
| A049 |
CALL $A07B |
| A04C |
LD HL,($7352) |
| A04F |
LD C,$00 |
| A051 |
CALL $A07B |
| A054 |
LD A,($7354) |
| A057 |
INC A |
| A058 |
CP $A6 |
| A05A |
JR C,$A069 |
| A05C |
LD HL,$9787 |
| A05F |
LD BC,$0003 |
| A062 |
LD DE,$7352 |
| A065 |
LDIR |
| A067 |
LD A,$03 |
| A069 |
LD ($7354),A |
| A06C |
LD HL,($7352) |
| A06F |
CALL $A0A9 |
| A072 |
LD ($7352),HL |
| A075 |
LD C,$FF |
| A077 |
CALL $A07B |
| A07A |
RET |