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
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
|
MrFujisHouse_Script:
call EnableAutoTextBoxDrawing
ret
MrFujisHouse_TextPointers:
def_text_pointers
dw_const MrFujisHouseSuperNerdText, TEXT_MRFUJISHOUSE_SUPER_NERD
dw_const MrFujisHouseLittleGirlText, TEXT_MRFUJISHOUSE_LITTLE_GIRL
dw_const MrFujisHousePsyduckText, TEXT_MRFUJISHOUSE_PSYDUCK
dw_const MrFujisHouseNidorinoText, TEXT_MRFUJISHOUSE_NIDORINO
dw_const MrFujisHouseMrFujiText, TEXT_MRFUJISHOUSE_MR_FUJI
dw_const MrFujisHouseMrFujiPokedexText, TEXT_MRFUJISHOUSE_POKEDEX
MrFujisHouseSuperNerdText:
text_asm
CheckEvent EVENT_RESCUED_MR_FUJI
jr nz, .rescued_mr_fuji
ld hl, .MrFujiIsntHereText
call PrintText
jr .done
.rescued_mr_fuji
ld hl, .MrFujiHadBeenPrayingText
call PrintText
.done
jp TextScriptEnd
.MrFujiIsntHereText:
text_far _MrFujisHouseSuperNerdMrFujiIsntHereText
text_end
.MrFujiHadBeenPrayingText:
text_far _MrFujisHouseSuperNerdMrFujiHadBeenPrayingText
text_end
MrFujisHouseLittleGirlText:
text_asm
CheckEvent EVENT_RESCUED_MR_FUJI
jr nz, .rescued_mr_fuji
ld hl, .ThisIsMrFujisHouseText
call PrintText
jr .done
.rescued_mr_fuji
ld hl, .PokemonAreNiceToHugText
call PrintText
.done
jp TextScriptEnd
.ThisIsMrFujisHouseText:
text_far _MrFujisHouseLittleGirlThisIsMrFujisHouseText
text_end
.PokemonAreNiceToHugText:
text_far _MrFujisHouseLittleGirlPokemonAreNiceToHugText
text_end
MrFujisHousePsyduckText:
text_far _MrFujisHousePsyduckText
text_asm
ld a, PSYDUCK
call PlayCry
jp TextScriptEnd
MrFujisHouseNidorinoText:
text_far _MrFujisHouseNidorinoText
text_asm
ld a, NIDORINO
call PlayCry
jp TextScriptEnd
MrFujisHouseMrFujiText:
text_asm
CheckEvent EVENT_GOT_POKE_FLUTE
jr nz, .got_item
ld hl, .IThinkThisMayHelpYourQuestText
call PrintText
lb bc, POKE_FLUTE, 1
call GiveItem
jr nc, .bag_full
ld hl, .ReceivedPokeFluteText
call PrintText
SetEvent EVENT_GOT_POKE_FLUTE
jr .done
.bag_full
ld hl, .PokeFluteNoRoomText
call PrintText
jr .done
.got_item
ld hl, .HasMyFluteHelpedYouText
call PrintText
.done
jp TextScriptEnd
.IThinkThisMayHelpYourQuestText:
text_far _MrFujisHouseMrFujiIThinkThisMayHelpYourQuestText
text_end
.ReceivedPokeFluteText:
text_far _MrFujisHouseMrFujiReceivedPokeFluteText
sound_get_key_item
text_far _MrFujisHouseMrFujiPokeFluteExplanationText
text_end
.PokeFluteNoRoomText:
text_far _MrFujisHouseMrFujiPokeFluteNoRoomText
text_end
.HasMyFluteHelpedYouText:
text_far _MrFujisHouseMrFujiHasMyFluteHelpedYouText
text_end
MrFujisHouseMrFujiPokedexText:
text_far _MrFujisHouseMrFujiPokedexText
text_end
|
