Prev: 29681 Up: Map Next: 29726
29682: Routine at 73F2
Used by the routine at ColouriseSprite.
29682 LD A,(30757) A=*30757.
29685 AND A Return if A is not zero.
29686 RET NZ
29687 LD HL,65528 HL=65528.
29690 ADD HL,BC HL+=BC.
29691 EXX Switch to the shadow registers.
29692 LD A,L L'-=7.
29693 SUB 7
29695 LD L,A
29696 SBC A,A A-=A.
29697 ADD A,H A+=H'.
29698 LD H,A H'=A.
29699 LD DE,1024 DE'=1024.
29702 LD A,(HL) A=*HL'.
29703 EXX Switch back to the normal registers.
29704 OR (HL) Set the bits from *HL.
29705 XOR (HL) Flip the bits according to *HL.
29706 INC HL Increment HL by two.
29707 INC HL
29708 EXX Switch to the shadow registers.
29709 CP (HL) Jump to 29713 if A is equal to *HL'.
29710 JR Z,29713
29712 INC E Increment E' by one.
29713 INC HL Increment HL' by one.
29714 DEC D Decrease D' by one.
29715 JR NZ,29702 Jump to 29702 if D' is not zero.
29717 INC HL Increment HL' by three.
29718 INC HL
29719 INC HL
29720 LD A,E A=E'.
29721 LD (30757),A Write A to *30757.
29724 EXX Switch back to the normal registers.
29725 RET Return.
Prev: 29681 Up: Map Next: 29726