pokecrystal-board/maps/OaksLab.asm

296 lines
5.5 KiB
NASM
Raw Normal View History

2015-11-26 21:22:14 -08:00
const_value set 2
const OAKSLAB_OAK
const OAKSLAB_SCIENTIST1
const OAKSLAB_SCIENTIST2
const OAKSLAB_SCIENTIST3
OaksLab_MapScripts:
.SceneScripts:
db 0
.MapCallbacks:
db 0
.DummyScene:
end
2015-06-25 21:01:08 -07:00
Oak:
faceplayer
2015-12-09 15:25:44 -08:00
opentext
2015-06-24 20:20:04 -07:00
checkevent EVENT_OPENED_MT_SILVER
2015-06-25 21:01:08 -07:00
iftrue .CheckPokedex
checkevent EVENT_TALKED_TO_OAK_IN_KANTO
iftrue .CheckBadges
writetext OakWelcomeKantoText
2015-11-29 19:29:45 -08:00
buttonsound
2015-06-25 21:01:08 -07:00
setevent EVENT_TALKED_TO_OAK_IN_KANTO
.CheckBadges:
checkcode VAR_BADGES
2018-01-11 22:40:20 -08:00
if_equal NUM_BADGES, .OpenMtSilver
if_equal NUM_JOHTO_BADGES, .Complain
2015-06-25 21:01:08 -07:00
jump .AhGood
.CheckPokedex:
2015-06-25 21:01:08 -07:00
writetext OakLabDexCheckText
2015-11-25 07:16:29 -08:00
waitbutton
2018-01-02 08:13:57 -08:00
special Special_ProfOaksPCBoot
2015-06-25 21:01:08 -07:00
writetext OakLabGoodbyeText
2015-11-25 07:16:29 -08:00
waitbutton
closetext
end
.OpenMtSilver:
2015-06-25 21:01:08 -07:00
writetext OakOpenMtSilverText
2015-11-29 19:29:45 -08:00
buttonsound
2015-06-24 20:20:04 -07:00
setevent EVENT_OPENED_MT_SILVER
2015-06-25 21:01:08 -07:00
jump .CheckPokedex
.Complain:
2015-06-25 21:01:08 -07:00
writetext OakNoKantoBadgesText
2015-11-29 19:29:45 -08:00
buttonsound
2015-06-25 21:01:08 -07:00
jump .CheckPokedex
.AhGood:
2015-06-25 21:01:08 -07:00
writetext OakYesKantoBadgesText
2015-11-29 19:29:45 -08:00
buttonsound
2015-06-25 21:01:08 -07:00
jump .CheckPokedex
2015-12-15 07:55:56 -08:00
OaksAssistant1Script:
jumptextfaceplayer OaksAssistant1Text
2015-12-15 07:55:56 -08:00
OaksAssistant2Script:
jumptextfaceplayer OaksAssistant2Text
2015-12-15 07:55:56 -08:00
OaksAssistant3Script:
jumptextfaceplayer OaksAssistant3Text
2015-06-25 21:01:08 -07:00
OaksLabBookshelf:
jumpstd difficultbookshelf
2015-06-25 21:01:08 -07:00
OaksLabPoster1:
jumptext OaksLabPoster1Text
2015-06-25 21:01:08 -07:00
OaksLabPoster2:
jumptext OaksLabPoster2Text
2015-06-25 21:01:08 -07:00
OaksLabTrashcan:
jumptext OaksLabTrashcanText
2015-06-25 21:01:08 -07:00
OaksLabPC:
jumptext OaksLabPCText
2015-06-25 21:01:08 -07: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-25 21:01:08 -07:00
OakLabDexCheckText:
text "How is your #-"
line "DEX coming?"
para "Let's see…"
done
2015-06-25 21:01:08 -07:00
OakLabGoodbyeText:
text "If you're in the"
line "area, I hope you"
cont "come visit again."
done
2015-06-25 21:01:08 -07: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-25 21:01:08 -07: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-25 21:01:08 -07: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 07:55:56 -08: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 07:55:56 -08: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 07:55:56 -08:00
OaksAssistant3Text:
text "Don't tell anyone,"
line "but PROF.OAK'S"
para "#MON TALK isn't"
line "a live broadcast."
done
2015-06-25 21:01:08 -07:00
OaksLabPoster1Text:
text "Press START to"
line "open the MENU."
done
2015-06-25 21:01:08 -07:00
OaksLabPoster2Text:
text "The SAVE option is"
line "on the MENU."
para "Use it in a timely"
line "manner."
done
2015-06-25 21:01:08 -07:00
OaksLabTrashcanText
text "There's nothing in"
line "here…"
done
2015-06-25 21:01:08 -07: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:
; filler
db 0, 0
.Warps:
db 2
warp_def 4, 11, 3, PALLET_TOWN
warp_def 5, 11, 3, PALLET_TOWN
.CoordEvents:
db 0
.BGEvents:
db 16
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
.ObjectEvents:
db 4
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