mirror of
https://gitlab.com/xCrystal/pokecrystal-board.git
synced 2024-09-09 09:51:34 -07:00
f5c9958aea
Fixes #580
33 lines
553 B
NASM
33 lines
553 B
NASM
_BasementKey:
|
|
; Are we even in the right map to use this?
|
|
ld a, [wMapGroup]
|
|
cp GROUP_GOLDENROD_UNDERGROUND
|
|
jr nz, .nope
|
|
|
|
ld a, [wMapNumber]
|
|
cp MAP_GOLDENROD_UNDERGROUND
|
|
jr nz, .nope
|
|
; Are we on the tile in front of the door?
|
|
call GetFacingTileCoord
|
|
ld a, d
|
|
cp 22
|
|
jr nz, .nope
|
|
ld a, e
|
|
cp 10
|
|
jr nz, .nope
|
|
; Let's use the Basement Key
|
|
ld hl, .BasementKeyScript
|
|
call QueueScript
|
|
ld a, TRUE
|
|
ld [wItemEffectSucceeded], a
|
|
ret
|
|
|
|
.nope
|
|
ld a, FALSE
|
|
ld [wItemEffectSucceeded], a
|
|
ret
|
|
|
|
.BasementKeyScript:
|
|
closetext
|
|
farsjump BasementDoorScript
|