mirror of
https://github.com/pret/pokered.git
synced 2024-10-23 06:58:24 +00:00
71 lines
1.1 KiB
NASM
Executable file
71 lines
1.1 KiB
NASM
Executable file
OaksAideScript:
|
|
ld hl, OaksAideHiText
|
|
call PrintText
|
|
call YesNoChoice
|
|
ld a, [wCurrentMenuItem]
|
|
and a
|
|
jr nz, .choseNo
|
|
ld hl, wPokedexOwned
|
|
ld b, wPokedexOwnedEnd - wPokedexOwned
|
|
call CountSetBits
|
|
ld a, [wNumSetBits]
|
|
ld [hOaksAideNumMonsOwned], a
|
|
ld b, a
|
|
ld a, [hOaksAideRequirement]
|
|
cp b
|
|
jr z, .giveItem
|
|
jr nc, .notEnoughOwnedMons
|
|
.giveItem
|
|
ld hl, OaksAideHereYouGoText
|
|
call PrintText
|
|
ld a, [hOaksAideRewardItem]
|
|
ld b, a
|
|
ld c, 1
|
|
call GiveItem
|
|
jr nc, .bagFull
|
|
ld hl, OaksAideGotItemText
|
|
call PrintText
|
|
ld a, $1
|
|
jr .done
|
|
.bagFull
|
|
ld hl, OaksAideNoRoomText
|
|
call PrintText
|
|
xor a
|
|
jr .done
|
|
.notEnoughOwnedMons
|
|
ld hl, OaksAideUhOhText
|
|
call PrintText
|
|
ld a, $80
|
|
jr .done
|
|
.choseNo
|
|
ld hl, OaksAideComeBackText
|
|
call PrintText
|
|
ld a, $ff
|
|
.done
|
|
ld [hOaksAideResult], a
|
|
ret
|
|
|
|
OaksAideHiText:
|
|
TX_FAR _OaksAideHiText
|
|
db "@"
|
|
|
|
OaksAideUhOhText:
|
|
TX_FAR _OaksAideUhOhText
|
|
db "@"
|
|
|
|
OaksAideComeBackText:
|
|
TX_FAR _OaksAideComeBackText
|
|
db "@"
|
|
|
|
OaksAideHereYouGoText:
|
|
TX_FAR _OaksAideHereYouGoText
|
|
db "@"
|
|
|
|
OaksAideGotItemText:
|
|
TX_FAR _OaksAideGotItemText
|
|
TX_SFX_ITEM_1
|
|
db "@"
|
|
|
|
OaksAideNoRoomText:
|
|
TX_FAR _OaksAideNoRoomText
|
|
db "@"
|