mirror of
https://github.com/pret/pokered.git
synced 2024-10-24 15:27:10 +00:00
40c17c906b
For unknown addresses, use "w<address>". Label overleads are still an issue.
71 lines
1.3 KiB
NASM
Executable file
71 lines
1.3 KiB
NASM
Executable file
OaksAideScript ; 0x59035
|
|
ld hl, OaksAideHiText
|
|
call PrintText
|
|
call YesNoChoice
|
|
ld a, [wCurrentMenuItem]
|
|
and a
|
|
jr nz, .asm_59086 ; 0x59042 $42
|
|
ld hl, wPokedexOwned
|
|
ld b, wPokedexOwnedEnd - wPokedexOwned
|
|
call CountSetBits
|
|
ld a, [wd11e]
|
|
ld [$ffdd], a
|
|
ld b, a
|
|
ld a, [$ffdb]
|
|
cp b
|
|
jr z, .asm_59059 ; 0x59055 $2
|
|
jr nc, .asm_5907c ; 0x59057 $23
|
|
.asm_59059
|
|
ld hl, OaksAideHereYouGoText
|
|
call PrintText
|
|
ld a, [$ffdc]
|
|
ld b, a
|
|
ld c, 1
|
|
call GiveItem
|
|
jr nc, .BagFull
|
|
ld hl, OaksAideGotItemText
|
|
call PrintText
|
|
ld a, $1
|
|
jr .asm_5908e ; 0x59071 $1b
|
|
.BagFull
|
|
ld hl, OaksAideNoRoomText
|
|
call PrintText
|
|
xor a
|
|
jr .asm_5908e ; 0x5907a $12
|
|
.asm_5907c
|
|
ld hl, OaksAideUhOhText
|
|
call PrintText
|
|
ld a, $80
|
|
jr .asm_5908e ; 0x59084 $8
|
|
.asm_59086
|
|
ld hl, OaksAideComeBackText
|
|
call PrintText
|
|
ld a, $ff
|
|
.asm_5908e
|
|
ld [$ffdb], a
|
|
ret
|
|
|
|
OaksAideHiText: ; 59091 (16:5091)
|
|
TX_FAR _OaksAideHiText
|
|
db "@"
|
|
|
|
OaksAideUhOhText: ; 59096 (16:5096)
|
|
TX_FAR _OaksAideUhOhText
|
|
db "@"
|
|
|
|
OaksAideComeBackText: ; 5909b (16:509b)
|
|
TX_FAR _OaksAideComeBackText
|
|
db "@"
|
|
|
|
OaksAideHereYouGoText: ; 590a0 (16:50a0)
|
|
TX_FAR _OaksAideHereYouGoText
|
|
db "@"
|
|
|
|
OaksAideGotItemText: ; 590a5 (16:50a5)
|
|
TX_FAR _OaksAideGotItemText
|
|
db $0b
|
|
db "@"
|
|
|
|
OaksAideNoRoomText: ; 590ab (16:50ab)
|
|
TX_FAR _OaksAideNoRoomText
|
|
db "@"
|