pokered/scripts/VermilionOldRodHouse.asm

57 lines
1 KiB
NASM
Executable file

VermilionOldRodHouse_Script:
jp EnableAutoTextBoxDrawing
VermilionOldRodHouse_TextPointers:
dw VermilionHouse2Text1
VermilionHouse2Text1:
TX_ASM
ld a, [wd728]
bit 3, a
jr nz, .asm_03ef5
ld hl, VermilionHouse2Text_560b1
call PrintText
call YesNoChoice
ld a, [wCurrentMenuItem]
and a
jr nz, .asm_eb1b7
lb bc, OLD_ROD, 1
call GiveItem
jr nc, .BagFull
ld hl, wd728
set 3, [hl]
ld hl, VermilionHouse2Text_560b6
jr .asm_5dd95
.BagFull
ld hl, VermilionHouse2Text_560ca
jr .asm_5dd95
.asm_eb1b7
ld hl, VermilionHouse2Text_560c0
jr .asm_5dd95
.asm_03ef5
ld hl, VermilionHouse2Text_560c5
.asm_5dd95
call PrintText
jp TextScriptEnd
VermilionHouse2Text_560b1:
TX_FAR _VermilionHouse2Text_560b1
db "@"
VermilionHouse2Text_560b6:
TX_FAR _VermilionHouse2Text_560b6
TX_SFX_ITEM_1
TX_FAR _VermilionHouse2Text_560bb
db "@"
VermilionHouse2Text_560c0:
TX_FAR _VermilionHouse2Text_560c0
db "@"
VermilionHouse2Text_560c5:
TX_FAR _VermilionHouse2Text_560c5
db "@"
VermilionHouse2Text_560ca:
TX_FAR _VermilionHouse2Text_560ca
db "@"