mirror of
https://gitlab.com/xCrystal/pokecrystal-board.git
synced 2024-11-16 11:27:33 -08:00
81fff9bb80
I have no idea why this was a thing (do people store this repo on FAT32 flash drives or something?), but quite a bit of files had a permission of 755. This isn't really a problem, but it's inconsistent and weird.
40 lines
602 B
NASM
40 lines
602 B
NASM
_CardKey: ; 50779
|
|
; Are we even in the right map to use this?
|
|
ld a, [wMapGroup]
|
|
cp GROUP_RADIO_TOWER_3F
|
|
jr nz, .nope
|
|
|
|
ld a, [wMapNumber]
|
|
cp MAP_RADIO_TOWER_3F
|
|
jr nz, .nope
|
|
; Are we facing the slot?
|
|
ld a, [wPlayerDirection]
|
|
and %1100
|
|
cp OW_UP
|
|
jr nz, .nope
|
|
|
|
call GetFacingTileCoord
|
|
ld a, d
|
|
cp 18
|
|
jr nz, .nope
|
|
ld a, e
|
|
cp 6
|
|
jr nz, .nope
|
|
; Let's use the Card Key.
|
|
ld hl, .CardKeyScript
|
|
call QueueScript
|
|
ld a, TRUE
|
|
ld [wItemEffectSucceeded], a
|
|
ret
|
|
|
|
.nope
|
|
ld a, FALSE
|
|
ld [wItemEffectSucceeded], a
|
|
ret
|
|
; 507af
|
|
|
|
.CardKeyScript: ; 0x507af
|
|
closetext
|
|
farjump CardKeySlotScript
|
|
; 0x507b4
|