You've already forked pokecrystal-board
mirror of
https://gitlab.com/xCrystal/pokecrystal-board.git
synced 2025-09-08 08:13:02 -07:00
Define constants for collision types
This commit is contained in:
@@ -1,12 +1,12 @@
|
||||
CheckWarpCollision:: ; 1499a
|
||||
; Is this tile a warp?
|
||||
ld a, [PlayerStandingTile]
|
||||
cp $60
|
||||
cp COLL_PIT
|
||||
jr z, .warp
|
||||
cp $68
|
||||
cp COLL_PIT_68
|
||||
jr z, .warp
|
||||
and $f0
|
||||
cp $70
|
||||
cp HI_NYBBLE_WARPS
|
||||
jr z, .warp
|
||||
and a
|
||||
ret
|
||||
@@ -20,13 +20,13 @@ CheckDirectionalWarp:: ; 149af
|
||||
; If this is a directional warp, clear carry (press the designated button to warp).
|
||||
; Else, set carry (immediate warp).
|
||||
ld a, [PlayerStandingTile]
|
||||
cp $70 ; Warp on down
|
||||
cp COLL_WARP_CARPET_DOWN
|
||||
jr z, .directional
|
||||
cp $76 ; Warp on left
|
||||
cp COLL_WARP_CARPET_LEFT
|
||||
jr z, .directional
|
||||
cp $78 ; Warp on up
|
||||
cp COLL_WARP_CARPET_UP
|
||||
jr z, .directional
|
||||
cp $7e ; Warp on right
|
||||
cp COLL_WARP_CARPET_RIGHT
|
||||
jr z, .directional
|
||||
scf
|
||||
ret
|
||||
@@ -45,15 +45,15 @@ CheckWarpFacingDown: ; 149c6
|
||||
; 149d3
|
||||
|
||||
.blocks ; 149d3
|
||||
db $71 ; door
|
||||
db $79
|
||||
db $7a ; stairs
|
||||
db $73
|
||||
db $7b ; cave entrance
|
||||
db $74
|
||||
db $7c ; warp pad
|
||||
db $75
|
||||
db $7d
|
||||
db COLL_DOOR
|
||||
db COLL_DOOR_79
|
||||
db COLL_STAIRCASE
|
||||
db COLL_STAIRCASE_73
|
||||
db COLL_CAVE
|
||||
db COLL_CAVE_74
|
||||
db COLL_WARP_PANEL
|
||||
db COLL_DOOR_75
|
||||
db COLL_DOOR_7D
|
||||
db -1
|
||||
; 149dd
|
||||
|
||||
@@ -66,16 +66,16 @@ CheckGrassCollision:: ; 149dd
|
||||
; 149ea
|
||||
|
||||
.blocks ; 149ea
|
||||
db $08
|
||||
db $18 ; tall grass
|
||||
db $14 ; tall grass
|
||||
db $28
|
||||
db $29
|
||||
db $48
|
||||
db $49
|
||||
db $4a
|
||||
db $4b
|
||||
db $4c
|
||||
db COLL_CUT_08
|
||||
db COLL_TALL_GRASS
|
||||
db COLL_LONG_GRASS
|
||||
db COLL_CUT_28
|
||||
db COLL_WATER
|
||||
db COLL_GRASS_48
|
||||
db COLL_GRASS_49
|
||||
db COLL_GRASS_4A
|
||||
db COLL_GRASS_4B
|
||||
db COLL_GRASS_4C
|
||||
db -1
|
||||
; 149f5
|
||||
|
||||
@@ -88,22 +88,22 @@ CheckCutCollision: ; 149f5
|
||||
; 14a00
|
||||
|
||||
.blocks ; 14a00
|
||||
db $12 ; cut tree
|
||||
db $1a ; cut tree
|
||||
db $10 ; tall grass
|
||||
db $18 ; tall grass
|
||||
db $14 ; tall grass
|
||||
db $1c ; tall grass
|
||||
db COLL_CUT_TREE
|
||||
db COLL_CUT_TREE_1A
|
||||
db COLL_TALL_GRASS_10
|
||||
db COLL_TALL_GRASS
|
||||
db COLL_LONG_GRASS
|
||||
db COLL_LONG_GRASS_1C
|
||||
db -1
|
||||
; 14a07
|
||||
|
||||
GetWarpSFX:: ; 14a07
|
||||
ld a, [PlayerStandingTile]
|
||||
ld de, SFX_ENTER_DOOR
|
||||
cp $71 ; door
|
||||
cp COLL_DOOR
|
||||
ret z
|
||||
ld de, SFX_WARP_TO
|
||||
cp $7c ; warp pad
|
||||
cp COLL_WARP_PANEL
|
||||
ret z
|
||||
ld de, SFX_EXIT_BUILDING
|
||||
ret
|
||||
|
||||
Reference in New Issue
Block a user