A8EC: Routine at A8EC
| A8EC | PUSH AF | 
| A8ED | PUSH HL | 
| A8EE | PUSH BC | 
| A8EF | PUSH DE | 
| A8F0 | PUSH HL | 
| A8F1 | POP BC | 
| A8F2 | CALL $AA23 | 
| A8F5 | EX DE,HL | 
| A8F6 | LD A,B | 
| A8F7 | SUB H | 
| A8F8 | LD B,H | 
| A8F9 | LD H,A | 
| A8FA | LD A,C | 
| A8FB | ADD A,L | 
| A8FC | LD C,L | 
| A8FD | LD L,A | 
| A8FE | CALL $AA23 | 
| A901 | LD A,($732C) | 
| A904 | LD (DE),A | 
| A905 | LD (HL),A | 
| A906 | INC DE | 
| A907 | DEC HL | 
| A908 | DEC C | 
| A909 | JR NZ,$A904 | 
| A90B | LD IXl,B | 
| A90D | LD BC,$0020 | 
| A910 | LD (DE),A | 
| A911 | LD (HL),A | 
| A912 | AND A | 
| A913 | SBC HL,BC | 
| A915 | EX DE,HL | 
| A916 | ADD HL,BC | 
| A917 | EX DE,HL | 
| A918 | DEC IXl | 
| A91A | JR NZ,$A910 | 
| A91C | POP DE | 
| A91D | POP BC | 
| A91E | POP HL | 
| A91F | POP AF | 
| A920 | RET |