7649: Operate balloon movement and rendering.
| operate_balloon |
7649 |
BIT 7,B |
|
764B |
JP NZ,jp_operate_viewport_slots |
|
764E |
LD A,($5EEF) |
|
7651 |
AND $03 |
|
7653 |
CP $01 |
|
7655 |
JP NZ,jp_operate_viewport_slots |
|
7658 |
BIT 6,D |
|
765A |
JP Z,operate_balloon_right |
|
765D |
PUSH BC |
|
765E |
LD A,C |
|
765F |
SUB $10 |
|
7661 |
LD C,A |
|
7662 |
CALL calculate_pixel_address |
|
7665 |
LD A,(HL) |
|
7666 |
POP BC |
|
7667 |
CP $00 |
|
7669 |
CALL NZ,reverse_balloon_direction |
|
766C |
PUSH BC |
|
766D |
LD A,C |
|
766E |
SUB $10 |
|
7670 |
LD C,A |
|
7671 |
LD A,B |
|
7672 |
ADD A,$08 |
|
7674 |
LD B,A |
|
7675 |
CALL calculate_pixel_address |
|
7678 |
LD A,(HL) |
|
7679 |
POP BC |
|
767A |
CP $00 |
|
767C |
CALL NZ,reverse_balloon_direction |
|
767F |
LD ($8B0A),BC |
|
7683 |
DEC C |
|
7684 |
DEC C |
| operate_balloon_shared |
7685 |
LD HL,($5F60) |
|
7688 |
DEC HL |
|
7689 |
LD D,(HL) |
|
768A |
DEC HL |
|
768B |
LD (HL),B |
|
768C |
DEC HL |
|
768D |
LD (HL),C |
|
768E |
LD ($8B0C),BC |
|
7692 |
LD HL,$8972 |
|
7695 |
LD A,($5EEF) |
|
7698 |
AND $03 |
|
769A |
ADD A,$0C |
|
769C |
LD E,A |
|
769D |
LD A,$02 |
|
769F |
LD BC,$0020 |
|
76A2 |
LD E,$0E |
|
76A4 |
LD D,$10 |
|
76A6 |
CALL render_sprite |
|
76A9 |
JP operate_viewport_slots |