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
|
PokemonTower5F_Script:
call EnableAutoTextBoxDrawing
ld hl, PokemonTower5TrainerHeader0
ld de, PokemonTower5F_ScriptPointers
ld a, [wPokemonTower5FCurScript]
call ExecuteCurMapScriptInTable
ld [wPokemonTower5FCurScript], a
ret
PokemonTower5F_ScriptPointers:
dw PokemonTower5Script0
dw DisplayEnemyTrainerTextAndStartBattle
dw EndTrainerBattle
PokemonTower5Script0:
ld hl, CoordsData_60992
call ArePlayerCoordsInArray
jr c, .asm_60960
ld hl, wd72e
res 4, [hl]
ResetEvent EVENT_IN_PURIFIED_ZONE
jp CheckFightingMapTrainers
.asm_60960
CheckAndSetEvent EVENT_IN_PURIFIED_ZONE
ret nz
xor a
ldh [hJoyHeld], a
ld a, $f0
ld [wJoyIgnore], a
ld hl, wd72e
set 4, [hl]
predef HealParty
call GBFadeOutToWhite
call Delay3
call Delay3
call GBFadeInFromWhite
ld a, $7
ldh [hSpriteIndexOrTextID], a
call DisplayTextID
xor a
ld [wJoyIgnore], a
ret
CoordsData_60992:
dbmapcoord 10, 8
dbmapcoord 11, 8
dbmapcoord 10, 9
dbmapcoord 11, 9
db -1 ; end
PokemonTower5F_TextPointers:
dw PokemonTower5Text1
dw PokemonTower5Text2
dw PokemonTower5Text3
dw PokemonTower5Text4
dw PokemonTower5Text5
dw PickUpItemText
dw PokemonTower5Text7
PokemonTower5TrainerHeader0:
trainer EVENT_BEAT_POKEMONTOWER_5_TRAINER_0, 2, PokemonTower5BattleText1, PokemonTower5EndBattleText1, PokemonTower5AfterBattleText1
PokemonTower5TrainerHeader1:
trainer EVENT_BEAT_POKEMONTOWER_5_TRAINER_1, 3, PokemonTower5BattleText2, PokemonTower5EndBattleText2, PokemonTower5AfterBattleText2
PokemonTower5TrainerHeader2:
trainer EVENT_BEAT_POKEMONTOWER_5_TRAINER_2, 2, PokemonTower5BattleText3, PokemonTower5EndBattleText3, PokemonTower5AfterBattleText3
PokemonTower5TrainerHeader3:
trainer EVENT_BEAT_POKEMONTOWER_5_TRAINER_3, 2, PokemonTower5BattleText4, PokemonTower5EndBattleText4, PokemonTower5AfterBattleText4
db -1 ; end
PokemonTower5Text1:
text_far _PokemonTower5Text1
text_end
PokemonTower5Text2:
text_asm
ld hl, PokemonTower5TrainerHeader0
call TalkToTrainer
jp TextScriptEnd
PokemonTower5BattleText1:
text_far _PokemonTower5BattleText1
text_end
PokemonTower5EndBattleText1:
text_far _PokemonTower5EndBattleText1
text_end
PokemonTower5AfterBattleText1:
text_far _PokemonTower5AfterBattleText1
text_end
PokemonTower5Text3:
text_asm
ld hl, PokemonTower5TrainerHeader1
call TalkToTrainer
jp TextScriptEnd
PokemonTower5BattleText2:
text_far _PokemonTower5BattleText2
text_end
PokemonTower5EndBattleText2:
text_far _PokemonTower5EndBattleText2
text_end
PokemonTower5AfterBattleText2:
text_far _PokemonTower5AfterBattleText2
text_end
PokemonTower5Text4:
text_asm
ld hl, PokemonTower5TrainerHeader2
call TalkToTrainer
jp TextScriptEnd
PokemonTower5BattleText3:
text_far _PokemonTower5BattleText3
text_end
PokemonTower5EndBattleText3:
text_far _PokemonTower5EndBattleText3
text_end
PokemonTower5AfterBattleText3:
text_far _PokemonTower5AfterBattleText3
text_end
PokemonTower5Text5:
text_asm
ld hl, PokemonTower5TrainerHeader3
call TalkToTrainer
jp TextScriptEnd
PokemonTower5BattleText4:
text_far _PokemonTower5BattleText4
text_end
PokemonTower5EndBattleText4:
text_far _PokemonTower5EndBattleText4
text_end
PokemonTower5AfterBattleText4:
text_far _PokemonTower5AfterBattleText4
text_end
PokemonTower5Text7:
text_far _PokemonTower5Text7
text_end
|
