Prev: 9465 Up: Map Next: 94CC
9478: Routine at 9478
9478 INC DE Increment DE by one.
9479 LD A,(DE) A=*DE.
947A DEC DE Decrease DE by one.
947B AND %11111000 Keep only bits 3-7.
947D LD ($99A9),A Write A to *99A9.
9480 LD BC,$0005 BC=0005.
9483 LD L,(IX+$01) L=*IX+01.
9486 LD H,(IX+$00) H=*IX+00.
9489 SET 2,(HL) Set bit 2 of *HL.
948B PUSH HL Stash HL on the stack.
948C AND A Set flags.
948D SBC HL,DE HL-=DE (with carry).
948F JR Z,$94AA Jump to 94AA if DE is zero.
9491 POP IX Restore IX from the stack.
9493 LD A,($99A9) A=*99A9.
9496 XOR (IX+$00)
9499 LD (IX+$00),A Write A to *IX+00.
949C LD A,(IX+$05) Jump to 94A7 if *IX+05 is equal to 00.
949F CP $00
94A1 JR Z,$94A7
94A3 ADD IX,BC IX+=BC.
94A5 JR $9483 Jump to 9483.
94A7 POP BC Restore BC from the stack.
94A8 JR $94C3 Jump to 94C3.
94AA POP HL Restore HL from the stack.
94AB ADD HL,BC HL+=BC.
94AC LD A,(HL) A=*HL.
94AD INC HL Increment HL by one.
94AE LD L,(HL) L=*HL.
94AF LD (IX+$00),A Write A to *IX+00.
94B2 LD (IX+$01),L Write L to *IX+01.
94B5 LD H,A H=A.
94B6 SET 2,(HL) Set bit 2 of *HL.
94B8 POP BC Restore BC from the stack.
94B9 LD HL,($99A7) HL=*99A7.
94BC LD (HL),C Write C to *HL.
94BD INC HL Increment HL by one.
94BE LD (HL),B Write B to *HL.
94BF INC HL Increment HL by one.
94C0 LD ($99A7),HL Write HL to *99A7.
94C3 LD IX,$0040 IX=0040.
94C7 ADD IX,BC IX+=BC.
94C9 JP $9465 Jump to 9465.
Prev: 9465 Up: Map Next: 94CC