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
|
Route22Gate_Script:
call EnableAutoTextBoxDrawing
ld hl, Route22Gate_ScriptPointers
ld a, [wRoute22GateCurScript]
call CallFunctionInTable
ld a, [wYCoord]
cp 4
ld a, ROUTE_23
jr c, .asm_1e69a
ld a, ROUTE_22
.asm_1e69a
ld [wLastMap], a
ret
Route22Gate_ScriptPointers:
dw Route22GateScript0
dw Route22GateScript1
dw Route22GateScript2
Route22GateScript0:
ld hl, Route22GateScriptCoords
call ArePlayerCoordsInArray
ret nc
xor a
ldh [hJoyHeld], a
ld a, SPRITE_FACING_LEFT
ld [wSprite01StateData1FacingDirection], a
ld a, $1
ldh [hSpriteIndexOrTextID], a
call DisplayTextID
ret
Route22GateScriptCoords:
dbmapcoord 4, 2
dbmapcoord 5, 2
db -1 ; end
Route22GateScript_1e6ba:
ld a, $1
ld [wSimulatedJoypadStatesIndex], a
ld a, D_DOWN
ld [wSimulatedJoypadStatesEnd], a
ld [wSpritePlayerStateData1FacingDirection], a
ld [wJoyIgnore], a
jp StartSimulatingJoypadStates
Route22GateScript1:
ld a, [wSimulatedJoypadStatesIndex]
and a
ret nz
xor a
ld [wJoyIgnore], a
call Delay3
ld a, $0
ld [wRoute22GateCurScript], a
Route22GateScript2:
ret
Route22Gate_TextPointers:
dw Route22GateText1
Route22GateText1:
text_asm
ld a, [wObtainedBadges]
bit BIT_BOULDERBADGE, a
jr nz, .asm_1e6f6
ld hl, Route22GateText_1e704
call PrintText
call Route22GateScript_1e6ba
ld a, $1
jr .asm_1e6fe
.asm_1e6f6
ld hl, Route22GateText_1e71a
call PrintText
ld a, $2
.asm_1e6fe
ld [wRoute22GateCurScript], a
jp TextScriptEnd
Route22GateText_1e704:
text_far _Route22GateText_1e704
text_asm
ld a, SFX_DENIED
call PlaySoundWaitForCurrent
call WaitForSoundToFinish
ld hl, Route22GateText_1e715
ret
Route22GateText_1e715:
text_far _Route22GateText_1e715
text_end
Route22GateText_1e71a:
text_far _Route22GateText_1e71a
sound_get_item_1
text_end
|
