Routines
Prev: 9AE5 Up: Map Next: 9BA7
9B4D: Draw random attribute color for FINAL BOSS explosion
Used by the routine at 99E3.
9B4D CALL $A6DD Computes into HL the address into the attribute file for the explosion position
9B50 LD DE,$0020 Set this address to the next row
9B53 ADD HL,DE
9B54 LD ($A22C),HL Save at A22C the address into the attribute file
9B57 LD DE,$5800 Set DE the base address for the attribute file
9B5A AND A Reset carry flag
9B5B SBC HL,DE Computes the equivalent address of the attribute file into the attribute buffer
9B5D LD DE,$E4FF
9B60 ADD HL,DE
9B61 EX DE,HL Point A22E to the address into the attribute buffer
9B62 LD ($A22E),DE
9B66 LD A,R Set into DE a pseudo-random number from 0 to 7
9B68 AND $07
9B6A LD E,A
9B6B LD D,$00
9B6D LD HL,$C2DF Set HL to the address into attribute color for explosion
9B70 ADD HL,DE
9B71 LD A,(HL) Set C to the attribute color
9B72 LD C,A
9B73 LD HL,($A22C) Set HL to the address into the attribute file
9B76 LD DE,($A22E) Set DE to the address into the attribute buffer
9B7A CALL $9B7E Draw attribute color for explosion
9B7D RET
Draw attribute color for explosion
9B7E CALL $9B88 Draw a row of attribute color to attribute file
9B81 CALL $9B88 Draw a row of attribute color to attribute file
9B84 CALL $9B88 Draw a row of attribute color to attribute file
9B87 RET
Draw a row of attribute color to attribute file
9B88 LD A,(HL) Set the attribute (INK) color over (PAPER) color
9B89 AND $38
9B8B OR C
9B8C LD (HL),A
9B8D INC HL Increase address
9B8E LD A,(HL) Set the attribute (INK) color over (PAPER) color
9B8F AND $38
9B91 OR C
9B92 LD (HL),A
9B93 INC HL Increase address
9B94 LD A,(HL) Set the attribute (INK) color over (PAPER) color
9B95 AND $38
9B97 OR C
9B98 LD (HL),A
9B99 PUSH DE Save DE
9B9A LD DE,$001E Point address into attribute file and buffer to the next row
9B9D ADD HL,DE
9B9E POP DE
9B9F PUSH HL
9BA0 LD HL,$001E
9BA3 ADD HL,DE
9BA4 EX DE,HL
9BA5 POP HL
9BA6 RET
Prev: 9AE5 Up: Map Next: 9BA7