mirror of https://github.com/pret/pokecrystal.git
159 lines
3.7 KiB
NASM
159 lines
3.7 KiB
NASM
const_def 2 ; object constants
|
|
const UNIONCAVEB2F_ROCKER
|
|
const UNIONCAVEB2F_COOLTRAINER_F1
|
|
const UNIONCAVEB2F_COOLTRAINER_F2
|
|
const UNIONCAVEB2F_POKE_BALL1
|
|
const UNIONCAVEB2F_POKE_BALL2
|
|
const UNIONCAVEB2F_LAPRAS
|
|
|
|
UnionCaveB2F_MapScripts:
|
|
db 0 ; scene scripts
|
|
|
|
db 1 ; callbacks
|
|
callback MAPCALLBACK_OBJECTS, .Lapras
|
|
|
|
.Lapras:
|
|
checkflag ENGINE_UNION_CAVE_LAPRAS
|
|
iftrue .NoAppear
|
|
checkcode VAR_WEEKDAY
|
|
if_equal FRIDAY, .Appear
|
|
.NoAppear:
|
|
disappear UNIONCAVEB2F_LAPRAS
|
|
return
|
|
|
|
.Appear:
|
|
appear UNIONCAVEB2F_LAPRAS
|
|
return
|
|
|
|
UnionCaveLapras:
|
|
faceplayer
|
|
cry LAPRAS
|
|
loadwildmon LAPRAS, 20
|
|
startbattle
|
|
disappear UNIONCAVEB2F_LAPRAS
|
|
setflag ENGINE_UNION_CAVE_LAPRAS
|
|
reloadmapafterbattle
|
|
end
|
|
|
|
TrainerCooltrainermNick:
|
|
trainer COOLTRAINERM, NICK, EVENT_BEAT_COOLTRAINERM_NICK, CooltrainermNickSeenText, CooltrainermNickBeatenText, 0, .Script
|
|
|
|
.Script:
|
|
end_if_just_battled
|
|
opentext
|
|
writetext CooltrainermNickAfterBattleText
|
|
waitbutton
|
|
closetext
|
|
end
|
|
|
|
TrainerCooltrainerfGwen:
|
|
trainer COOLTRAINERF, GWEN, EVENT_BEAT_COOLTRAINERF_GWEN, CooltrainerfGwenSeenText, CooltrainerfGwenBeatenText, 0, .Script
|
|
|
|
.Script:
|
|
end_if_just_battled
|
|
opentext
|
|
writetext CooltrainerfGwenAfterBattleText
|
|
waitbutton
|
|
closetext
|
|
end
|
|
|
|
TrainerCooltrainerfEmma:
|
|
trainer COOLTRAINERF, EMMA, EVENT_BEAT_COOLTRAINERF_EMMA, CooltrainerfEmmaSeenText, CooltrainerfEmmaBeatenText, 0, .Script
|
|
|
|
.Script:
|
|
end_if_just_battled
|
|
opentext
|
|
writetext CooltrainerfEmmaAfterBattleText
|
|
waitbutton
|
|
closetext
|
|
end
|
|
|
|
UnionCaveB2FElixer:
|
|
itemball ELIXER
|
|
|
|
UnionCaveB2FHyperPotion:
|
|
itemball HYPER_POTION
|
|
|
|
CooltrainermNickSeenText:
|
|
text "There are two"
|
|
line "kinds of people."
|
|
|
|
para "Those who have"
|
|
line "style, and those"
|
|
cont "who don't."
|
|
|
|
para "What kind of"
|
|
line "person are you?"
|
|
done
|
|
|
|
CooltrainermNickBeatenText:
|
|
text "You've got"
|
|
line "dazzling style!"
|
|
done
|
|
|
|
CooltrainermNickAfterBattleText:
|
|
text "Your #MON style"
|
|
line "is stunning and"
|
|
cont "colorful, I admit."
|
|
|
|
para "You'll just keep"
|
|
line "getting better!"
|
|
done
|
|
|
|
CooltrainerfGwenSeenText:
|
|
text "I'm in training."
|
|
line "Care for a round?"
|
|
done
|
|
|
|
CooltrainerfGwenBeatenText:
|
|
text "Aww, no! You're"
|
|
line "too good for me."
|
|
done
|
|
|
|
CooltrainerfGwenAfterBattleText:
|
|
text "I'm going to train"
|
|
line "by myself until I"
|
|
cont "improve."
|
|
done
|
|
|
|
CooltrainerfEmmaSeenText:
|
|
text "If the #MON I"
|
|
line "liked were there,"
|
|
cont "I'd go anywhere."
|
|
|
|
para "That's what a real"
|
|
line "trainer does."
|
|
done
|
|
|
|
CooltrainerfEmmaBeatenText:
|
|
text "I'd rather pet my"
|
|
line "babies than this!"
|
|
done
|
|
|
|
CooltrainerfEmmaAfterBattleText:
|
|
text "Just once a week,"
|
|
line "a #MON comes to"
|
|
cont "the water's edge."
|
|
|
|
para "I wanted to see"
|
|
line "that #MON…"
|
|
done
|
|
|
|
UnionCaveB2F_MapEvents:
|
|
db 0, 0 ; filler
|
|
|
|
db 1 ; warp events
|
|
warp_event 5, 3, UNION_CAVE_B1F, 5
|
|
|
|
db 0 ; coord events
|
|
|
|
db 0 ; bg events
|
|
|
|
db 6 ; object events
|
|
object_event 15, 19, SPRITE_ROCKER, SPRITEMOVEDATA_STANDING_DOWN, 0, 0, -1, -1, PAL_NPC_RED, OBJECTTYPE_TRAINER, 3, TrainerCooltrainermNick, -1
|
|
object_event 5, 13, SPRITE_COOLTRAINER_F, SPRITEMOVEDATA_SPINRANDOM_FAST, 0, 0, -1, -1, PAL_NPC_RED, OBJECTTYPE_TRAINER, 1, TrainerCooltrainerfGwen, -1
|
|
object_event 3, 30, SPRITE_COOLTRAINER_F, SPRITEMOVEDATA_STANDING_UP, 0, 0, -1, -1, PAL_NPC_RED, OBJECTTYPE_TRAINER, 3, TrainerCooltrainerfEmma, -1
|
|
object_event 16, 2, SPRITE_POKE_BALL, SPRITEMOVEDATA_STILL, 0, 0, -1, -1, 0, OBJECTTYPE_ITEMBALL, 0, UnionCaveB2FElixer, EVENT_UNION_CAVE_B2F_ELIXER
|
|
object_event 12, 19, SPRITE_POKE_BALL, SPRITEMOVEDATA_STILL, 0, 0, -1, -1, 0, OBJECTTYPE_ITEMBALL, 0, UnionCaveB2FHyperPotion, EVENT_UNION_CAVE_B2F_HYPER_POTION
|
|
object_event 11, 31, SPRITE_SURF, SPRITEMOVEDATA_SWIM_WANDER, 1, 1, -1, -1, PAL_NPC_BLUE, OBJECTTYPE_SCRIPT, 0, UnionCaveLapras, EVENT_UNION_CAVE_B2F_LAPRAS
|