![]() |
Routines |
Prev: 29681 | Up: Map | Next: 29726 |
Used by the routine at ColouriseSprite.
|
||||||||||
29682 | LD A,(30757) | A=*SpriteState. | ||||||||
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 | Write E' to *SpriteState. | ||||||||
29721 | LD (30757),A | |||||||||
29724 | EXX | Switch back to the normal registers. | ||||||||
29725 | RET | Return. |
Prev: 29681 | Up: Map | Next: 29726 |