pokecrystal-board/maps/OaksLab.asm

300 lines
5.3 KiB
NASM
Raw Normal View History

OaksLab_MapScriptHeader: ; 0x19b3c5
; trigger count
db 0
; callback count
db 0
; 0x19b3c7
UnknownScript_0x19b3c7: ; 0x19b3c7
end
; 0x19b3c8
2015-06-25 21:01:08 -07:00
Oak:
faceplayer
loadfont
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
keeptextopen
2015-06-25 21:01:08 -07:00
setevent EVENT_TALKED_TO_OAK_IN_KANTO
.CheckBadges
checkcode $7
2015-06-25 21:01:08 -07:00
if_equal 16, .OpenMtSilver
if_equal 8, .Complain
jump .AhGood
2015-06-25 21:01:08 -07:00
.CheckPokedex
writetext OakLabDexCheckText
closetext
special ProfOaksPCBoot
2015-06-25 21:01:08 -07:00
writetext OakLabGoodbyeText
closetext
loadmovesprites
end
2015-06-25 21:01:08 -07:00
.OpenMtSilver
writetext OakOpenMtSilverText
keeptextopen
2015-06-24 20:20:04 -07:00
setevent EVENT_OPENED_MT_SILVER
2015-06-25 21:01:08 -07:00
jump .CheckPokedex
2015-06-25 21:01:08 -07:00
.Complain
writetext OakNoKantoBadgesText
keeptextopen
2015-06-25 21:01:08 -07:00
jump .CheckPokedex
2015-06-25 21:01:08 -07:00
.AhGood
writetext OakYesKantoBadgesText
keeptextopen
2015-06-25 21:01:08 -07:00
jump .CheckPokedex
2013-07-12 14:06:11 -07:00
ScientistScript_0x19b40f: ; 0x19b40f
jumptextfaceplayer UnknownText_0x19b7fb
; 0x19b412
2013-07-12 14:06:11 -07:00
ScientistScript_0x19b412: ; 0x19b412
jumptextfaceplayer UnknownText_0x19b859
; 0x19b415
2013-07-12 14:06:11 -07:00
ScientistScript_0x19b415: ; 0x19b415
jumptextfaceplayer UnknownText_0x19b8a7
; 0x19b418
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
UnknownText_0x19b7fb: ; 0x19b7fb
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
; 0x19b859
UnknownText_0x19b859: ; 0x19b859
text "Thanks to your"
line "work on the #-"
cont "DEX, the PROF's"
para "research is coming"
line "along great."
done
; 0x19b8a7
UnknownText_0x19b8a7: ; 0x19b8a7
text "Don't tell anyone,"
line "but PROF.OAK'S"
para "#MON TALK isn't"
line "a live broadcast."
done
; 0x19b8ea
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
; 0x19ba33
OaksLab_MapEventHeader: ; 0x19ba33
; filler
db 0, 0
; warps
db 2
warp_def $b, $4, 3, GROUP_PALLET_TOWN, MAP_PALLET_TOWN
warp_def $b, $5, 3, GROUP_PALLET_TOWN, MAP_PALLET_TOWN
; xy triggers
db 0
; signposts
db 16
2015-06-25 21:01:08 -07:00
signpost 1, 6, $0, OaksLabBookshelf
signpost 1, 7, $0, OaksLabBookshelf
signpost 1, 8, $0, OaksLabBookshelf
signpost 1, 9, $0, OaksLabBookshelf
signpost 7, 0, $0, OaksLabBookshelf
signpost 7, 1, $0, OaksLabBookshelf
signpost 7, 2, $0, OaksLabBookshelf
signpost 7, 3, $0, OaksLabBookshelf
signpost 7, 6, $0, OaksLabBookshelf
signpost 7, 7, $0, OaksLabBookshelf
signpost 7, 8, $0, OaksLabBookshelf
signpost 7, 9, $0, OaksLabBookshelf
signpost 0, 4, $0, OaksLabPoster1
signpost 0, 5, $0, OaksLabPoster2
signpost 3, 9, $0, OaksLabTrashcan
signpost 1, 0, $0, OaksLabPC
; people-events
db 4
2015-06-25 21:01:08 -07:00
person_event SPRITE_OAK, 6, 8, $6, $0, 255, 255, $0, 0, Oak, $ffff
2013-07-12 14:06:11 -07:00
person_event SPRITE_SCIENTIST, 12, 5, $5, $1, 255, 255, $90, 0, ScientistScript_0x19b40f, $ffff
person_event SPRITE_SCIENTIST, 13, 12, $4, $10, 255, 255, $90, 0, ScientistScript_0x19b412, $ffff
person_event SPRITE_SCIENTIST, 8, 5, $2, $11, 255, 255, $90, 0, ScientistScript_0x19b415, $ffff
; 0x19bac7