blob: 48992d941bfd67788e3512658990a3da05888701 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
|
SafariZoneSecretHouseScript: ; 4a317 (12:6317)
jp EnableAutoTextBoxDrawing
SafariZoneSecretHouseTextPointers: ; 4a31a (12:631a)
dw SafariZoneSecretHouseText1
SafariZoneSecretHouseText1: ; 4a31c (12:631c)
TX_ASM
CheckEvent EVENT_880
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
SetEvent EVENT_880
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 "@"
|
