pokered/scripts/safarizonesecrethouse.asm
U-Daniel-PC\Daniel 8431fa7756 TX_ASM
2015-07-03 14:58:50 -05:00

46 lines
914 B
NASM
Executable file

SafariZoneSecretHouseScript: ; 4a317 (12:6317)
jp EnableAutoTextBoxDrawing
SafariZoneSecretHouseTextPointers: ; 4a31a (12:631a)
dw SafariZoneSecretHouseText1
SafariZoneSecretHouseText1: ; 4a31c (12:631c)
TX_ASM
ld a, [wd857]
bit 0, a
jr nz, .asm_20a9b
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
set 0, [hl]
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: ; 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 "@"