pokered/engine/predefs7.asm

49 lines
720 B
NASM
Raw Normal View History

2014-05-22 22:13:20 +00:00
Func_1c9c6: ; 1c9c6 (7:49c6)
ld hl, WhichFloorText
call PrintText
ld hl, wStringBuffer2 + 11
2014-05-22 22:13:20 +00:00
ld a, l
2015-02-08 02:37:40 +00:00
ld [wList], a
2014-05-22 22:13:20 +00:00
ld a, h
2015-02-08 02:37:40 +00:00
ld [wList + 1], a
2015-02-08 06:18:42 +00:00
ld a, [wListScrollOffset]
2014-05-22 22:13:20 +00:00
push af
xor a
2015-02-08 06:18:42 +00:00
ld [wCurrentMenuItem], a
ld [wListScrollOffset], a
2015-07-13 06:00:48 +00:00
ld [wPrintItemPrices], a
2014-05-22 22:13:20 +00:00
ld a, $4
2015-02-08 06:18:42 +00:00
ld [wListMenuID], a
2014-05-22 22:13:20 +00:00
call DisplayListMenuID
pop bc
ld a, b
2015-02-08 06:18:42 +00:00
ld [wListScrollOffset], a
2014-05-22 22:13:20 +00:00
ret c
ld hl, wd126
2014-05-22 22:13:20 +00:00
set 7, [hl]
ld hl, wcc5b
2015-02-08 06:18:42 +00:00
ld a, [wWhichPokemon]
2014-05-22 22:13:20 +00:00
add a
ld d, $0
ld e, a
add hl, de
ld a, [hli]
ld b, a
ld a, [hl]
ld c, a
2014-09-13 07:50:56 +00:00
ld hl, wWarpEntries
2014-05-22 22:13:20 +00:00
call Func_1ca0d
Func_1ca0d: ; 1ca0d (7:4a0d)
inc hl
inc hl
ld a, b
ld [hli], a
ld a, c
ld [hli], a
ret
WhichFloorText: ; 1ca14 (7:4a14)
TX_FAR _WhichFloorText
db "@"