pokecrystal/maps/CeladonDeptStore6F.asm

188 lines
3.9 KiB
NASM

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 MenuDataHeader_0x71203
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
MenuDataHeader_0x71203: ; 0x71203
db $40 ; flags
db 02, 00 ; start coords
db 11, 19 ; end coords
dw MenuData2_0x7120b
db 1 ; default option
; 0x7120b
MenuData2_0x7120b: ; 0x7120b
db $80 ; flags
db 4 ; items
db "FRESH WATER ¥200@"
db "SODA POP ¥300@"
db "LEMONADE ¥350@"
db "CANCEL@"
; 0x71249
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