mirror of https://github.com/pret/pokecrystal.git
370 lines
7.5 KiB
NASM
370 lines
7.5 KiB
NASM
const_def 2 ; object constants
|
|
const ROUTE39_SAILOR
|
|
const ROUTE39_POKEFAN_M
|
|
const ROUTE39_POKEFAN_F1
|
|
const ROUTE39_MILTANK1
|
|
const ROUTE39_MILTANK2
|
|
const ROUTE39_MILTANK3
|
|
const ROUTE39_MILTANK4
|
|
const ROUTE39_PSYCHIC_NORMAN
|
|
const ROUTE39_FRUIT_TREE
|
|
const ROUTE39_POKEFAN_F2
|
|
|
|
Route39_MapScripts:
|
|
db 0 ; scene scripts
|
|
|
|
db 0 ; callbacks
|
|
|
|
Route39Miltank:
|
|
opentext
|
|
writetext Route39MiltankText
|
|
cry MILTANK
|
|
waitbutton
|
|
closetext
|
|
end
|
|
|
|
TrainerPokefanmDerek:
|
|
trainer POKEFANM, DEREK1, EVENT_BEAT_POKEFANM_DEREK, PokefanmDerekSeenText, PokefanmDerekBeatenText, 0, .Script
|
|
|
|
.Script:
|
|
writecode VAR_CALLERID, PHONE_POKEFANM_DEREK
|
|
endifjustbattled
|
|
opentext
|
|
checkflag ENGINE_DEREK_HAS_NUGGET
|
|
iftrue .HasNugget
|
|
checkcellnum PHONE_POKEFANM_DEREK
|
|
iftrue .NumberAccepted
|
|
checkpoke PIKACHU
|
|
iffalse .WantsPikachu
|
|
checkevent EVENT_DEREK_ASKED_FOR_PHONE_NUMBER
|
|
iftrue .AskedAlready
|
|
writetext PokefanMDerekText_NotBragging
|
|
buttonsound
|
|
setevent EVENT_DEREK_ASKED_FOR_PHONE_NUMBER
|
|
scall .AskNumber1
|
|
jump .AskForNumber
|
|
|
|
.AskedAlready:
|
|
scall .AskNumber2
|
|
.AskForNumber:
|
|
askforphonenumber PHONE_POKEFANM_DEREK
|
|
ifequal PHONE_CONTACTS_FULL, .PhoneFull
|
|
ifequal PHONE_CONTACT_REFUSED, .NumberDeclined
|
|
trainertotext POKEFANM, DEREK1, MEM_BUFFER_0
|
|
scall .RegisteredNumber
|
|
jump .NumberAccepted
|
|
|
|
.HasNugget:
|
|
scall .Gift
|
|
verbosegiveitem NUGGET
|
|
iffalse .NoRoom
|
|
clearflag ENGINE_DEREK_HAS_NUGGET
|
|
jump .NumberAccepted
|
|
|
|
.NoRoom:
|
|
jump .PackFull
|
|
|
|
.WantsPikachu:
|
|
writetext PokefanMDerekPikachuIsItText
|
|
waitbutton
|
|
closetext
|
|
end
|
|
|
|
.AskNumber1:
|
|
jumpstd asknumber1m
|
|
end
|
|
|
|
.AskNumber2:
|
|
jumpstd asknumber2m
|
|
end
|
|
|
|
.RegisteredNumber:
|
|
jumpstd registerednumberm
|
|
end
|
|
|
|
.NumberAccepted:
|
|
jumpstd numberacceptedm
|
|
end
|
|
|
|
.NumberDeclined:
|
|
jumpstd numberdeclinedm
|
|
end
|
|
|
|
.PhoneFull:
|
|
jumpstd phonefullm
|
|
end
|
|
|
|
.Gift:
|
|
jumpstd giftm
|
|
end
|
|
|
|
.PackFull:
|
|
jumpstd packfullm
|
|
end
|
|
|
|
TrainerPokefanfRuth:
|
|
trainer POKEFANF, RUTH, EVENT_BEAT_POKEFANF_RUTH, PokefanfRuthSeenText, PokefanfRuthBeatenText, 0, .Script
|
|
|
|
.Script:
|
|
endifjustbattled
|
|
opentext
|
|
writetext PokefanfRuthAfterBattleText
|
|
waitbutton
|
|
closetext
|
|
end
|
|
|
|
TrainerSailorEugene:
|
|
trainer SAILOR, EUGENE, EVENT_BEAT_SAILOR_EUGENE, SailorEugeneSeenText, SailorEugeneBeatenText, 0, .Script
|
|
|
|
.Script:
|
|
endifjustbattled
|
|
opentext
|
|
writetext SailorEugeneAfterBattleText
|
|
waitbutton
|
|
closetext
|
|
end
|
|
|
|
TrainerPsychicNorman:
|
|
trainer PSYCHIC_T, NORMAN, EVENT_BEAT_PSYCHIC_NORMAN, PsychicNormanSeenText, PsychicNormanBeatenText, 0, .Script
|
|
|
|
.Script:
|
|
endifjustbattled
|
|
opentext
|
|
writetext PsychicNormanAfterBattleText
|
|
waitbutton
|
|
closetext
|
|
end
|
|
|
|
TrainerPokefanfJaime:
|
|
faceplayer
|
|
opentext
|
|
checknite
|
|
iffalse .NotNight
|
|
checkevent EVENT_BEAT_POKEFANF_JAIME
|
|
iftrue .Beaten
|
|
writetext PokefanfJaimeSeenText
|
|
waitbutton
|
|
closetext
|
|
winlosstext PokefanfJaimeBeatenText, 0
|
|
loadtrainer POKEFANF, JAIME
|
|
startbattle
|
|
reloadmapafterbattle
|
|
setevent EVENT_BEAT_POKEFANF_JAIME
|
|
closetext
|
|
end
|
|
|
|
.Beaten:
|
|
writetext PokefanfJaimeAfterBattleText
|
|
waitbutton
|
|
closetext
|
|
end
|
|
|
|
.NotNight:
|
|
writetext PokefanfJaimeHopeItGetsDarkText
|
|
waitbutton
|
|
closetext
|
|
end
|
|
|
|
Route39Sign:
|
|
jumptext Route39SignText
|
|
|
|
MoomooFarmSign:
|
|
jumptext MoomooFarmSignText
|
|
|
|
Route39TrainerTips:
|
|
jumptext Route39TrainerTipsText
|
|
|
|
FruitTreeScript_0x1a5bf4:
|
|
fruittree FRUITTREE_ROUTE_39
|
|
|
|
Route39HiddenNugget:
|
|
hiddenitem NUGGET, EVENT_ROUTE_39_HIDDEN_NUGGET
|
|
|
|
Route39MiltankText:
|
|
text "MILTANK: Mooo!"
|
|
done
|
|
|
|
SailorEugeneSeenText:
|
|
text "I just got back to"
|
|
line "OLIVINE."
|
|
|
|
para "So how about a"
|
|
line "#MON battle?"
|
|
done
|
|
|
|
SailorEugeneBeatenText:
|
|
text "Awaaargh!"
|
|
done
|
|
|
|
SailorEugeneAfterBattleText:
|
|
text "My #MON were"
|
|
line "caught and raised"
|
|
cont "overseas."
|
|
|
|
para "They're my compan-"
|
|
line "ions on those long"
|
|
cont "voyages."
|
|
done
|
|
|
|
PokefanmDerekSeenText:
|
|
text "This is a good"
|
|
line "time to brag about"
|
|
cont "my PIKACHU!"
|
|
done
|
|
|
|
PokefanmDerekBeatenText:
|
|
text "I had no time to"
|
|
line "show off PIKACHU…"
|
|
done
|
|
|
|
PokefanMDerekText_NotBragging:
|
|
text "I'm not listening"
|
|
line "to your bragging!"
|
|
|
|
para "We # FANS have"
|
|
line "a policy of not"
|
|
|
|
para "listening to other"
|
|
line "people brag!"
|
|
done
|
|
|
|
PokefanfRuthSeenText:
|
|
text "Such darling"
|
|
line "#MON."
|
|
|
|
para "Let's show our"
|
|
line "#MON together"
|
|
cont "at the same time."
|
|
done
|
|
|
|
PokefanfRuthBeatenText:
|
|
text "I don't mind"
|
|
line "losing."
|
|
done
|
|
|
|
PokefanfRuthAfterBattleText:
|
|
text "Do you know about"
|
|
line "baby #MON?"
|
|
|
|
para "I bet they're just"
|
|
line "adorable!"
|
|
done
|
|
|
|
PokefanMDerekPikachuIsItText:
|
|
text "PIKACHU is it!"
|
|
line "Don't you agree?"
|
|
done
|
|
|
|
PsychicNormanSeenText:
|
|
text "Let me see what"
|
|
line "your #MON are"
|
|
cont "capable of."
|
|
done
|
|
|
|
PsychicNormanBeatenText:
|
|
text "Ooh, your #MON"
|
|
line "have potential."
|
|
done
|
|
|
|
PsychicNormanAfterBattleText:
|
|
text "You know how #-"
|
|
line "MON have different"
|
|
cont "abilities?"
|
|
|
|
para "People are like"
|
|
line "that too. Every-"
|
|
cont "one has different"
|
|
cont "potential."
|
|
done
|
|
|
|
PokefanfJaimeHopeItGetsDarkText:
|
|
text "Ufufufu… I hope it"
|
|
line "gets dark soon."
|
|
done
|
|
|
|
PokefanfJaimeSeenText:
|
|
text "You came at just"
|
|
line "the right time."
|
|
|
|
para "Let's battle."
|
|
done
|
|
|
|
PokefanfJaimeBeatenText:
|
|
text "Oh, how disap-"
|
|
line "pointing…"
|
|
done
|
|
|
|
PokefanfJaimeAfterBattleText:
|
|
text "I met my MEOWTH at"
|
|
line "night, right here"
|
|
cont "on ROUTE 39."
|
|
|
|
para "I'm not sure why,"
|
|
line "but it seems to"
|
|
|
|
para "like it when I"
|
|
line "train here."
|
|
|
|
para "It seems to become"
|
|
line "friendlier by"
|
|
|
|
para "training here than"
|
|
line "anywhere else."
|
|
done
|
|
|
|
Route39SignText:
|
|
text "ROUTE 39"
|
|
|
|
para "OLIVINE CITY -"
|
|
line "ECRUTEAK CITY"
|
|
done
|
|
|
|
MoomooFarmSignText:
|
|
text "MOOMOO FARM"
|
|
|
|
para "Enjoy Our Fresh"
|
|
line "and Tasty Milk"
|
|
done
|
|
|
|
Route39TrainerTipsText:
|
|
text "TRAINER TIPS"
|
|
|
|
para "Use HEADBUTT on"
|
|
line "trees to shake"
|
|
cont "#MON out."
|
|
|
|
para "Different kinds of"
|
|
line "#MON drop out"
|
|
cont "of trees."
|
|
|
|
para "Use HEADBUTT on"
|
|
line "any tree you see!"
|
|
done
|
|
|
|
Route39_MapEvents:
|
|
db 0, 0 ; filler
|
|
|
|
db 2 ; warp events
|
|
warp_event 1, 3, ROUTE_39_BARN, 1
|
|
warp_event 5, 3, ROUTE_39_FARMHOUSE, 1
|
|
|
|
db 0 ; coord events
|
|
|
|
db 4 ; bg events
|
|
bg_event 5, 31, BGEVENT_READ, Route39TrainerTips
|
|
bg_event 9, 5, BGEVENT_READ, MoomooFarmSign
|
|
bg_event 15, 7, BGEVENT_READ, Route39Sign
|
|
bg_event 5, 13, BGEVENT_ITEM, Route39HiddenNugget
|
|
|
|
db 10 ; object events
|
|
object_event 13, 29, SPRITE_SAILOR, SPRITEMOVEDATA_STANDING_LEFT, 0, 0, -1, -1, PAL_NPC_BLUE, OBJECTTYPE_TRAINER, 5, TrainerSailorEugene, -1
|
|
object_event 10, 22, SPRITE_POKEFAN_M, SPRITEMOVEDATA_STANDING_UP, 0, 0, -1, -1, PAL_NPC_RED, OBJECTTYPE_TRAINER, 4, TrainerPokefanmDerek, -1
|
|
object_event 11, 19, SPRITE_POKEFAN_F, SPRITEMOVEDATA_STANDING_RIGHT, 0, 0, -1, -1, PAL_NPC_RED, OBJECTTYPE_TRAINER, 4, TrainerPokefanfRuth, -1
|
|
object_event 3, 12, SPRITE_TAUROS, SPRITEMOVEDATA_POKEMON, 0, 0, -1, -1, 0, OBJECTTYPE_SCRIPT, 0, Route39Miltank, -1
|
|
object_event 6, 11, SPRITE_TAUROS, SPRITEMOVEDATA_POKEMON, 0, 0, -1, -1, 0, OBJECTTYPE_SCRIPT, 0, Route39Miltank, -1
|
|
object_event 4, 15, SPRITE_TAUROS, SPRITEMOVEDATA_POKEMON, 0, 0, -1, -1, 0, OBJECTTYPE_SCRIPT, 0, Route39Miltank, -1
|
|
object_event 8, 13, SPRITE_TAUROS, SPRITEMOVEDATA_POKEMON, 0, 0, -1, -1, 0, OBJECTTYPE_SCRIPT, 0, Route39Miltank, -1
|
|
object_event 13, 7, SPRITE_STANDING_YOUNGSTER, SPRITEMOVEDATA_SPINRANDOM_FAST, 0, 0, -1, -1, PAL_NPC_BLUE, OBJECTTYPE_TRAINER, 1, TrainerPsychicNorman, -1
|
|
object_event 9, 3, SPRITE_FRUIT_TREE, SPRITEMOVEDATA_STILL, 0, 0, -1, -1, 0, OBJECTTYPE_SCRIPT, 0, FruitTreeScript_0x1a5bf4, -1
|
|
object_event 4, 22, SPRITE_POKEFAN_F, SPRITEMOVEDATA_STANDING_DOWN, 0, 0, -1, -1, PAL_NPC_RED, OBJECTTYPE_SCRIPT, 0, TrainerPokefanfJaime, -1
|