scawful/oracle-of-secrets
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

cleanup sprite movement functions lib

Browse Source
This commit is contained in:
scawful
2024-05-03 22:57:00 -04:00
parent aa2f687e3f
commit de1bbfae55
1 changed files with 77 additions and 63 deletions
Download Patch File Download Diff File Expand all files Collapse all files

52
Sprites/ZSpriteLib/sprite_new_functions.asm
View File

@@ -1,6 +1,7 @@
;=================================================================
;==========================================================
;Long function, return Carry Set if Active
;=================================================================
;==========================================================
Sprite_CheckActive:
{
; Deactivates the sprite in certain situations
@@ -14,11 +15,11 @@ Sprite_CheckActive:
LDA $0F00, X : BEQ .active
.inactive
.inactive
CLC
RTL
.active
.active
SEC
RTL
}
@@ -27,6 +28,7 @@ Sprite_CheckActive:
; make the sprite move X axis
;==========================================================
Sprite_MoveHoriz:
{
LDA.w $0D50, X : BEQ .no_velocity
ASL : ASL : ASL : ASL
CLC : ADC.w $0D70,X : STA.w $0D70,X
@@ -39,25 +41,30 @@ Sprite_MoveHoriz:
ORA.b #$F0
DEY
++ ADC.w $0D10,X : STA.w $0D10,X
++ ADC.w $0D10,X : STA.w $0D10,X
TYA : ADC.w $0D30,X : STA.w $0D30,X
.no_velocity
.no_velocity
RTL
}
;==========================================================
;===================================================================================================
; make the sprite move both directions (also height)
;===================================================================================================
;==========================================================
Sprite_MoveXyz:
JSL Sprite_MoveAltitude
Sprite_Move:
JSL Sprite_MoveHoriz
; no RTL, just continue into Sprite_MoveVert
;===================================================================================================
;==========================================================
; make the sprite move Y axis
;===================================================================================================
;==========================================================
Sprite_MoveVert:
{
LDA.w $0D40, X : BEQ .no_velocity
ASL : ASL : ASL : ASL
CLC : ADC.w $0D60,X : STA.w $0D60,X
@@ -70,17 +77,20 @@ Sprite_MoveVert:
ORA.b #$F0
DEY
++ ADC.w $0D00,X : STA.w $0D00,X
++ ADC.w $0D00,X : STA.w $0D00,X
TYA : ADC.w $0D20,X : STA.w $0D20,X
.no_velocity
.no_velocity
RTL
}
;===================================================================================================
;==========================================================
; make the sprite move Z axis (height)
;===================================================================================================
;==========================================================
Sprite_MoveZ:
Sprite_MoveAltitude:
{
LDA.w $0F80, X : ASL : ASL : ASL : ASL
CLC : ADC.w $0F90,X : STA.w $0F90,X
@@ -90,18 +100,21 @@ Sprite_MoveAltitude:
ORA.b #$F0
.positive
.positive
ADC.w $0F70,X : STA.w $0F70,X
RTL
}
;===================================================================================================
;==========================================================
; make the sprite bounce toward player (like vitreous)
; Movement, Collision are handled by this function (height:20 = vitreous)
; $09 = speed, $08 = max height
;===================================================================================================
;==========================================================
Sprite_BounceTowardPlayer:
{
JSL Sprite_MoveAltitude
DEC.w $0F80,X : DEC.w $0F80,X
@@ -126,8 +139,10 @@ Sprite_BounceTowardPlayer:
.dontmove
RTL
}
Sprite_BounceFromTileCollision:
{
JSL Sprite_CheckTileCollision : AND.b #$03 : BEQ ++
LDA.w $0D50,X : EOR.b #$FF : INC : STA.w $0D50,X
INC.w $0ED0, X
@@ -137,8 +152,7 @@ Sprite_BounceFromTileCollision:
INC.w $0ED0, X
++ RTL
; ==============================================================================
}
Intro_Dungeon_Main:
{