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
|
CeladonDeptStore6F_MapScriptHeader: ; 0x71170
; trigger count
db 0
; callback count
db 1
; callbacks
dbw 1, UnknownScript_0x71175
; 0x71175
UnknownScript_0x71175: ; 0x71175
changeblock $c, $0, $3
return
; 0x7117a
UnknownScript_0x7117a: ; 0x7117a
jumptextfaceplayer UnknownText_0x712c7
; 0x7117d
UnknownScript_0x7117d: ; 0x7117d
jumptextfaceplayer UnknownText_0x71310
; 0x71180
MapCeladonDeptStore6FSignpost5Script: ; 0x71180
loadfont
2writetext UnknownText_0x71250
UnknownScript_0x71184: ; 0x71184
special $0051
loadmenudata $5203
interpretmenu2
writebackup
if_equal $1, UnknownScript_0x7119a
if_equal $2, UnknownScript_0x711b4
if_equal $3, UnknownScript_0x711ce
loadmovesprites
end
; 0x7119a
UnknownScript_0x7119a: ; 0x7119a
checkmoney $0, 200
if_equal $2, UnknownScript_0x711f5
giveitem FRESH_WATER, $1
iffalse UnknownScript_0x711fc
takemoney $0, 200
itemtotext FRESH_WATER, $0
2jump UnknownScript_0x711e8
; 0x711b4
UnknownScript_0x711b4: ; 0x711b4
checkmoney $0, 300
if_equal $2, UnknownScript_0x711f5
giveitem SODA_POP, $1
iffalse UnknownScript_0x711fc
takemoney $0, 300
itemtotext SODA_POP, $0
2jump UnknownScript_0x711e8
; 0x711ce
UnknownScript_0x711ce: ; 0x711ce
checkmoney $0, 350
if_equal $2, UnknownScript_0x711f5
giveitem LEMONADE, $1
iffalse UnknownScript_0x711fc
takemoney $0, 350
itemtotext LEMONADE, $0
2jump UnknownScript_0x711e8
; 0x711e8
UnknownScript_0x711e8: ; 0x711e8
pause 10
playsound $001f
2writetext UnknownText_0x71274
keeptextopen
itemnotify
2jump UnknownScript_0x71184
; 0x711f5
UnknownScript_0x711f5: ; 0x711f5
2writetext UnknownText_0x7128e
closetext
2jump UnknownScript_0x71184
; 0x711fc
UnknownScript_0x711fc: ; 0x711fc
2writetext UnknownText_0x712a7
closetext
2jump UnknownScript_0x71184
; 0x71203
; menu data
INCBIN "baserom.gbc",$71203,$47
MapCeladonDeptStore6FSignpost0Script: ; 0x7124a
jumptext UnknownText_0x7133e
; 0x7124d
UnknownScript_0x7124d: ; 0x7124d
jumpstd $0014
; 0x71250
UnknownText_0x71250: ; 0x71250
db $0, "A vending machine!", $4f
db "Here's the menu.", $57
; 0x71274
UnknownText_0x71274: ; 0x71274
db $0, "Clang!", $51
db "@"
text_from_ram $d099
db $0, $4f
db "popped out.", $57
; 0x7128e
UnknownText_0x7128e: ; 0x7128e
db $0, "Oops, not enough", $4f
db "money…", $57
; 0x712a7
UnknownText_0x712a7: ; 0x712a7
db $0, "There's no more", $4f
db "room for stuff…", $57
; 0x712c7
UnknownText_0x712c7: ; 0x712c7
db $0, "A vending machine", $4f
db "with a prize rou-", $55
db "lette…", $51
db "You never see", $4f
db "those anymore.", $57
; 0x71310
UnknownText_0x71310: ; 0x71310
db $0, "Aww! There's no", $4f
db "games here!", $51
db "I wanted to play…", $57
; 0x7133e
UnknownText_0x7133e: ; 0x7133e
db $0, "6F: ROOFTOP SQUARE", $4f
db "VENDING MACHINES", $57
; 0x71363
CeladonDeptStore6F_MapEventHeader: ; 0x71363
; filler
db 0, 0
; warps
db 2
warp_def $0, $f, 2, GROUP_CELADON_DEPT_STORE_5F, MAP_CELADON_DEPT_STORE_5F
warp_def $0, $2, 1, GROUP_CELADON_DEPT_STORE_ELEVATOR, MAP_CELADON_DEPT_STORE_ELEVATOR
; xy triggers
db 0
; signposts
db 6
signpost 0, 14, $0, MapCeladonDeptStore6FSignpost0Script
signpost 0, 3, $0, MapCeladonDeptStore6FSignpost1Script
signpost 1, 8, $1, MapCeladonDeptStore6FSignpost5Script
signpost 1, 9, $1, MapCeladonDeptStore6FSignpost5Script
signpost 1, 10, $1, MapCeladonDeptStore6FSignpost5Script
signpost 1, 11, $1, MapCeladonDeptStore6FSignpost5Script
; people-events
db 2
person_event $2b, 6, 13, $7, $0, 255, 255, $0, 0, UnknownScript_0x7117a, $ffff
person_event $27, 9, 16, $2, $12, 255, 255, $80, 0, UnknownScript_0x7117d, $ffff
; 0x713ab
|