pokecrystal-board/maps/Route35GoldenrodGate.asm

220 lines
4.0 KiB
NASM

const_value set 2
const ROUTE35GOLDENRODGATE_OFFICER
const ROUTE35GOLDENRODGATE_POKEFAN_F
const ROUTE35GOLDENRODGATE_FISHER
Route35GoldenrodGate_MapScriptHeader:
.SceneScripts:
db 0
.MapCallbacks:
db 0
OfficerScript_0x69d37:
faceplayer
opentext
checkevent EVENT_GOT_HP_UP_FROM_RANDY
iftrue .gothpup
checkevent EVENT_GAVE_KENYA
iftrue .questcomplete
checkevent EVENT_GOT_KENYA
iftrue .alreadyhavekenya
writetext UnknownText_0x69ddd
yesorno
iffalse .refused
writetext UnknownText_0x69e48
buttonsound
waitsfx
checkcode VAR_PARTYCOUNT
if_equal PARTY_LENGTH, .partyfull
writetext UnknownText_0x69eb8
playsound SFX_KEY_ITEM
waitsfx
givepoke SPEAROW, 10, NO_ITEM, 1, GiftSpearowName, GiftSpearowOTName
givepokeitem GiftSpearowMail
setevent EVENT_GOT_KENYA
.alreadyhavekenya
writetext UnknownText_0x69ed6
waitbutton
closetext
end
.partyfull
writetext UnknownText_0x69f56
waitbutton
closetext
end
.refused
writetext UnknownText_0x69f74
waitbutton
closetext
end
.questcomplete
writetext UnknownText_0x69f8b
buttonsound
verbosegiveitem HP_UP
iffalse .bagfull
setevent EVENT_GOT_HP_UP_FROM_RANDY
.gothpup
writetext UnknownText_0x69fd9
waitbutton
.bagfull
closetext
end
GiftSpearowMail:
db FLOWER_MAIL
db "DARK CAVE leads"
next "to another road@"
GiftSpearowName:
db "KENYA@"
GiftSpearowOTName:
db "RANDY@"
db 0
PokefanFScript_0x69dc6:
faceplayer
opentext
checkevent EVENT_FOUGHT_SUDOWOODO
iftrue .aftersudowoodo
writetext UnknownText_0x6a00a
waitbutton
closetext
end
.aftersudowoodo
writetext UnknownText_0x6a09a
waitbutton
closetext
end
Route35GoldenrodGateFisherScript:
jumptextfaceplayer Route35GoldenrodGateFisherText
UnknownText_0x69ddd:
text "Excuse me, kid!"
line "Can you do a guy"
cont "a favor?"
para "Can you take this"
line "#MON with MAIL"
cont "to my friend?"
para "He's on ROUTE 31."
done
UnknownText_0x69e48:
text "You will? Perfect!"
line "Thanks, kid!"
para "My pal's a chubby"
line "guy who snoozes"
cont "all the time."
para "You'll recognize"
line "him right away!"
done
UnknownText_0x69eb8:
text "<PLAYER> received a"
line "#MON with MAIL."
done
UnknownText_0x69ed6:
text "You can read it,"
line "but don't lose it!"
cont "ROUTE 31!"
para "Oh, yeah. There"
line "was a weird tree"
cont "blocking the road."
para "I wonder if it's"
line "been cleared?"
done
UnknownText_0x69f56:
text "You can't carry"
line "another #MON…"
done
UnknownText_0x69f74:
text "Oh… Never mind,"
line "then…"
done
UnknownText_0x69f8b:
text "Thanks, kid! You"
line "made the delivery"
cont "for me!"
para "Here's something"
line "for your trouble!"
done
UnknownText_0x69fd9:
text "My pal was snooz-"
line "ing, right? Heh,"
cont "what'd I say?"
done
UnknownText_0x6a00a:
text "A strange tree is"
line "blocking the road."
para "It wriggles around"
line "if you talk to it."
para "I heard it became"
line "wild when someone"
para "watered it with a"
line "SQUIRTBOTTLE."
done
UnknownText_0x6a09a:
text "I like the #MON"
line "Lullaby they play"
cont "on the radio."
done
Route35GoldenrodGateFisherText:
text "I wonder how many"
line "kinds of #MON"
para "there are in the"
line "world."
para "Three years ago,"
line "PROF.OAK said that"
para "there were 150"
line "different kinds."
done
Route35GoldenrodGate_MapEventHeader:
; filler
db 0, 0
.Warps:
db 4
warp_def 4, 0, 1, ROUTE_35
warp_def 5, 0, 2, ROUTE_35
warp_def 4, 7, 12, GOLDENROD_CITY
warp_def 5, 7, 12, GOLDENROD_CITY
.CoordEvents:
db 0
.BGEvents:
db 0
.ObjectEvents:
db 3
object_event 0, 4, SPRITE_OFFICER, SPRITEMOVEDATA_STANDING_RIGHT, 0, 0, -1, -1, PAL_NPC_RED, OBJECTTYPE_SCRIPT, 0, OfficerScript_0x69d37, -1
object_event 6, 4, SPRITE_POKEFAN_F, SPRITEMOVEDATA_WALK_UP_DOWN, 0, 1, -1, -1, PAL_NPC_BLUE, OBJECTTYPE_SCRIPT, 0, PokefanFScript_0x69dc6, -1
object_event 3, 2, SPRITE_FISHER, SPRITEMOVEDATA_SPINRANDOM_SLOW, 0, 0, -1, -1, PAL_NPC_GREEN, OBJECTTYPE_SCRIPT, 0, Route35GoldenrodGateFisherScript, -1