diff options
Diffstat (limited to 'maps/OaksLab.asm')
| -rw-r--r-- | maps/OaksLab.asm | 288 |
1 files changed, 288 insertions, 0 deletions
diff --git a/maps/OaksLab.asm b/maps/OaksLab.asm new file mode 100644 index 00000000..9e909a83 --- /dev/null +++ b/maps/OaksLab.asm @@ -0,0 +1,288 @@ + const_def 2 ; object constants + const OAKSLAB_OAK + const OAKSLAB_SCIENTIST1 + const OAKSLAB_SCIENTIST2 + const OAKSLAB_SCIENTIST3 + +OaksLab_MapScripts: + db 0 ; scene scripts + + db 0 ; callbacks + +.DummyScene: + end + +Oak: + faceplayer + opentext + checkevent EVENT_OPENED_MT_SILVER + iftrue .CheckPokedex + checkevent EVENT_TALKED_TO_OAK_IN_KANTO + iftrue .CheckBadges + writetext OakWelcomeKantoText + buttonsound + setevent EVENT_TALKED_TO_OAK_IN_KANTO +.CheckBadges: + checkcode VAR_BADGES + ifequal NUM_BADGES, .OpenMtSilver + ifequal NUM_JOHTO_BADGES, .Complain + jump .AhGood + +.CheckPokedex: + writetext OakLabDexCheckText + waitbutton + special ProfOaksPCBoot + writetext OakLabGoodbyeText + waitbutton + closetext + end + +.OpenMtSilver: + writetext OakOpenMtSilverText + buttonsound + setevent EVENT_OPENED_MT_SILVER + jump .CheckPokedex + +.Complain: + writetext OakNoKantoBadgesText + buttonsound + jump .CheckPokedex + +.AhGood: + writetext OakYesKantoBadgesText + buttonsound + jump .CheckPokedex + +OaksAssistant1Script: + jumptextfaceplayer OaksAssistant1Text + +OaksAssistant2Script: + jumptextfaceplayer OaksAssistant2Text + +OaksAssistant3Script: + jumptextfaceplayer OaksAssistant3Text + +OaksLabBookshelf: + jumpstd difficultbookshelf + +OaksLabPoster1: + jumptext OaksLabPoster1Text + +OaksLabPoster2: + jumptext OaksLabPoster2Text + +OaksLabTrashcan: + jumptext OaksLabTrashcanText + +OaksLabPC: + jumptext OaksLabPCText + +OakWelcomeKantoText: + text "OAK: Ah, <PLAYER>!" + 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 + +OakLabDexCheckText: + text "How is your #-" + line "DEX coming?" + + para "Let's see…" + done + +OakLabGoodbyeText: + text "If you're in the" + line "area, I hope you" + cont "come visit again." + done + +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 "<PLAYER>. 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, <PLAYER>." + + para "Go up to INDIGO" + line "PLATEAU. You can" + + para "reach MT.SILVER" + line "from there." + done + +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 + +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 "<PLAYER>!" + done + +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 + +OaksAssistant2Text: + text "Thanks to your" + line "work on the #-" + cont "DEX, the PROF's" + + para "research is coming" + line "along great." + done + +OaksAssistant3Text: + text "Don't tell anyone," + line "but PROF.OAK'S" + + para "#MON TALK isn't" + line "a live broadcast." + done + +OaksLabPoster1Text: + text "Press START to" + line "open the MENU." + done + +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 + +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 <PLAYER> is" + + para "making quite a" + line "name for himself." + + 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 + warp_event 4, 11, PALLET_TOWN, 3 + warp_event 5, 11, PALLET_TOWN, 3 + + db 0 ; coord events + + db 16 ; bg events + 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 + 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 |