mirror of https://github.com/pret/pokecrystal.git
546 lines
12 KiB
NASM
546 lines
12 KiB
NASM
GoldenrodGameCorner_MapScriptHeader: ; 0x56bf4
|
|
; trigger count
|
|
db 0
|
|
|
|
; callback count
|
|
db 1
|
|
|
|
; callbacks
|
|
|
|
dbw 2, UnknownScript_0x56bf9
|
|
; 0x56bf9
|
|
|
|
UnknownScript_0x56bf9: ; 0x56bf9
|
|
checkevent EVENT_BEAT_ELITE_FOUR
|
|
iffalse UnknownScript_0x56c19
|
|
checkitem COIN_CASE
|
|
iffalse UnknownScript_0x56c0e
|
|
checkcode VAR_WEEKDAY
|
|
if_equal WEDNESDAY, UnknownScript_0x56c11
|
|
if_equal SATURDAY, UnknownScript_0x56c11
|
|
UnknownScript_0x56c0e: ; 0x56c0e
|
|
appear $d
|
|
return
|
|
; 0x56c11
|
|
|
|
UnknownScript_0x56c11: ; 0x56c11
|
|
checkflag ENGINE_5E
|
|
iftrue UnknownScript_0x56c19
|
|
disappear $d
|
|
UnknownScript_0x56c19: ;0x56c19
|
|
return
|
|
; 0x56c1a
|
|
|
|
PokefanMScript_0x56c1a: ; 0x56c1a
|
|
faceplayer
|
|
loadfont
|
|
writetext UnknownText_0x5718a
|
|
closetext
|
|
loadmovesprites
|
|
spriteface $d, RIGHT
|
|
end
|
|
; 0x56c25
|
|
|
|
ClerkScript_0x56c25: ; 0x56c25
|
|
jumpstd $0032
|
|
; 0x56c28
|
|
|
|
ReceptionistScript_0x56c28: ; 0x56c28
|
|
faceplayer
|
|
loadfont
|
|
writetext UnknownText_0x56e50
|
|
closetext
|
|
checkitem COIN_CASE
|
|
iffalse UnknownScript_0x56cc3
|
|
writetext UnknownText_0x56e8b
|
|
UnknownScript_0x56c36: ; 056c36
|
|
special Function24b25
|
|
loadmenudata MenuDataHeader_0x56cc9
|
|
interpretmenu2
|
|
writebackup
|
|
if_equal $1, UnknownScript_0x56c4d
|
|
if_equal $2, UnknownScript_0x56c69
|
|
if_equal $3, UnknownScript_0x56c85
|
|
jump UnknownScript_0x56cbd
|
|
; 0x56c4d
|
|
|
|
UnknownScript_0x56c4d: ; 0x56c4d
|
|
checkcoins 5500
|
|
if_equal $2, UnknownScript_0x56cb1
|
|
itemtotext TM_THUNDER, $0
|
|
scall UnknownScript_0x56ca1
|
|
iffalse UnknownScript_0x56cbd
|
|
giveitem TM_THUNDER, $1
|
|
iffalse UnknownScript_0x56cb7
|
|
takecoins 5500
|
|
jump UnknownScript_0x56ca6
|
|
; 0x56c69
|
|
|
|
UnknownScript_0x56c69: ; 0x56c69
|
|
checkcoins 5500
|
|
if_equal $2, UnknownScript_0x56cb1
|
|
itemtotext TM_BLIZZARD, $0
|
|
scall UnknownScript_0x56ca1
|
|
iffalse UnknownScript_0x56cbd
|
|
giveitem TM_BLIZZARD, $1
|
|
iffalse UnknownScript_0x56cb7
|
|
takecoins 5500
|
|
jump UnknownScript_0x56ca6
|
|
; 0x56c85
|
|
|
|
UnknownScript_0x56c85: ; 0x56c85
|
|
checkcoins 5500
|
|
if_equal $2, UnknownScript_0x56cb1
|
|
itemtotext TM_FIRE_BLAST, $0
|
|
scall UnknownScript_0x56ca1
|
|
iffalse UnknownScript_0x56cbd
|
|
giveitem TM_FIRE_BLAST, $1
|
|
iffalse UnknownScript_0x56cb7
|
|
takecoins 5500
|
|
jump UnknownScript_0x56ca6
|
|
; 0x56ca1
|
|
|
|
UnknownScript_0x56ca1: ; 0x56ca1
|
|
writetext UnknownText_0x56ea8
|
|
yesorno
|
|
end
|
|
; 0x56ca6
|
|
|
|
UnknownScript_0x56ca6: ; 0x56ca6
|
|
waitbutton
|
|
playsound SFX_TRANSACTION
|
|
writetext UnknownText_0x56ebd
|
|
closetext
|
|
jump UnknownScript_0x56c36
|
|
; 0x56cb1
|
|
|
|
UnknownScript_0x56cb1: ; 0x56cb1
|
|
writetext UnknownText_0x56ecb
|
|
closetext
|
|
loadmovesprites
|
|
end
|
|
; 0x56cb7
|
|
|
|
UnknownScript_0x56cb7: ; 0x56cb7
|
|
writetext UnknownText_0x56ee8
|
|
closetext
|
|
loadmovesprites
|
|
end
|
|
; 0x56cbd
|
|
|
|
UnknownScript_0x56cbd: ; 0x56cbd
|
|
writetext UnknownText_0x56f09
|
|
closetext
|
|
loadmovesprites
|
|
end
|
|
; 0x56cc3
|
|
|
|
UnknownScript_0x56cc3: ; 0x56cc3
|
|
writetext UnknownText_0x56f35
|
|
closetext
|
|
loadmovesprites
|
|
end
|
|
; 0x56cc9
|
|
|
|
|
|
MenuDataHeader_0x56cc9: ; 0x56cc9
|
|
db $40 ; flags
|
|
db 02, 00 ; start coords
|
|
db 11, 15 ; end coords
|
|
dw MenuData2_0x56cd1
|
|
db 1 ; default option
|
|
; 0x56cd1
|
|
|
|
MenuData2_0x56cd1: ; 0x56cd1
|
|
db $80 ; flags
|
|
db 4 ; items
|
|
db "TM25 5500@"
|
|
db "TM14 5500@"
|
|
db "TM38 5500@"
|
|
db "CANCEL@"
|
|
; 0x56d01
|
|
|
|
|
|
ReceptionistScript_0x56d01: ; 0x56d01
|
|
faceplayer
|
|
loadfont
|
|
writetext UnknownText_0x56e50
|
|
closetext
|
|
checkitem COIN_CASE
|
|
iffalse UnknownScript_0x56cc3
|
|
UnknownScript_0x56d0c: ; 0x56d0c
|
|
writetext UnknownText_0x56e8b
|
|
special Function24b25
|
|
loadmenudata MenuDataHeader_0x56db0
|
|
interpretmenu2
|
|
writebackup
|
|
if_equal $1, UnknownScript_0x56d26
|
|
if_equal $2, UnknownScript_0x56d54
|
|
if_equal $3, UnknownScript_0x56d82
|
|
jump UnknownScript_0x56cbd
|
|
; 0x56d26
|
|
|
|
UnknownScript_0x56d26: ; 0x56d26
|
|
checkcoins 100
|
|
if_equal $2, UnknownScript_0x56cb1
|
|
checkcode VAR_PARTYCOUNT
|
|
if_equal $6, UnknownScript_0x56cb7
|
|
pokenamemem ABRA, $0
|
|
scall UnknownScript_0x56ca1
|
|
iffalse UnknownScript_0x56cbd
|
|
waitbutton
|
|
playsound SFX_TRANSACTION
|
|
writetext UnknownText_0x56ebd
|
|
closetext
|
|
writebyte ABRA
|
|
special Functionc230
|
|
givepoke ABRA, 5, 0, 0
|
|
takecoins 100
|
|
jump UnknownScript_0x56d0c
|
|
; 0x56d54
|
|
|
|
UnknownScript_0x56d54: ; 0x56d54
|
|
checkcoins 800
|
|
if_equal $2, UnknownScript_0x56cb1
|
|
checkcode VAR_PARTYCOUNT
|
|
if_equal $6, UnknownScript_0x56cb7
|
|
pokenamemem CUBONE, $0
|
|
scall UnknownScript_0x56ca1
|
|
iffalse UnknownScript_0x56cbd
|
|
waitbutton
|
|
playsound SFX_TRANSACTION
|
|
writetext UnknownText_0x56ebd
|
|
closetext
|
|
writebyte CUBONE
|
|
special Functionc230
|
|
givepoke CUBONE, 15, 0, 0
|
|
takecoins 800
|
|
jump UnknownScript_0x56d0c
|
|
; 0x56d82
|
|
|
|
UnknownScript_0x56d82: ; 0x56d82
|
|
checkcoins 1500
|
|
if_equal $2, UnknownScript_0x56cb1
|
|
checkcode VAR_PARTYCOUNT
|
|
if_equal $6, UnknownScript_0x56cb7
|
|
pokenamemem WOBBUFFET, $0
|
|
scall UnknownScript_0x56ca1
|
|
iffalse UnknownScript_0x56cbd
|
|
waitbutton
|
|
playsound SFX_TRANSACTION
|
|
writetext UnknownText_0x56ebd
|
|
closetext
|
|
writebyte WOBBUFFET
|
|
special Functionc230
|
|
givepoke WOBBUFFET, 15, 0, 0
|
|
takecoins 1500
|
|
jump UnknownScript_0x56d0c
|
|
; 0x56db0
|
|
|
|
|
|
MenuDataHeader_0x56db0: ; 0x56db0
|
|
db $40 ; flags
|
|
db 02, 00 ; start coords
|
|
db 11, 17 ; end coords
|
|
dw MenuData2_0x56db8
|
|
db 1 ; default option
|
|
; 0x56db8
|
|
|
|
MenuData2_0x56db8: ; 0x56db8
|
|
db $80 ; flags
|
|
db 4 ; items
|
|
db "ABRA 100@"
|
|
db "CUBONE 800@"
|
|
db "WOBBUFFET 1500@"
|
|
db "CANCEL@"
|
|
; 0x56df1
|
|
|
|
|
|
PharmacistScript_0x56df1: ; 0x56df1
|
|
faceplayer
|
|
loadfont
|
|
writetext UnknownText_0x56f55
|
|
closetext
|
|
loadmovesprites
|
|
spriteface $fe, LEFT
|
|
end
|
|
; 0x56dfc
|
|
|
|
PokefanMScript_0x56dfc: ; 0x56dfc
|
|
faceplayer
|
|
loadfont
|
|
writetext UnknownText_0x56f9e
|
|
closetext
|
|
loadmovesprites
|
|
spriteface $7, RIGHT
|
|
end
|
|
; 0x56e07
|
|
|
|
CooltrainerMScript_0x56e07: ; 0x56e07
|
|
faceplayer
|
|
loadfont
|
|
writetext UnknownText_0x56ff4
|
|
closetext
|
|
loadmovesprites
|
|
spriteface $8, LEFT
|
|
end
|
|
; 0x56e12
|
|
|
|
PokefanFScript_0x56e12: ; 0x56e12
|
|
faceplayer
|
|
loadfont
|
|
writetext UnknownText_0x5702b
|
|
closetext
|
|
loadmovesprites
|
|
spriteface $9, RIGHT
|
|
end
|
|
; 0x56e1d
|
|
|
|
CooltrainerFScript_0x56e1d: ; 0x56e1d
|
|
jumptextfaceplayer UnknownText_0x57097
|
|
; 0x56e20
|
|
|
|
GentlemanScript_0x56e20: ; 0x56e20
|
|
faceplayer
|
|
loadfont
|
|
writetext UnknownText_0x570b1
|
|
closetext
|
|
loadmovesprites
|
|
spriteface $b, RIGHT
|
|
end
|
|
; 0x56e2b
|
|
|
|
PokefanMScript_0x56e2b: ; 0x56e2b
|
|
jumptextfaceplayer UnknownText_0x5710d
|
|
; 0x56e2e
|
|
|
|
MapGoldenrodGameCornerSignpost30Script: ; 0x56e2e
|
|
jumptext UnknownText_0x571af
|
|
; 0x56e31
|
|
|
|
MapGoldenrodGameCornerSignpost17Script: ; 0x56e31
|
|
random $6
|
|
if_equal $0, MapGoldenrodGameCornerSignpost7Script
|
|
refreshscreen $0
|
|
writebyte $0
|
|
special Functionc373
|
|
loadmovesprites
|
|
end
|
|
; 0x56e40
|
|
|
|
MapGoldenrodGameCornerSignpost7Script: ; 0x56e40
|
|
refreshscreen $0
|
|
writebyte $1
|
|
special Functionc373
|
|
loadmovesprites
|
|
end
|
|
; 0x56e49
|
|
|
|
MapGoldenrodGameCornerSignpost29Script: ; 0x56e49
|
|
refreshscreen $0
|
|
special Functionc380
|
|
loadmovesprites
|
|
end
|
|
; 0x56e50
|
|
|
|
UnknownText_0x56e50: ; 0x56e50
|
|
text "Welcome!"
|
|
|
|
para "We exchange your"
|
|
line "game coins for"
|
|
cont "fabulous prizes!"
|
|
done
|
|
; 0x56e8b
|
|
|
|
UnknownText_0x56e8b: ; 0x56e8b
|
|
text "Which prize would"
|
|
line "you like?"
|
|
done
|
|
; 0x56ea8
|
|
|
|
UnknownText_0x56ea8: ; 0x56ea8
|
|
text_from_ram StringBuffer3
|
|
text "."
|
|
line "Is that right?"
|
|
done
|
|
; 0x56ebd
|
|
|
|
UnknownText_0x56ebd: ; 0x56ebd
|
|
text "Here you go!"
|
|
done
|
|
; 0x56ecb
|
|
|
|
UnknownText_0x56ecb: ; 0x56ecb
|
|
text "Sorry! You need"
|
|
line "more coins."
|
|
done
|
|
; 0x56ee8
|
|
|
|
UnknownText_0x56ee8: ; 0x56ee8
|
|
text "Sorry. You can't"
|
|
line "carry any more."
|
|
done
|
|
; 0x56f09
|
|
|
|
UnknownText_0x56f09: ; 0x56f09
|
|
text "OK. Please save"
|
|
line "your coins and"
|
|
cont "come again!"
|
|
done
|
|
; 0x56f35
|
|
|
|
UnknownText_0x56f35: ; 0x56f35
|
|
text "Oh? You don't have"
|
|
line "a COIN CASE."
|
|
done
|
|
; 0x56f55
|
|
|
|
UnknownText_0x56f55: ; 0x56f55
|
|
text "I always play this"
|
|
line "slot machine. It"
|
|
|
|
para "pays out more than"
|
|
line "others, I think."
|
|
done
|
|
; 0x56f9e
|
|
|
|
UnknownText_0x56f9e: ; 0x56f9e
|
|
text "I just love this"
|
|
line "new slot machine."
|
|
|
|
para "It's more of a"
|
|
line "challenge than the"
|
|
cont "ones in CELADON."
|
|
done
|
|
; 0x56ff4
|
|
|
|
UnknownText_0x56ff4: ; 0x56ff4
|
|
text "Life is a gamble."
|
|
line "I'm going to flip"
|
|
cont "cards till I drop!"
|
|
done
|
|
; 0x5702b
|
|
|
|
UnknownText_0x5702b: ; 0x5702b
|
|
text "Card flip…"
|
|
|
|
para "I prefer it over"
|
|
line "the slots because"
|
|
|
|
para "it's easier to"
|
|
line "figure the odds."
|
|
|
|
para "But the payout is"
|
|
line "much lower."
|
|
done
|
|
; 0x57097
|
|
|
|
UnknownText_0x57097: ; 0x57097
|
|
text "I won't quit until"
|
|
line "I win!"
|
|
done
|
|
; 0x570b1
|
|
|
|
UnknownText_0x570b1: ; 0x570b1
|
|
text "I taught BLIZZARD"
|
|
line "to my #MON."
|
|
|
|
para "It was hard to get"
|
|
line "enough coins for"
|
|
|
|
para "it, but it was"
|
|
line "worth it."
|
|
done
|
|
; 0x5710d
|
|
|
|
UnknownText_0x5710d: ; 0x5710d
|
|
text "I couldn't win at"
|
|
line "the slots, and I"
|
|
|
|
para "blew it on card"
|
|
line "flipping…"
|
|
|
|
para "I got so furious,"
|
|
line "I tossed out my"
|
|
|
|
para "COIN CASE in the"
|
|
line "UNDERGROUND."
|
|
done
|
|
; 0x5718a
|
|
|
|
UnknownText_0x5718a: ; 0x5718a
|
|
text "Wahahah! The coins"
|
|
line "keep rolling in!"
|
|
done
|
|
; 0x571af
|
|
|
|
UnknownText_0x571af: ; 0x571af
|
|
text "Someone left their"
|
|
line "drink."
|
|
|
|
para "It smells sweet."
|
|
done
|
|
; 0x571db
|
|
|
|
GoldenrodGameCorner_MapEventHeader: ; 0x571db
|
|
; filler
|
|
db 0, 0
|
|
|
|
; warps
|
|
db 2
|
|
warp_def $d, $2, 10, GROUP_GOLDENROD_CITY, MAP_GOLDENROD_CITY
|
|
warp_def $d, $3, 10, GROUP_GOLDENROD_CITY, MAP_GOLDENROD_CITY
|
|
|
|
; xy triggers
|
|
db 0
|
|
|
|
; signposts
|
|
db 31
|
|
signpost 6, 6, $0, MapGoldenrodGameCornerSignpost17Script
|
|
signpost 7, 6, $0, MapGoldenrodGameCornerSignpost17Script
|
|
signpost 8, 6, $0, MapGoldenrodGameCornerSignpost17Script
|
|
signpost 9, 6, $0, MapGoldenrodGameCornerSignpost17Script
|
|
signpost 10, 6, $0, MapGoldenrodGameCornerSignpost17Script
|
|
signpost 11, 6, $3, MapGoldenrodGameCornerSignpost17Script
|
|
signpost 6, 7, $0, MapGoldenrodGameCornerSignpost17Script
|
|
signpost 7, 7, $0, MapGoldenrodGameCornerSignpost7Script
|
|
signpost 8, 7, $0, MapGoldenrodGameCornerSignpost17Script
|
|
signpost 9, 7, $0, MapGoldenrodGameCornerSignpost17Script
|
|
signpost 10, 7, $0, MapGoldenrodGameCornerSignpost17Script
|
|
signpost 11, 7, $4, MapGoldenrodGameCornerSignpost17Script
|
|
signpost 6, 12, $0, MapGoldenrodGameCornerSignpost17Script
|
|
signpost 7, 12, $0, MapGoldenrodGameCornerSignpost17Script
|
|
signpost 8, 12, $0, MapGoldenrodGameCornerSignpost17Script
|
|
signpost 9, 12, $0, MapGoldenrodGameCornerSignpost17Script
|
|
signpost 10, 12, $0, MapGoldenrodGameCornerSignpost17Script
|
|
signpost 11, 12, $3, MapGoldenrodGameCornerSignpost17Script
|
|
signpost 6, 13, $0, MapGoldenrodGameCornerSignpost29Script
|
|
signpost 7, 13, $0, MapGoldenrodGameCornerSignpost29Script
|
|
signpost 8, 13, $0, MapGoldenrodGameCornerSignpost29Script
|
|
signpost 9, 13, $0, MapGoldenrodGameCornerSignpost29Script
|
|
signpost 10, 13, $0, MapGoldenrodGameCornerSignpost29Script
|
|
signpost 11, 13, $4, MapGoldenrodGameCornerSignpost29Script
|
|
signpost 6, 18, $0, MapGoldenrodGameCornerSignpost29Script
|
|
signpost 7, 18, $0, MapGoldenrodGameCornerSignpost29Script
|
|
signpost 8, 18, $0, MapGoldenrodGameCornerSignpost29Script
|
|
signpost 9, 18, $0, MapGoldenrodGameCornerSignpost29Script
|
|
signpost 10, 18, $0, MapGoldenrodGameCornerSignpost29Script
|
|
signpost 11, 18, $3, MapGoldenrodGameCornerSignpost29Script
|
|
signpost 1, 12, $4, MapGoldenrodGameCornerSignpost30Script
|
|
|
|
; people-events
|
|
db 12
|
|
person_event SPRITE_CLERK, 6, 7, $6, $0, 255, 255, $80, 0, ClerkScript_0x56c25, $ffff
|
|
person_event SPRITE_RECEPTIONIST, 6, 20, $6, $0, 255, 255, $80, 0, ReceptionistScript_0x56c28, $ffff
|
|
person_event SPRITE_RECEPTIONIST, 6, 22, $6, $0, 255, 255, $80, 0, ReceptionistScript_0x56d01, $ffff
|
|
person_event SPRITE_PHARMACIST, 11, 12, $8, $0, 255, 2, $90, 0, PharmacistScript_0x56df1, $ffff
|
|
person_event SPRITE_PHARMACIST, 11, 12, $8, $0, 255, 4, $90, 0, PharmacistScript_0x56df1, $ffff
|
|
person_event SPRITE_POKEFAN_M, 14, 15, $9, $0, 255, 255, $b0, 0, PokefanMScript_0x56dfc, $ffff
|
|
person_event SPRITE_COOLTRAINER_M, 12, 18, $8, $0, 255, 255, $90, 0, CooltrainerMScript_0x56e07, $ffff
|
|
person_event SPRITE_POKEFAN_F, 10, 21, $9, $0, 255, 255, $80, 0, PokefanFScript_0x56e12, $ffff
|
|
person_event SPRITE_COOLTRAINER_F, 7, 14, $2, $12, 255, 255, $a0, 0, CooltrainerFScript_0x56e1d, $ffff
|
|
person_event SPRITE_GENTLEMAN, 14, 9, $9, $0, 255, 255, $90, 0, GentlemanScript_0x56e20, $ffff
|
|
person_event SPRITE_POKEFAN_M, 13, 6, $2, $11, 255, 255, $b0, 0, PokefanMScript_0x56e2b, $ffff
|
|
person_event SPRITE_POKEFAN_M, 14, 21, $9, $0, 255, 255, $80, 0, PokefanMScript_0x56c1a, $076b
|
|
; 0x57322
|