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
|
SilphCo3F_Script:
call SilphCo3FGateCallbackScript
call EnableAutoTextBoxDrawing
ld hl, SilphCo3TrainerHeaders
ld de, SilphCo3F_ScriptPointers
ld a, [wSilphCo3FCurScript]
call ExecuteCurMapScriptInTable
ld [wSilphCo3FCurScript], a
ret
SilphCo3FGateCallbackScript:
ld hl, wCurrentMapScriptFlags
bit BIT_CUR_MAP_LOADED_1, [hl]
res BIT_CUR_MAP_LOADED_1, [hl]
ret z
ld hl, .GateCoordinates
call SilphCo2F_SetCardKeyDoorYScript
call SilphCo3F_UnlockedDoorEventScript
CheckEvent EVENT_SILPH_CO_3_UNLOCKED_DOOR1
jr nz, .unlock_door1
push af
ld a, $5f
ld [wNewTileBlockID], a
lb bc, 4, 4
predef ReplaceTileBlock
pop af
.unlock_door1
CheckEventAfterBranchReuseA EVENT_SILPH_CO_3_UNLOCKED_DOOR2, EVENT_SILPH_CO_3_UNLOCKED_DOOR1
ret nz
ld a, $5f
ld [wNewTileBlockID], a
lb bc, 4, 8
predef_jump ReplaceTileBlock
.GateCoordinates:
dbmapcoord 4, 4
dbmapcoord 8, 4
db -1 ; end
SilphCo3F_UnlockedDoorEventScript:
EventFlagAddress hl, EVENT_SILPH_CO_3_UNLOCKED_DOOR1
ldh a, [hUnlockedSilphCoDoors]
and a
ret z
cp $1
jr nz, .unlock_door1
SetEventReuseHL EVENT_SILPH_CO_3_UNLOCKED_DOOR1
ret
.unlock_door1
SetEventAfterBranchReuseHL EVENT_SILPH_CO_3_UNLOCKED_DOOR2, EVENT_SILPH_CO_3_UNLOCKED_DOOR1
ret
SilphCo3F_ScriptPointers:
def_script_pointers
dw_const CheckFightingMapTrainers, SCRIPT_SILPHCO3F_DEFAULT
dw_const DisplayEnemyTrainerTextAndStartBattle, SCRIPT_SILPHCO3F_START_BATTLE
dw_const EndTrainerBattle, SCRIPT_SILPHCO3F_END_BATTLE
SilphCo3F_TextPointers:
def_text_pointers
dw_const SilphCo3FSilphWorkerMText, TEXT_SILPHCO3F_SILPH_WORKER_M
dw_const SilphCo3FRocketText, TEXT_SILPHCO3F_ROCKET
dw_const SilphCo3FScientistText, TEXT_SILPHCO3F_SCIENTIST
dw_const PickUpItemText, TEXT_SILPHCO3F_HYPER_POTION
SilphCo3TrainerHeaders:
def_trainers 2
SilphCo3TrainerHeader0:
trainer EVENT_BEAT_SILPH_CO_3F_TRAINER_0, 2, SilphCo3FRocketBattleText, SilphCo3FRocketEndBattleText, SilphCo3FRocketAfterBattleText
SilphCo3TrainerHeader1:
trainer EVENT_BEAT_SILPH_CO_3F_TRAINER_1, 3, SilphCo3FScientistBattleText, SilphCo3FScientistEndBattleText, SilphCo3FScientistAfterBattleText
db -1 ; end
SilphCo3FSilphWorkerMText:
text_asm
CheckEvent EVENT_BEAT_SILPH_CO_GIOVANNI
ld hl, .YouSavedUsText
jr nz, .beat_giovanni
ld hl, .WhatShouldIDoText
.beat_giovanni
call PrintText
jp TextScriptEnd
.WhatShouldIDoText:
text_far _SilphCo3FSilphWorkerMWhatShouldIDoText
text_end
.YouSavedUsText:
text_far _SilphCo3FSilphWorkerMYouSavedUsText
text_end
SilphCo3FRocketText:
text_asm
ld hl, SilphCo3TrainerHeader0
call TalkToTrainer
jp TextScriptEnd
SilphCo3FRocketBattleText:
text_far _SilphCo3FRocketBattleText
text_end
SilphCo3FRocketEndBattleText:
text_far _SilphCo3FRocketEndBattleText
text_end
SilphCo3FRocketAfterBattleText:
text_far _SilphCo3FRocketAfterBattleText
text_end
SilphCo3FScientistText:
text_asm
ld hl, SilphCo3TrainerHeader1
call TalkToTrainer
jp TextScriptEnd
SilphCo3FScientistBattleText:
text_far _SilphCo3FScientistBattleText
text_end
SilphCo3FScientistEndBattleText:
text_far _SilphCo3FScientistEndBattleText
text_end
SilphCo3FScientistAfterBattleText:
text_far _SilphCo3FScientistAfterBattleText
text_end
|
