pokered/scripts/safarizonesecrethouse.asm
2016-07-18 01:17:03 -05:00

45 lines
790 B
NASM
Executable file

SafariZoneSecretHouseScript:
jp EnableAutoTextBoxDrawing
SafariZoneSecretHouseTextPointers:
dw SafariZoneSecretHouseText1
SafariZoneSecretHouseText1:
TX_ASM
CheckEvent EVENT_GOT_HM03
jr nz, .asm_20a9b
ld hl, SafariZoneSecretHouseText_4a350
call PrintText
lb bc, HM_03, 1
call GiveItem
jr nc, .BagFull
ld hl, ReceivedHM03Text
call PrintText
SetEvent EVENT_GOT_HM03
jr .asm_8f1fc
.BagFull
ld hl, HM03NoRoomText
call PrintText
jr .asm_8f1fc
.asm_20a9b
ld hl, HM03ExplanationText
call PrintText
.asm_8f1fc
jp TextScriptEnd
SafariZoneSecretHouseText_4a350:
TX_FAR _SecretHouseText_4a350
db "@"
ReceivedHM03Text:
TX_FAR _ReceivedHM03Text
TX_SFX_ITEM_1
db "@"
HM03ExplanationText:
TX_FAR _HM03ExplanationText
db "@"
HM03NoRoomText:
TX_FAR _HM03NoRoomText
db "@"