pokecrystal-board/maps/GoldenrodGameCorner.asm

494 lines
11 KiB
NASM
Raw Normal View History

2015-07-10 01:45:35 -07:00
GoldenrodGameCorner_MapScriptHeader:
; trigger count
db 0
; callback count
db 1
; callbacks
dbw 2, UnknownScript_0x56bf9
2015-07-10 01:45:35 -07:00
UnknownScript_0x56bf9:
2015-06-24 20:20:04 -07:00
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
2015-07-10 01:45:35 -07:00
UnknownScript_0x56c0e:
appear $d
return
2015-07-10 01:45:35 -07:00
UnknownScript_0x56c11:
2015-06-25 22:30:16 -07:00
checkflag ENGINE_5E
iftrue UnknownScript_0x56c19
disappear $d
UnknownScript_0x56c19: ;0x56c19
return
2015-07-10 01:45:35 -07:00
PokefanMScript_0x56c1a:
faceplayer
loadfont
2015-01-20 00:01:23 -08:00
writetext UnknownText_0x5718a
closetext
loadmovesprites
spriteface $d, RIGHT
end
2015-07-10 01:45:35 -07:00
ClerkScript_0x56c25:
jumpstd $0032
2015-07-10 01:45:35 -07:00
ReceptionistScript_0x56c28:
faceplayer
loadfont
2015-01-20 00:01:23 -08:00
writetext UnknownText_0x56e50
closetext
checkitem COIN_CASE
iffalse UnknownScript_0x56cc3
2015-01-20 00:01:23 -08:00
writetext UnknownText_0x56e8b
UnknownScript_0x56c36: ; 056c36
special Function24b25
2013-04-30 23:28:11 -07:00
loadmenudata MenuDataHeader_0x56cc9
interpretmenu2
writebackup
if_equal $1, UnknownScript_0x56c4d
if_equal $2, UnknownScript_0x56c69
if_equal $3, UnknownScript_0x56c85
2015-01-20 00:01:23 -08:00
jump UnknownScript_0x56cbd
2015-07-10 01:45:35 -07:00
UnknownScript_0x56c4d:
checkcoins 5500
if_equal $2, UnknownScript_0x56cb1
itemtotext TM_THUNDER, $0
2015-01-20 00:01:23 -08:00
scall UnknownScript_0x56ca1
iffalse UnknownScript_0x56cbd
giveitem TM_THUNDER, $1
iffalse UnknownScript_0x56cb7
takecoins 5500
2015-01-20 00:01:23 -08:00
jump UnknownScript_0x56ca6
2015-07-10 01:45:35 -07:00
UnknownScript_0x56c69:
checkcoins 5500
if_equal $2, UnknownScript_0x56cb1
itemtotext TM_BLIZZARD, $0
2015-01-20 00:01:23 -08:00
scall UnknownScript_0x56ca1
iffalse UnknownScript_0x56cbd
giveitem TM_BLIZZARD, $1
iffalse UnknownScript_0x56cb7
takecoins 5500
2015-01-20 00:01:23 -08:00
jump UnknownScript_0x56ca6
2015-07-10 01:45:35 -07:00
UnknownScript_0x56c85:
checkcoins 5500
if_equal $2, UnknownScript_0x56cb1
itemtotext TM_FIRE_BLAST, $0
2015-01-20 00:01:23 -08:00
scall UnknownScript_0x56ca1
iffalse UnknownScript_0x56cbd
giveitem TM_FIRE_BLAST, $1
iffalse UnknownScript_0x56cb7
takecoins 5500
2015-01-20 00:01:23 -08:00
jump UnknownScript_0x56ca6
2015-07-10 01:45:35 -07:00
UnknownScript_0x56ca1:
2015-01-20 00:01:23 -08:00
writetext UnknownText_0x56ea8
yesorno
end
2015-07-10 01:45:35 -07:00
UnknownScript_0x56ca6:
waitbutton
playsound SFX_TRANSACTION
2015-01-20 00:01:23 -08:00
writetext UnknownText_0x56ebd
closetext
2015-01-20 00:01:23 -08:00
jump UnknownScript_0x56c36
2015-07-10 01:45:35 -07:00
UnknownScript_0x56cb1:
2015-01-20 00:01:23 -08:00
writetext UnknownText_0x56ecb
closetext
loadmovesprites
end
2015-07-10 01:45:35 -07:00
UnknownScript_0x56cb7:
2015-01-20 00:01:23 -08:00
writetext UnknownText_0x56ee8
closetext
loadmovesprites
end
2015-07-10 01:45:35 -07:00
UnknownScript_0x56cbd:
2015-01-20 00:01:23 -08:00
writetext UnknownText_0x56f09
closetext
loadmovesprites
end
2015-07-10 01:45:35 -07:00
UnknownScript_0x56cc3:
2015-01-20 00:01:23 -08:00
writetext UnknownText_0x56f35
closetext
loadmovesprites
end
2013-04-30 23:28:11 -07:00
2015-07-10 01:45:35 -07:00
MenuDataHeader_0x56cc9:
2013-04-30 23:28:11 -07:00
db $40 ; flags
db 02, 00 ; start coords
db 11, 15 ; end coords
dw MenuData2_0x56cd1
db 1 ; default option
2015-07-10 01:45:35 -07:00
MenuData2_0x56cd1:
2013-04-30 23:28:11 -07:00
db $80 ; flags
db 4 ; items
db "TM25 5500@"
db "TM14 5500@"
db "TM38 5500@"
db "CANCEL@"
2015-07-10 01:45:35 -07:00
ReceptionistScript_0x56d01:
faceplayer
loadfont
2015-01-20 00:01:23 -08:00
writetext UnknownText_0x56e50
closetext
checkitem COIN_CASE
iffalse UnknownScript_0x56cc3
2015-07-10 01:45:35 -07:00
UnknownScript_0x56d0c:
2015-01-20 00:01:23 -08:00
writetext UnknownText_0x56e8b
special Function24b25
2013-04-30 23:28:11 -07:00
loadmenudata MenuDataHeader_0x56db0
interpretmenu2
writebackup
if_equal $1, UnknownScript_0x56d26
if_equal $2, UnknownScript_0x56d54
if_equal $3, UnknownScript_0x56d82
2015-01-20 00:01:23 -08:00
jump UnknownScript_0x56cbd
2015-07-10 01:45:35 -07:00
UnknownScript_0x56d26:
checkcoins 100
if_equal $2, UnknownScript_0x56cb1
checkcode VAR_PARTYCOUNT
if_equal $6, UnknownScript_0x56cb7
pokenamemem ABRA, $0
2015-01-20 00:01:23 -08:00
scall UnknownScript_0x56ca1
iffalse UnknownScript_0x56cbd
waitbutton
playsound SFX_TRANSACTION
2015-01-20 00:01:23 -08:00
writetext UnknownText_0x56ebd
closetext
writebyte ABRA
special Functionc230
givepoke ABRA, 5, 0, 0
takecoins 100
2015-01-20 00:01:23 -08:00
jump UnknownScript_0x56d0c
2015-07-10 01:45:35 -07:00
UnknownScript_0x56d54:
checkcoins 800
if_equal $2, UnknownScript_0x56cb1
checkcode VAR_PARTYCOUNT
if_equal $6, UnknownScript_0x56cb7
pokenamemem CUBONE, $0
2015-01-20 00:01:23 -08:00
scall UnknownScript_0x56ca1
iffalse UnknownScript_0x56cbd
waitbutton
playsound SFX_TRANSACTION
2015-01-20 00:01:23 -08:00
writetext UnknownText_0x56ebd
closetext
writebyte CUBONE
special Functionc230
givepoke CUBONE, 15, 0, 0
takecoins 800
2015-01-20 00:01:23 -08:00
jump UnknownScript_0x56d0c
2015-07-10 01:45:35 -07:00
UnknownScript_0x56d82:
checkcoins 1500
if_equal $2, UnknownScript_0x56cb1
checkcode VAR_PARTYCOUNT
if_equal $6, UnknownScript_0x56cb7
pokenamemem WOBBUFFET, $0
2015-01-20 00:01:23 -08:00
scall UnknownScript_0x56ca1
iffalse UnknownScript_0x56cbd
waitbutton
playsound SFX_TRANSACTION
2015-01-20 00:01:23 -08:00
writetext UnknownText_0x56ebd
closetext
writebyte WOBBUFFET
special Functionc230
givepoke WOBBUFFET, 15, 0, 0
takecoins 1500
2015-01-20 00:01:23 -08:00
jump UnknownScript_0x56d0c
2013-04-30 23:28:11 -07:00
2015-07-10 01:45:35 -07:00
MenuDataHeader_0x56db0:
2013-04-30 23:28:11 -07:00
db $40 ; flags
db 02, 00 ; start coords
db 11, 17 ; end coords
dw MenuData2_0x56db8
db 1 ; default option
2015-07-10 01:45:35 -07:00
MenuData2_0x56db8:
2013-04-30 23:28:11 -07:00
db $80 ; flags
db 4 ; items
db "ABRA 100@"
db "CUBONE 800@"
db "WOBBUFFET 1500@"
db "CANCEL@"
2015-07-10 01:45:35 -07:00
PharmacistScript_0x56df1:
faceplayer
loadfont
2015-01-20 00:01:23 -08:00
writetext UnknownText_0x56f55
closetext
loadmovesprites
spriteface $fe, LEFT
end
2015-07-10 01:45:35 -07:00
PokefanMScript_0x56dfc:
faceplayer
loadfont
2015-01-20 00:01:23 -08:00
writetext UnknownText_0x56f9e
closetext
loadmovesprites
spriteface $7, RIGHT
end
2015-07-10 01:45:35 -07:00
CooltrainerMScript_0x56e07:
faceplayer
loadfont
2015-01-20 00:01:23 -08:00
writetext UnknownText_0x56ff4
closetext
loadmovesprites
spriteface $8, LEFT
end
2015-07-10 01:45:35 -07:00
PokefanFScript_0x56e12:
faceplayer
loadfont
2015-01-20 00:01:23 -08:00
writetext UnknownText_0x5702b
closetext
loadmovesprites
spriteface $9, RIGHT
end
2015-07-10 01:45:35 -07:00
CooltrainerFScript_0x56e1d:
jumptextfaceplayer UnknownText_0x57097
2015-07-10 01:45:35 -07:00
GentlemanScript_0x56e20:
faceplayer
loadfont
2015-01-20 00:01:23 -08:00
writetext UnknownText_0x570b1
closetext
loadmovesprites
spriteface $b, RIGHT
end
2015-07-10 01:45:35 -07:00
PokefanMScript_0x56e2b:
jumptextfaceplayer UnknownText_0x5710d
2015-07-10 01:45:35 -07:00
MapGoldenrodGameCornerSignpost30Script:
jumptext UnknownText_0x571af
2015-07-10 01:45:35 -07:00
MapGoldenrodGameCornerSignpost17Script:
random $6
if_equal $0, MapGoldenrodGameCornerSignpost7Script
refreshscreen $0
writebyte $0
special Functionc373
loadmovesprites
end
2015-07-10 01:45:35 -07:00
MapGoldenrodGameCornerSignpost7Script:
refreshscreen $0
writebyte $1
special Functionc373
loadmovesprites
end
2015-07-10 01:45:35 -07:00
MapGoldenrodGameCornerSignpost29Script:
refreshscreen $0
special Functionc380
loadmovesprites
end
2015-07-10 01:45:35 -07:00
UnknownText_0x56e50:
text "Welcome!"
para "We exchange your"
line "game coins for"
cont "fabulous prizes!"
done
2015-07-10 01:45:35 -07:00
UnknownText_0x56e8b:
text "Which prize would"
line "you like?"
done
2015-07-10 01:45:35 -07:00
UnknownText_0x56ea8:
2015-02-10 15:37:24 -08:00
text_from_ram StringBuffer3
text "."
line "Is that right?"
done
2015-07-10 01:45:35 -07:00
UnknownText_0x56ebd:
text "Here you go!"
done
2015-07-10 01:45:35 -07:00
UnknownText_0x56ecb:
text "Sorry! You need"
line "more coins."
done
2015-07-10 01:45:35 -07:00
UnknownText_0x56ee8:
text "Sorry. You can't"
line "carry any more."
done
2015-07-10 01:45:35 -07:00
UnknownText_0x56f09:
text "OK. Please save"
line "your coins and"
cont "come again!"
done
2015-07-10 01:45:35 -07:00
UnknownText_0x56f35:
text "Oh? You don't have"
line "a COIN CASE."
done
2015-07-10 01:45:35 -07:00
UnknownText_0x56f55:
text "I always play this"
line "slot machine. It"
para "pays out more than"
line "others, I think."
done
2015-07-10 01:45:35 -07:00
UnknownText_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
2015-07-10 01:45:35 -07:00
UnknownText_0x56ff4:
text "Life is a gamble."
line "I'm going to flip"
cont "cards till I drop!"
done
2015-07-10 01:45:35 -07:00
UnknownText_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
2015-07-10 01:45:35 -07:00
UnknownText_0x57097:
text "I won't quit until"
line "I win!"
done
2015-07-10 01:45:35 -07:00
UnknownText_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
2015-07-10 01:45:35 -07:00
UnknownText_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
2015-07-10 01:45:35 -07:00
UnknownText_0x5718a:
text "Wahahah! The coins"
line "keep rolling in!"
done
2015-07-10 01:45:35 -07:00
UnknownText_0x571af:
text "Someone left their"
line "drink."
para "It smells sweet."
done
2015-07-10 01:45:35 -07:00
GoldenrodGameCorner_MapEventHeader:
; 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
2013-07-12 14:06:11 -07:00
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