summaryrefslogtreecommitdiff
path: root/scripts/silphco6.asm
blob: c40c7d70fb0c4e2f5ff8234c83b8364e25a164da (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
SilphCo6Script:
	call SilphCo6Script_1a1bf
	call EnableAutoTextBoxDrawing
	ld hl, SilphCo6TrainerHeaders
	ld de, SilphCo6ScriptPointers
	ld a, [wSilphCo6CurScript]
	call ExecuteCurMapScriptInTable
	ld [wSilphCo6CurScript], a
	ret

SilphCo6Script_1a1bf:
	ld hl, wCurrentMapScriptFlags
	bit 5, [hl]
	res 5, [hl]
	ret z
	ld hl, SilphCo6GateCoords
	call SilphCo4Script_19d5d
	call SilphCo6Script_1a1e6
	CheckEvent EVENT_SILPH_CO_6_UNLOCKED_DOOR
	ret nz
	ld a, $5f
	ld [wNewTileBlockID], a
	lb bc, 6, 2
	predef_jump ReplaceTileBlock

SilphCo6GateCoords:
	db $06,$02
	db $FF

SilphCo6Script_1a1e6:
	ld a, [$ffe0]
	and a
	ret z
	SetEvent EVENT_SILPH_CO_6_UNLOCKED_DOOR
	ret

SilphCo6ScriptPointers:
	dw CheckFightingMapTrainers
	dw DisplayEnemyTrainerTextAndStartBattle
	dw EndTrainerBattle

SilphCo6TextPointers:
	dw SilphCo6Text1
	dw SilphCo6Text2
	dw SilphCo6Text3
	dw SilphCo6Text4
	dw SilphCo6Text5
	dw SilphCo6Text6
	dw SilphCo6Text7
	dw SilphCo6Text8
	dw PickUpItemText
	dw PickUpItemText

SilphCo6TrainerHeaders:
SilphCo6TrainerHeader0:
	dbEventFlagBit EVENT_BEAT_SILPH_CO_6F_TRAINER_0
	db ($2 << 4) ; trainer's view range
	dwEventFlagAddress EVENT_BEAT_SILPH_CO_6F_TRAINER_0
	dw SilphCo6BattleText2 ; TextBeforeBattle
	dw SilphCo6AfterBattleText2 ; TextAfterBattle
	dw SilphCo6EndBattleText2 ; TextEndBattle
	dw SilphCo6EndBattleText2 ; TextEndBattle

SilphCo6TrainerHeader2:
	dbEventFlagBit EVENT_BEAT_SILPH_CO_6F_TRAINER_2
	db ($3 << 4) ; trainer's view range
	dwEventFlagAddress EVENT_BEAT_SILPH_CO_6F_TRAINER_2
	dw SilphCo6BattleText3 ; TextBeforeBattle
	dw SilphCo6AfterBattleText3 ; TextAfterBattle
	dw SilphCo6EndBattleText3 ; TextEndBattle
	dw SilphCo6EndBattleText3 ; TextEndBattle

SilphCo6TrainerHeader3:
	dbEventFlagBit EVENT_BEAT_SILPH_CO_6F_TRAINER_3, 1
	db ($2 << 4) ; trainer's view range
	dwEventFlagAddress EVENT_BEAT_SILPH_CO_6F_TRAINER_3, 1
	dw SilphCo6BattleText4 ; TextBeforeBattle
	dw SilphCo6AfterBattleText4 ; TextAfterBattle
	dw SilphCo6EndBattleText4 ; TextEndBattle
	dw SilphCo6EndBattleText4 ; TextEndBattle

	db $ff

SilphCo6Script_1a22f:
	CheckEvent EVENT_BEAT_SILPH_CO_GIOVANNI
	jr nz, .asm_1a238
	jr .asm_1a23a
.asm_1a238
	ld h, d
	ld l, e
.asm_1a23a
	jp PrintText

SilphCo6Text1:
	TX_ASM
	ld hl, SilphCo6Text_1a24a
	ld de, SilphCo6Text_1a24f
	call SilphCo6Script_1a22f
	jp TextScriptEnd

SilphCo6Text_1a24a:
	TX_FAR _SilphCo6Text_1a24a
	db "@"

SilphCo6Text_1a24f:
	TX_FAR _SilphCo6Text_1a24f
	db "@"

SilphCo6Text2:
	TX_ASM
	ld hl, SilphCo6Text_1a261
	ld de, SilphCo6Text_1a266
	call SilphCo6Script_1a22f
	jp TextScriptEnd

SilphCo6Text_1a261:
	TX_FAR _SilphCo6Text_1a261
	db "@"

SilphCo6Text_1a266:
	TX_FAR _SilphCo6Text_1a266
	db "@"

SilphCo6Text3:
	TX_ASM
	ld hl, SilphCo6Text_1a278
	ld de, SilphCo6Text_1a27d
	call SilphCo6Script_1a22f
	jp TextScriptEnd

SilphCo6Text_1a278:
	TX_FAR _SilphCo6Text_1a278
	db "@"

SilphCo6Text_1a27d:
	TX_FAR _SilphCo6Text_1a27d
	db "@"

SilphCo6Text4:
	TX_ASM
	ld hl, SilphCo6Text_1a28f
	ld de, SilphCo6Text_1a294
	call SilphCo6Script_1a22f
	jp TextScriptEnd

SilphCo6Text_1a28f:
	TX_FAR _SilphCo6Text_1a28f
	db "@"

SilphCo6Text_1a294:
	TX_FAR _SilphCo6Text_1a294
	db "@"

SilphCo6Text5:
	TX_ASM
	ld hl, SilphCo6Text_1a2a6
	ld de, SilphCo6Text_1a2ab
	call SilphCo6Script_1a22f
	jp TextScriptEnd

SilphCo6Text_1a2a6:
	TX_FAR _SilphCo6Text_1a2a6
	db "@"

SilphCo6Text_1a2ab:
	TX_FAR _SilphCo6Text_1a2ab
	db "@"

SilphCo6Text6:
	TX_ASM
	ld hl, SilphCo6TrainerHeader0
	call TalkToTrainer
	jp TextScriptEnd

SilphCo6BattleText2:
	TX_FAR _SilphCo6BattleText2
	db "@"

SilphCo6EndBattleText2:
	TX_FAR _SilphCo6EndBattleText2
	db "@"

SilphCo6AfterBattleText2:
	TX_FAR _SilphCo6AfterBattleText2
	db "@"

SilphCo6Text7:
	TX_ASM
	ld hl, SilphCo6TrainerHeader2
	call TalkToTrainer
	jp TextScriptEnd

SilphCo6BattleText3:
	TX_FAR _SilphCo6BattleText3
	db "@"

SilphCo6EndBattleText3:
	TX_FAR _SilphCo6EndBattleText3
	db "@"

SilphCo6AfterBattleText3:
	TX_FAR _SilphCo6AfterBattleText3
	db "@"

SilphCo6Text8:
	TX_ASM
	ld hl, SilphCo6TrainerHeader3
	call TalkToTrainer
	jp TextScriptEnd

SilphCo6BattleText4:
	TX_FAR _SilphCo6BattleText4
	db "@"

SilphCo6EndBattleText4:
	TX_FAR _SilphCo6EndBattleText4
	db "@"

SilphCo6AfterBattleText4:
	TX_FAR _SilphCo6AfterBattleText4
	db "@"