pokecrystal/event/basement_key.asm

35 lines
580 B
NASM
Raw Normal View History

2015-11-12 04:38:57 +00:00
_BasementKey: ; 507b4
; Are we even in the right map to use this?
ld a, [MapGroup]
cp GROUP_WAREHOUSE_ENTRANCE
jr nz, .nope
ld a, [MapNumber]
cp MAP_WAREHOUSE_ENTRANCE
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
2015-12-18 03:31:16 +00:00
ld a, TRUE
2015-12-17 22:51:32 +00:00
ld [wItemEffectSucceeded], a
2015-11-12 04:38:57 +00:00
ret
.nope
2015-12-18 03:31:16 +00:00
ld a, FALSE
2015-12-17 22:51:32 +00:00
ld [wItemEffectSucceeded], a
2015-11-12 04:38:57 +00:00
ret
; 507e1
.BasementKeyScript: ; 0x507e1
2015-11-25 15:16:29 +00:00
closetext
2015-11-12 04:38:57 +00:00
farjump BasementDoorScript
; 0x507e6