pokecrystal/maps/OaksLab.asm

289 lines
5.6 KiB
NASM
Raw Normal View History

object_const_def ; object_event constants
2015-11-27 05:22:14 +00:00
const OAKSLAB_OAK
const OAKSLAB_SCIENTIST1
const OAKSLAB_SCIENTIST2
const OAKSLAB_SCIENTIST3
OaksLab_MapScripts:
db 0 ; scene scripts
db 0 ; callbacks
.DummyScene:
end
2015-06-26 04:01:08 +00:00
Oak:
faceplayer
2015-12-09 23:25:44 +00:00
opentext
2015-06-25 03:20:04 +00:00
checkevent EVENT_OPENED_MT_SILVER
2015-06-26 04:01:08 +00:00
iftrue .CheckPokedex
checkevent EVENT_TALKED_TO_OAK_IN_KANTO
iftrue .CheckBadges
writetext OakWelcomeKantoText
2015-11-30 03:29:45 +00:00
buttonsound
2015-06-26 04:01:08 +00:00
setevent EVENT_TALKED_TO_OAK_IN_KANTO
.CheckBadges:
readvar VAR_BADGES
2018-02-03 02:09:17 +00:00
ifequal NUM_BADGES, .OpenMtSilver
ifequal NUM_JOHTO_BADGES, .Complain
sjump .AhGood
.CheckPokedex:
2015-06-26 04:01:08 +00:00
writetext OakLabDexCheckText
2015-11-25 15:16:29 +00:00
waitbutton
special ProfOaksPCBoot
2015-06-26 04:01:08 +00:00
writetext OakLabGoodbyeText
2015-11-25 15:16:29 +00:00
waitbutton
closetext
end
.OpenMtSilver:
2015-06-26 04:01:08 +00:00
writetext OakOpenMtSilverText
2015-11-30 03:29:45 +00:00
buttonsound
2015-06-25 03:20:04 +00:00
setevent EVENT_OPENED_MT_SILVER
sjump .CheckPokedex
.Complain:
2015-06-26 04:01:08 +00:00
writetext OakNoKantoBadgesText
2015-11-30 03:29:45 +00:00
buttonsound
sjump .CheckPokedex
.AhGood:
2015-06-26 04:01:08 +00:00
writetext OakYesKantoBadgesText
2015-11-30 03:29:45 +00:00
buttonsound
sjump .CheckPokedex
2015-12-15 15:55:56 +00:00
OaksAssistant1Script:
jumptextfaceplayer OaksAssistant1Text
2015-12-15 15:55:56 +00:00
OaksAssistant2Script:
jumptextfaceplayer OaksAssistant2Text
2015-12-15 15:55:56 +00:00
OaksAssistant3Script:
jumptextfaceplayer OaksAssistant3Text
2015-06-26 04:01:08 +00:00
OaksLabBookshelf:
jumpstd difficultbookshelf
2015-06-26 04:01:08 +00:00
OaksLabPoster1:
jumptext OaksLabPoster1Text
2015-06-26 04:01:08 +00:00
OaksLabPoster2:
jumptext OaksLabPoster2Text
2015-06-26 04:01:08 +00:00
OaksLabTrashcan:
jumptext OaksLabTrashcanText
2015-06-26 04:01:08 +00:00
OaksLabPC:
jumptext OaksLabPCText
2015-06-26 04:01:08 +00:00
OakWelcomeKantoText:
text "OAK: Ah, <PLAY_G>!"
line "It's good of you"
para "to come all this"
line "way to KANTO."
para "What do you think"
line "of the trainers"
para "out here?"
line "Pretty tough, huh?"
done
2015-06-26 04:01:08 +00:00
OakLabDexCheckText:
text "How is your #-"
line "DEX coming?"
para "Let's see…"
done
2015-06-26 04:01:08 +00:00
OakLabGoodbyeText:
text "If you're in the"
line "area, I hope you"
cont "come visit again."
done
2015-06-26 04:01:08 +00:00
OakOpenMtSilverText:
text "OAK: Wow! That's"
line "excellent!"
para "You collected the"
line "BADGES of GYMS in"
cont "KANTO. Well done!"
para "I was right in my"
line "assessment of you."
para "Tell you what,"
line "<PLAY_G>. I'll make"
para "arrangements so"
line "that you can go to"
cont "MT.SILVER."
para "MT.SILVER is a big"
line "mountain that is"
para "home to many wild"
line "#MON."
para "It's too dangerous"
line "for your average"
para "trainer, so it's"
line "off limits. But"
para "we can make an"
line "exception in your"
cont "case, <PLAY_G>."
para "Go up to INDIGO"
line "PLATEAU. You can"
para "reach MT.SILVER"
line "from there."
done
2015-06-26 04:01:08 +00:00
OakNoKantoBadgesText:
text "OAK: Hmm? You're"
line "not collecting"
cont "KANTO GYM BADGES?"
para "The GYM LEADERS in"
line "KANTO are as tough"
para "as any you battled"
line "in JOHTO."
para "I recommend that"
line "you challenge"
cont "them."
done
2015-06-26 04:01:08 +00:00
OakYesKantoBadgesText:
text "OAK: Ah, you're"
line "collecting KANTO"
cont "GYM BADGES."
para "I imagine that"
line "it's hard, but the"
para "experience is sure"
line "to help you."
para "Come see me when"
line "you get them all."
para "I'll have a gift"
line "for you."
para "Keep trying hard,"
line "<PLAY_G>!"
done
2015-12-15 15:55:56 +00:00
OaksAssistant1Text:
text "The PROF's #MON"
line "TALK radio program"
para "isn't aired here"
line "in KANTO."
para "It's a shame--I'd"
line "like to hear it."
done
2015-12-15 15:55:56 +00:00
OaksAssistant2Text:
text "Thanks to your"
line "work on the #-"
cont "DEX, the PROF's"
para "research is coming"
line "along great."
done
2015-12-15 15:55:56 +00:00
OaksAssistant3Text:
text "Don't tell anyone,"
line "but PROF.OAK'S"
para "#MON TALK isn't"
line "a live broadcast."
done
2015-06-26 04:01:08 +00:00
OaksLabPoster1Text:
text "Press START to"
line "open the MENU."
done
2015-06-26 04:01:08 +00:00
OaksLabPoster2Text:
text "The SAVE option is"
line "on the MENU."
para "Use it in a timely"
line "manner."
done
OaksLabTrashcanText:
text "There's nothing in"
line "here…"
done
2015-06-26 04:01:08 +00:00
OaksLabPCText:
text "There's an e-mail"
line "message on the PC."
para "…"
para "PROF.OAK, how is"
line "your research"
cont "coming along?"
para "I'm still plugging"
line "away."
para "I heard rumors"
line "that <PLAY_G> is"
para "getting quite a"
line "reputation."
para "I'm delighted to"
line "hear that."
para "ELM in NEW BARK"
line "TOWN 8-)"
done
OaksLab_MapEvents:
db 0, 0 ; filler
db 2 ; warp events
2018-02-02 03:22:07 +00:00
warp_event 4, 11, PALLET_TOWN, 3
warp_event 5, 11, PALLET_TOWN, 3
db 0 ; coord events
db 16 ; bg events
2018-02-02 03:22:07 +00:00
bg_event 6, 1, BGEVENT_READ, OaksLabBookshelf
bg_event 7, 1, BGEVENT_READ, OaksLabBookshelf
bg_event 8, 1, BGEVENT_READ, OaksLabBookshelf
bg_event 9, 1, BGEVENT_READ, OaksLabBookshelf
bg_event 0, 7, BGEVENT_READ, OaksLabBookshelf
bg_event 1, 7, BGEVENT_READ, OaksLabBookshelf
bg_event 2, 7, BGEVENT_READ, OaksLabBookshelf
bg_event 3, 7, BGEVENT_READ, OaksLabBookshelf
bg_event 6, 7, BGEVENT_READ, OaksLabBookshelf
bg_event 7, 7, BGEVENT_READ, OaksLabBookshelf
bg_event 8, 7, BGEVENT_READ, OaksLabBookshelf
bg_event 9, 7, BGEVENT_READ, OaksLabBookshelf
bg_event 4, 0, BGEVENT_READ, OaksLabPoster1
bg_event 5, 0, BGEVENT_READ, OaksLabPoster2
bg_event 9, 3, BGEVENT_READ, OaksLabTrashcan
bg_event 0, 1, BGEVENT_READ, OaksLabPC
db 4 ; object events
2018-02-02 03:22:07 +00:00
object_event 4, 2, SPRITE_OAK, SPRITEMOVEDATA_STANDING_DOWN, 0, 0, -1, -1, 0, OBJECTTYPE_SCRIPT, 0, Oak, -1
object_event 1, 8, SPRITE_SCIENTIST, SPRITEMOVEDATA_WALK_LEFT_RIGHT, 1, 0, -1, -1, PAL_NPC_BLUE, OBJECTTYPE_SCRIPT, 0, OaksAssistant1Script, -1
object_event 8, 9, SPRITE_SCIENTIST, SPRITEMOVEDATA_WALK_UP_DOWN, 0, 1, -1, -1, PAL_NPC_BLUE, OBJECTTYPE_SCRIPT, 0, OaksAssistant2Script, -1
object_event 1, 4, SPRITE_SCIENTIST, SPRITEMOVEDATA_WANDER, 1, 1, -1, -1, PAL_NPC_BLUE, OBJECTTYPE_SCRIPT, 0, OaksAssistant3Script, -1