From c9ab625b7f226e778fe5cba894fe088e044e704c Mon Sep 17 00:00:00 2001 From: Astatin Date: Tue, 10 Dec 2024 18:11:21 +0900 Subject: Add earcoptr animation --- animation.gbasm | 110 +++----------------------------------------------------- 1 file changed, 5 insertions(+), 105 deletions(-) (limited to 'animation.gbasm') diff --git a/animation.gbasm b/animation.gbasm index 0796167..a75da27 100644 --- a/animation.gbasm +++ b/animation.gbasm @@ -82,109 +82,9 @@ Animation_Jump_table: JP =Sparkle_Animation NOP -Sparkle_Animation: - INC HL - - LD A, (HL+) - ADD $80 - LD D, A - LD A, $mem_viewport_x - LD B, A - SUB $82 - CP D - RET NC - ADD $0e - CP D - RET C - LD A, D - SUB $80 - SUB B - AND $0f - SWAP A - LD B, A - - - LD A, (HL+) - ADD $80 - LD D, A - LD A, $mem_viewport_y - LD C, A - SUB $82 - CP D - RET NC - ADD $0d - CP D - RET C - LD A, D - SUB $80 - SUB C - AND $0f - SWAP A - ADD $06 - LD C, A - - LD E, (HL) - INC E - LD A, $1f - AND E - LD E, A - XOR A - CP E - JP Z, =Sparkle_Animation.End_animation - LD (HL), E - - .ADD_MOVING_ANIMATION_OFFSET - - PUSH HL - LD HL, $mem_oam_buffer - LD A, $mem_oam_buffer_low - LD L, A - ADD $08 - LD $mem_oam_buffer_low, A - - LD D, E - SRA D - LD A, C - SUB D - ADD $0c - LD (HL+), A - LD A, B - LD (HL+), A - LD A, E - SRA A - SRA A - AND $02 - ADD $60 - - LD (HL+), A - LD A, $00 - LD (HL+), A - - SRA D - LD A, C - SUB D - ADD $08 - LD (HL+), A - LD A, B - ADD $08 - LD (HL+), A - LD A, E - SRA A - SRA A - AND $02 - ADD $60 - - LD (HL+), A - LD A, $00 - LD (HL+), A - - - POP HL - RET + ; 02 + JP =Rotating_Ball_Animation + NOP - Sparkle_Animation.End_animation: - LD A, L - AND $fc - LD L, A - LD (HL), $00 - RET +.INCLUDE "animations/sparkles.gbasm" +.INCLUDE "animations/rotatingball.gbasm" -- cgit v1.2.3-70-g09d2