Routines
Prev: A78B Up: Map Next: A7BA
A7A9: Simulate conveyor belt going up
Used by the routines at 947A and A915.
Input
HL Address pointer for tile graphic data
A7A9 PUSH HL Save HL
A7AA LD C,(HL) Set C to the first byte value
A7AB LD E,L Copy HL to DE
A7AC LD D,H
A7AD INC HL Increment HL
A7AE LD B,$07 Set B to loop 7 times
A7B0 LD A,(HL) Copy byte from HL to DE
A7B1 LD (DE),A
A7B2 INC DE Increment DE and HL
A7B3 INC HL
A7B4 DJNZ $A7B0 Jump until all 7 bytes copied
A7B6 LD A,C Put the first byte into the last position
A7B7 LD (DE),A
A7B8 POP HL Restore HL
A7B9 RET
Prev: A78B Up: Map Next: A7BA