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
|
PokemonMansion2F_Script:
call Mansion2CheckReplaceSwitchDoorBlocks
call EnableAutoTextBoxDrawing
ld hl, Mansion2TrainerHeaders
ld de, PokemonMansion2F_ScriptPointers
ld a, [wPokemonMansion2FCurScript]
call ExecuteCurMapScriptInTable
ld [wPokemonMansion2FCurScript], a
ret
Mansion2CheckReplaceSwitchDoorBlocks:
ld hl, wCurrentMapScriptFlags
bit BIT_CUR_MAP_LOADED_1, [hl]
res BIT_CUR_MAP_LOADED_1, [hl]
ret z
CheckEvent EVENT_MANSION_SWITCH_ON
jr nz, .switchTurnedOn
ld a, $e
lb bc, 2, 4
call Mansion2ReplaceBlock
ld a, $54
lb bc, 4, 9
call Mansion2ReplaceBlock
ld a, $5f
lb bc, 11, 3
call Mansion2ReplaceBlock
ret
.switchTurnedOn
ld a, $5f
lb bc, 2, 4
call Mansion2ReplaceBlock
ld a, $e
lb bc, 4, 9
call Mansion2ReplaceBlock
ld a, $e
lb bc, 11, 3
call Mansion2ReplaceBlock
ret
Mansion2ReplaceBlock:
ld [wNewTileBlockID], a
predef_jump ReplaceTileBlock
Mansion2Script_Switches::
ld a, [wSpritePlayerStateData1FacingDirection]
cp SPRITE_FACING_UP
ret nz
xor a
ldh [hJoyHeld], a
ld a, TEXT_POKEMONMANSION2F_SWITCH
ldh [hTextID], a
jp DisplayTextID
PokemonMansion2F_ScriptPointers:
def_script_pointers
dw_const CheckFightingMapTrainers, SCRIPT_POKEMONMANSION2F_DEFAULT
dw_const DisplayEnemyTrainerTextAndStartBattle, SCRIPT_POKEMONMANSION2F_START_BATTLE
dw_const EndTrainerBattle, SCRIPT_POKEMONMANSION2F_END_BATTLE
PokemonMansion2F_TextPointers:
def_text_pointers
dw_const PokemonMansion2FSuperNerdText, TEXT_POKEMONMANSION2F_SUPER_NERD
dw_const PickUpItemText, TEXT_POKEMONMANSION2F_CALCIUM
dw_const PokemonMansion2FDiary1Text, TEXT_POKEMONMANSION2F_DIARY1
dw_const PokemonMansion2FDiary2Text, TEXT_POKEMONMANSION2F_DIARY2
dw_const PokemonMansion2FSwitchText, TEXT_POKEMONMANSION2F_SWITCH
Mansion2TrainerHeaders:
def_trainers
Mansion2TrainerHeader0:
trainer EVENT_BEAT_MANSION_2_TRAINER_0, 0, PokemonMansion2FSuperNerdBattleText, PokemonMansion2FSuperNerdEndBattleText, PokemonMansion2FSuperNerdAfterBattleText
db -1 ; end
PokemonMansion2FSuperNerdText:
text_asm
ld hl, Mansion2TrainerHeader0
call TalkToTrainer
jp TextScriptEnd
PokemonMansion2FSuperNerdBattleText:
text_far _PokemonMansion2FSuperNerdBattleText
text_end
PokemonMansion2FSuperNerdEndBattleText:
text_far _PokemonMansion2FSuperNerdEndBattleText
text_end
PokemonMansion2FSuperNerdAfterBattleText:
text_far _PokemonMansion2FSuperNerdAfterBattleText
text_end
PokemonMansion2FDiary1Text:
text_far _PokemonMansion2FDiary1Text
text_end
PokemonMansion2FDiary2Text:
text_far _PokemonMansion2FDiary2Text
text_end
PokemonMansion2FSwitchText:
text_asm
ld hl, .Text
call PrintText
call YesNoChoice
ld a, [wCurrentMenuItem]
and a
jr nz, .not_pressed
ld a, $1
ld [wDoNotWaitForButtonPressAfterDisplayingText], a
ld hl, wCurrentMapScriptFlags
set BIT_CUR_MAP_LOADED_1, [hl]
ld hl, .PressedText
call PrintText
ld a, SFX_GO_INSIDE
call PlaySound
CheckAndSetEvent EVENT_MANSION_SWITCH_ON
jr z, .done
ResetEventReuseHL EVENT_MANSION_SWITCH_ON
jr .done
.not_pressed
ld hl, .NotPressed
call PrintText
.done
jp TextScriptEnd
.Text:
text_far _PokemonMansion2FSwitchText
text_end
.PressedText:
text_far _PokemonMansion2FSwitchPressedText
text_end
.NotPressed:
text_far _PokemonMansion2FSwitchNotPressedText
text_end
|
