pokecrystal/maps/BillsFamilysHouse.asm

261 lines
4.5 KiB
NASM

object_const_def ; object_event constants
const BILLSFAMILYSHOUSE_BILL
const BILLSFAMILYSHOUSE_POKEFAN_F
const BILLSFAMILYSHOUSE_TWIN
BillsFamilysHouse_MapScripts:
db 0 ; scene scripts
db 0 ; callbacks
BillScript:
faceplayer
opentext
checkevent EVENT_GOT_EEVEE
iftrue .GotEevee
writetext BillTakeThisEeveeText
yesorno
iffalse .Refused
writetext BillImCountingOnYouText
buttonsound
waitsfx
readvar VAR_PARTYCOUNT
ifequal PARTY_LENGTH, .NoRoom
writetext ReceivedEeveeText
playsound SFX_CAUGHT_MON
waitsfx
givepoke EEVEE, 20
setevent EVENT_GOT_EEVEE
writetext BillEeveeMayEvolveText
waitbutton
closetext
end
.NoRoom:
writetext BillPartyFullText
waitbutton
closetext
end
.Refused:
writetext BillNoEeveeText
waitbutton
closetext
end
.GotEevee:
writetext BillPopWontWorkText
waitbutton
closetext
end
BillsMomScript:
faceplayer
opentext
checkevent EVENT_MET_BILL
iffalse .HaventMetBill
writetext BillsPopText
waitbutton
closetext
end
.HaventMetBill:
writetext BillsMomText
waitbutton
closetext
end
BillsSisterScript:
faceplayer
opentext
checkcellnum PHONE_BILL
iftrue .GotBillsNumber
writetext BillsSisterUsefulNumberText
askforphonenumber PHONE_BILL
ifequal PHONE_CONTACTS_FULL, .NoRoom
ifequal PHONE_CONTACT_REFUSED, .Refused
waitsfx
addcellnum PHONE_BILL
writetext RecordedBillsNumberText
playsound SFX_REGISTER_PHONE_NUMBER
waitsfx
buttonsound
.GotBillsNumber:
writetext BillsSisterStorageSystemText
waitbutton
closetext
end
.Refused:
writetext BillsSisterRefusedNumberText
waitbutton
closetext
end
.NoRoom:
writetext BillsSisterPhoneFullText
buttonsound
sjump .Refused
BillsHouseBookshelf1:
jumpstd picturebookshelf
BillsHouseBookshelf2:
jumpstd magazinebookshelf
BillsHouseRadio:
jumpstd radio2
BillTakeThisEeveeText:
text "BILL: Hi, <PLAYER>!"
line "Do us a favor and"
cont "take this EEVEE."
para "It came over when"
line "I was adjusting"
cont "the TIME CAPSULE."
para "Someone has to"
line "take care of it,"
para "but I don't like"
line "being outside."
para "Can I count on you"
line "to play with it,"
cont "<PLAYER>?"
done
BillImCountingOnYouText:
text "BILL: I knew you'd"
line "come through!"
para "Way to go! You're"
line "the real deal!"
para "OK, I'm counting"
line "on you."
para "Take good care of"
line "it!"
done
ReceivedEeveeText:
text "<PLAYER> received"
line "EEVEE!"
done
BillEeveeMayEvolveText:
text "BILL: PROF.ELM"
line "claims EEVEE may"
para "evolve in new and"
line "unknown ways."
done
BillPartyFullText:
text "Whoa, wait. You"
line "can't carry any"
cont "more #MON."
done
BillNoEeveeText:
text "Oh… Now what to"
line "do?"
done
BillPopWontWorkText:
text "BILL: My pop, he"
line "won't work. All he"
para "does is goof off"
line "all day long."
para "He's getting to be"
line "a real headache…"
done
BillsPopText:
text "Oh, you collect"
line "#MON? My son"
cont "BILL is an expert."
para "He just got called"
line "to the #MON"
para "CENTER in ECRUTEAK"
line "CITY."
para "My husband went"
line "off to the GAME"
para "CORNER without"
line "being called…"
done
BillsMomText:
text "My husband was"
line "once known as a"
para "#MANIAC."
line "BILL must have"
para "taken after his"
line "father."
done
BillsSisterUsefulNumberText:
text "Are you a trainer?"
para "I've got a useful"
line "phone number for"
cont "you."
done
RecordedBillsNumberText:
text "<PLAYER> recorded"
line "BILL's number."
done
BillsSisterRefusedNumberText:
text "My brother made"
line "the PC #MON"
cont "storage system."
para "I was going to"
line "give you BILL's"
cont "number…"
done
BillsSisterPhoneFullText:
text "You can't record"
line "any more numbers."
done
BillsSisterStorageSystemText:
text "My big brother"
line "BILL made the PC"
para "#MON storage"
line "system."
done
BillsFamilysHouse_MapEvents:
db 0, 0 ; filler
db 2 ; warp events
warp_event 2, 7, GOLDENROD_CITY, 4
warp_event 3, 7, GOLDENROD_CITY, 4
db 0 ; coord events
db 3 ; bg events
bg_event 0, 1, BGEVENT_READ, BillsHouseBookshelf2
bg_event 1, 1, BGEVENT_READ, BillsHouseBookshelf1
bg_event 7, 1, BGEVENT_READ, BillsHouseRadio
db 3 ; object events
object_event 2, 3, SPRITE_BILL, SPRITEMOVEDATA_STANDING_RIGHT, 0, 0, -1, -1, 0, OBJECTTYPE_SCRIPT, 0, BillScript, EVENT_MET_BILL
object_event 5, 3, SPRITE_POKEFAN_F, SPRITEMOVEDATA_STANDING_DOWN, 0, 0, -1, -1, 0, OBJECTTYPE_SCRIPT, 0, BillsMomScript, -1
object_event 5, 4, SPRITE_TWIN, SPRITEMOVEDATA_WANDER, 1, 1, -1, -1, PAL_NPC_GREEN, OBJECTTYPE_SCRIPT, 0, BillsSisterScript, -1