pokered/scripts/safarizonesecrethouse.asm

47 lines
914 B
NASM
Raw Normal View History

2014-05-18 18:19:10 +00:00
SafariZoneSecretHouseScript: ; 4a317 (12:6317)
jp EnableAutoTextBoxDrawing
SafariZoneSecretHouseTextPointers: ; 4a31a (12:631a)
dw SafariZoneSecretHouseText1
SafariZoneSecretHouseText1: ; 4a31c (12:631c)
2015-07-03 19:58:50 +00:00
TX_ASM
ld a, [wd857]
2014-05-18 18:19:10 +00:00
bit 0, a
jr nz, .asm_20a9b
2014-05-18 18:19:10 +00:00
ld hl, SafariZoneSecretHouseText_4a350
call PrintText
ld bc, (HM_03 << 8) | 1
call GiveItem
jr nc, .BagFull
ld hl, ReceivedHM03Text
call PrintText
ld hl, wd857
2014-05-18 18:19:10 +00:00
set 0, [hl]
jr .asm_8f1fc
2014-05-18 18:19:10 +00:00
.BagFull
ld hl, HM03NoRoomText
call PrintText
jr .asm_8f1fc
.asm_20a9b
2014-05-18 18:19:10 +00:00
ld hl, HM03ExplanationText
call PrintText
.asm_8f1fc
2014-05-18 18:19:10 +00:00
jp TextScriptEnd
SafariZoneSecretHouseText_4a350: ; 4a350 (12:6350)
TX_FAR _SecretHouseText_4a350
db "@"
ReceivedHM03Text: ; 4a355 (12:6355)
TX_FAR _ReceivedHM03Text
db $0B, "@"
HM03ExplanationText: ; 4a35b (12:635b)
TX_FAR _HM03ExplanationText
db "@"
HM03NoRoomText: ; 4a360 (12:6360)
TX_FAR _HM03NoRoomText
db "@"