pokered/engine/items/itemfinder.asm

51 lines
734 B
NASM
Raw Normal View History

2014-05-22 22:13:20 +00:00
HiddenItemNear: ; 7481f (1d:481f)
ld hl, HiddenItemCoords
ld b, $0
.asm_74824
ld de, $0003
ld a, [W_CURMAP]
call IsInRestOfArray
2014-05-22 22:13:20 +00:00
ret nc ; return if current map has no hidden items
push bc
push hl
ld hl, wd6f0
2014-05-22 22:13:20 +00:00
ld c, b
ld b, $2
predef FlagActionPredef
2014-05-22 22:13:20 +00:00
ld a, c
pop hl
pop bc
inc b
and a
inc hl
ld d, [hl]
inc hl
ld e, [hl]
inc hl
jr nz, .asm_74824 ; 0x74845 $dd
ld a, [W_YCOORD]
call Func_7486b
cp d
jr nc, .asm_74824 ; 0x7484e $d4
ld a, [W_YCOORD]
add $4
cp d
jr c, .asm_74824 ; 0x74856 $cc
ld a, [W_XCOORD]
call Func_7486b
cp e
jr nc, .asm_74824 ; 0x7485f $c3
ld a, [W_XCOORD]
add $5
cp e
jr c, .asm_74824 ; 0x74867 $bb
scf
ret
Func_7486b: ; 7486b (1d:486b)
sub $5
cp $f0
ret c
xor a
ret