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
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
188
189
190
191
|
BeachHouseScript:
call $3c29
ret
BeachHouseTextPointers:
dw SurfinDudeText
dw BeachHousePikachuText
dw BeachHouseSign1Text
dw BeachHouseSign2Text
dw BeachHouseSign3Text
dw BeachHouseSign4Text
SurfinDudeText:
TX_ASM
ld a, [wd472]
bit 6, a
jr nz, .next
ld hl, .SurfinDudeText4
call PrintText
jr .done
.next
ld hl, wPreventBlackout
bit 0, [hl]
set 0, [hl]
jr nz, .next2
ld hl, .SurfinDudeText1
jr .next3
.next2
ld hl, .SurfinDudeText3
.next3
call PrintText
call YesNoChoice
ld a, [wCurrentMenuItem]
and a
jr nz, .asm_f226b
ld a, 1
ld [wDoNotWaitForButtonPressAfterDisplayingText], a
callba Func_f8000
ld hl, wPreventBlackout
set 1, [hl]
jr .done
.asm_f226b
ld hl, .SurfinDudeText2
call PrintText
.done
jp TextScriptEnd
.SurfinDudeText1
TX_FAR _SurfinDudeText1
db "@"
.SurfinDudeText2
TX_FAR _SurfinDudeText2
db "@"
.SurfinDudeText3
TX_FAR _SurfinDudeText3
db "@"
.SurfinDudeText4
TX_FAR _SurfinDudeText4
db "@"
BeachHousePikachuText:
TX_ASM
ld hl, .BeachHousePikachuText
call PrintText
ld a, PIKACHU
call PlayCry
call WaitForSoundToFinish
jp TextScriptEnd
.BeachHousePikachuText
TX_FAR _BeachHousePikachuText
db "@"
BeachHouseSign1Text:
TX_ASM
ld hl, .BeachHouseSign1Text2
ld a, [wd472]
bit 6, a
jr z, .next
ld hl, .BeachHouseSign1Text1
.next
call PrintText
jp TextScriptEnd
.BeachHouseSign1Text1
TX_FAR _BeachHouseSign1Text1
db "@"
.BeachHouseSign1Text2
TX_FAR _BeachHouseSign1Text2
db "@"
BeachHouseSign2Text:
TX_ASM
ld hl, .BeachHouseSign2Text2
ld a, [wd472]
bit 6, a
jr z, .next
ld hl, .BeachHouseSign2Text1
.next
call PrintText
jp TextScriptEnd
.BeachHouseSign2Text1
TX_FAR _BeachHouseSign2Text1
db "@"
.BeachHouseSign2Text2
TX_FAR _BeachHouseSign2Text2
db "@"
BeachHouseSign3Text:
TX_ASM
ld hl, .BeachHouseSign3Text2
ld a, [wd472]
bit 6, a
jr z, .next
ld hl, .BeachHouseSign3Text1
.next
call PrintText
jp TextScriptEnd
.BeachHouseSign3Text1
TX_FAR _BeachHouseSign3Text1
db "@"
.BeachHouseSign3Text2
TX_FAR _BeachHouseSign3Text2
db "@"
BeachHouseSign4Text:
TX_ASM
ld a, 1
ld [wDoNotWaitForButtonPressAfterDisplayingText], a
ld a, [wd472]
bit 6, a
jr z, .asm_f2369
ld hl, wPreventBlackout
bit 1, [hl]
jr z, .next2
ld a, 0
ld [wDoNotWaitForButtonPressAfterDisplayingText], a
.next2
ld hl, .BeachHousePrinterText2
call PrintText
ld a, [wPreventBlackout]
bit 1, a
jr z, .asm_f236f
ld a, 1
ld [wDoNotWaitForButtonPressAfterDisplayingText], a
ld hl, .BeachHousePrinterText3
call PrintText
call YesNoChoice
ld a, [wCurrentMenuItem]
and a
jp z, Func_f23d0 ; 0xf23d0
call SaveScreenTilesToBuffer2
ld hl, wd730
set 6, [hl]
xor a
ld [wUpdateSpritesEnabled], a
callab Func_e910a
call WaitForTextScrollButtonPress
ld hl, wd730
res 6, [hl]
call GBPalWhiteOutWithDelay3
call ReloadTilesetTilePatterns
call RestoreScreenTilesAndReloadTilePatterns
call LoadScreenTilesFromBuffer2
call Delay3
call GBPalNormal
ld a, 1
ld [wUpdateSpritesEnabled], a
jr .asm_f236f
.asm_f2369
ld hl, .BeachHousePrinterText1
call PrintText
.asm_f236f
jp TextScriptEnd
.BeachHousePrinterText1
TX_FAR _BeachHousePrinterText1
db $d, "@"
.BeachHousePrinterText2
TX_FAR _BeachHousePrinterText2
db $d, "@"
.BeachHousePrinterText3
TX_FAR _BeachHousePrinterText3
db "@"
.BeachHousePrinterText4
TX_FAR _BeachHousePrinterText4
db "@"
|
