summaryrefslogtreecommitdiff
path: root/scripts/ShizukanaOka.asm
blob: b3685c3655796f868e18180906fb067046e624b3 (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
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
192
193
194
195
196
197
198
199
200
201
202
203
204
205
206
207
208
209
210
211
212
213
214
215
216
217
218
219
220
221
222
223
224
225
226
227
228
229
230
231
232
233
234
235
236
237
238
239
240
241
242
INCLUDE "constants.asm"

SECTION "scripts/ShizukanaOka.asm", ROMX

ShizukanaOka_ScriptLoader::
	ld hl, ShizukanaOkaScriptPointers
	call RunMapScript
	call WriteBackMapScriptNumber
	ret

ShizukanaOkaScriptPointers:
	dw ShizukanaOkaScript
	dw ShizukanaOkaNPCIDs

ShizukanaOkaNPCIDs:
	db 0
	db 1
	db 2
	db 3
	db 4
	db 5
	db $FF

ShizukanaOkaSignPointers:
	dw ShizukanaOkaSignpost1
	dw ShizukanaOkaSignpost2

ShizukanaOka_TextPointers:
	dw ShizukanaOkaText1
	dw ShizukanaOkaTrainer2
	dw ShizukanaOkaTrainer3
	dw ShizukanaOkaTrainer4
	dw ShizukanaOkaTrainer5
	dw ShizukanaOkaTrainer6

ShizukanaOkaScript:
	ld hl, ShizukanaOkaNPCIDs
	ld de, ShizukanaOkaSignPointers
	call CallMapTextSubroutine
	ret

ShizukanaOkaText1:
	ld hl, ShizukanaOkaText1String
	call OpenTextbox
	ret

ShizukanaOkaTrainer2:
	ld hl, $D3A5
	bit 1, [hl]
	jr nz, .Trainer2Won
	ld hl, ShizukanaOkaTrainer2EncounterString
	call OpenTextbox
	ld hl, wd3a5
	set 1, [hl]
	ld a, TRAINER_SCHOOLBOY
	ld [wce02], a
	ld a, SCHOOLBOY_TETSUYA
	ld [wce05], a
	call Function38d8
	ret
.Trainer2Won ;Already won
	ld hl, ShizukanaOkaTrainer2WonString
	call OpenTextbox
	ret

ShizukanaOkaTrainer3:
	ld hl, wd3a5
	bit 2, [hl]
	jr nz, .Trainer3Won
	ld hl, ShizukanaOkaTrainer3EncounterString
	call OpenTextbox
	ld hl, wd3a5
	set 2, [hl]
	ld a, TRAINER_BUG_CATCHER_BOY
	ld [wce02], a
	ld a, BUG_CATCHER_BOY_JUNICHI
	ld [wce05], a
	call Function38d8
	ret
.Trainer3Won ;Already won
	ld hl, ShizukanaOkaTrainer3WonString
	call OpenTextbox
	ret

ShizukanaOkaTrainer4:
	ld hl, wd3a5
	bit 3, [hl]
	jr nz, .Trainer4Won
	ld hl, ShizukanaOkaTrainer4EncounterString
	call OpenTextbox
	ld hl, wd3a5
	set 3, [hl]
	ld a, TRAINER_FIREBREATHER
	ld [wce02], a
	ld a, FIREBREATHER_AKITO
	ld [wce05], a
	call Function38d8
	ret
.Trainer4Won ;Already won
	ld hl, ShizukanaOkaTrainer4WonString
	call OpenTextbox
	ret

ShizukanaOkaTrainer5:
	ld hl, wd3a5
	bit 4, [hl]
	jr nz, .Trainer5Won
	ld hl, ShizukanaOkaTrainer5EncounterString
	call OpenTextbox
	ld hl, wd3a5
	set 4, [hl]
	ld a, TRAINER_BEAUTY
	ld [wce02], a
	ld a, BEAUTY_MEGUMI
	ld [wce05], a
	call Function38d8
	ret
.Trainer5Won ;Already won
	ld hl, ShizukanaOkaTrainer5WonString
	call OpenTextbox
	ret

ShizukanaOkaTrainer6:
	ld hl, wd3a5
	bit 5, [hl]
	jr nz, .Trainer6Won
	ld hl, ShizukanaOkaTrainer6EncounterString
	call OpenTextbox
	ld hl, wd3a5
	set 5, [hl]
	ld a, TRAINER_BUG_CATCHER_BOY
	ld [wce02], a
	ld a, BUG_CATCHER_BOY_SOUSUKE
	ld [wce05], a
	call Function38d8
	ret
.Trainer6Won ;Already won
	ld hl, ShizukanaOkaTrainer6WonString
	call OpenTextbox
	ret

ShizukanaOkaSignpost2:
	ld hl, ShizukanaOkaSignpost2String
	call OpenTextbox
	ret

ShizukanaOkaSignpost1:
	ld hl, ShizukanaOkaSignpost1String
	call OpenTextbox
	ret

ShizukanaOkaTrainer6EncounterString:
	text "ねえ ねえ みてよ"
	para "これ ぜったい"
	line "しんしゅの ポケモン だよ!"
	done

	text "まだ ポケモンの とくちょう"
	line "わかってないから しかたないよ"
	done

ShizukanaOkaTrainer6WonString:
	text "あたらしい ポケモンだけでなく"
	line "あたらしい タイプも"
	cont "みつかったって うわさだよ"
	done

ShizukanaOkaTrainer5EncounterString:
	text "いい てんきねー"
	line "あなた ちょうしは いかが?"
	done

	text "なにするニャー"
	line "⋯⋯なにいってるのかしら あたし"
	done

ShizukanaOkaTrainer5WonString:
	text "なんで こうなるの?"
	line "さんぽしてた だけなのに@@"

ShizukanaOkaTrainer4EncounterString:
	text "こんなところで"
	line "ひを ふく れんしゅう!"
	done

	text "あちち しっぱいだー"
	done

ShizukanaOkaTrainer4WonString:
	text "よるになると くらくなるから"
	line "こどもは はやく かえりなさい!"
	para "おれ?"
	line "おれは ひをふくから だいじょうぶ"
	done

ShizukanaOkaTrainer3EncounterString:
	text "むしポケモンの ことなら"
	line "だれよりも くわしいよ"
	done

	text "パラパラー"
	done

ShizukanaOkaTrainer3WonString:
	text "ポケモンずかんを つくるんだって?"
	line "ちょっと みせてよ"
	para "へー"
	line "タイプべつに ポケモン さがせるんだ"
	done

ShizukanaOkaTrainer2EncounterString:
	text "いっとくけど"
	line "きみよりも べんきょう してるから"
	cont "きみよりも つよいよ ぜったい!"
	done

	text "な なぜなんだ?"
	done

ShizukanaOkaTrainer2WonString:
	text "おかしいよ⋯⋯"
	line "まいにち ポケモンの べんきょうを"
	cont "きちんと してるのに まけるなんて"
	done

ShizukanaOkaText1String:
	text "この おかの ポケモンは よわい!"
	line "だから ここで しゅぎょう している"
	cont "トレーナーも おおいよ"
	para "みんな バトルが すきだから"
	line "うでだめしを するといい"
	done

ShizukanaOkaSignpost2String:
	text "しずかな おか"
	line "サイレントヒル は こちら"
	done

ShizukanaOkaSignpost1String:
	text "しずかな おか"
	line "オールドシティ は こちら"
	done