mirror of https://github.com/pret/pokecrystal.git
226 lines
4.1 KiB
NASM
226 lines
4.1 KiB
NASM
const_def 2 ; object constants
|
|
const PEWTERGYM_BROCK
|
|
const PEWTERGYM_YOUNGSTER
|
|
const PEWTERGYM_GYM_GUY
|
|
|
|
PewterGym_MapScripts:
|
|
db 0 ; scene scripts
|
|
|
|
db 0 ; callbacks
|
|
|
|
BrockScript_0x1a2864:
|
|
faceplayer
|
|
opentext
|
|
checkflag ENGINE_BOULDERBADGE
|
|
iftrue .FightDone
|
|
writetext UnknownText_0x1a28d0
|
|
waitbutton
|
|
closetext
|
|
winlosstext UnknownText_0x1a29bb, 0
|
|
loadtrainer BROCK, BROCK1
|
|
startbattle
|
|
reloadmapafterbattle
|
|
setevent EVENT_BEAT_BROCK
|
|
setevent EVENT_BEAT_CAMPER_JERRY
|
|
opentext
|
|
writetext UnknownText_0x1a2a3d
|
|
playsound SFX_GET_BADGE
|
|
waitsfx
|
|
setflag ENGINE_BOULDERBADGE
|
|
writetext UnknownText_0x1a2a57
|
|
waitbutton
|
|
closetext
|
|
end
|
|
|
|
.FightDone:
|
|
writetext UnknownText_0x1a2ada
|
|
waitbutton
|
|
closetext
|
|
end
|
|
|
|
TrainerCamperJerry:
|
|
trainer CAMPER, JERRY, EVENT_BEAT_CAMPER_JERRY, CamperJerrySeenText, CamperJerryBeatenText, 0, .Script
|
|
|
|
.Script:
|
|
endifjustbattled
|
|
opentext
|
|
writetext CamperJerryAfterBattleText
|
|
waitbutton
|
|
closetext
|
|
end
|
|
|
|
PewterGymGuyScript:
|
|
faceplayer
|
|
opentext
|
|
checkevent EVENT_BEAT_BROCK
|
|
iftrue .PewterGymGuyWinScript
|
|
writetext PewterGymGuyText
|
|
waitbutton
|
|
closetext
|
|
end
|
|
|
|
.PewterGymGuyWinScript:
|
|
writetext PewterGymGuyWinText
|
|
waitbutton
|
|
closetext
|
|
end
|
|
|
|
PewterGymStatue:
|
|
checkflag ENGINE_BOULDERBADGE
|
|
iftrue .Beaten
|
|
jumpstd gymstatue1
|
|
.Beaten:
|
|
trainertotext BROCK, BROCK1, MEM_BUFFER_1
|
|
jumpstd gymstatue2
|
|
|
|
UnknownText_0x1a28d0:
|
|
text "BROCK: Wow, it's"
|
|
line "not often that we"
|
|
|
|
para "get a challenger"
|
|
line "from JOHTO."
|
|
|
|
para "I'm BROCK, the"
|
|
line "PEWTER GYM LEADER."
|
|
|
|
para "I'm an expert on"
|
|
line "rock-type #MON."
|
|
|
|
para "My #MON are im-"
|
|
line "pervious to most"
|
|
|
|
para "physical attacks."
|
|
line "You'll have a hard"
|
|
|
|
para "time inflicting"
|
|
line "any damage."
|
|
|
|
para "Come on!"
|
|
done
|
|
|
|
UnknownText_0x1a29bb:
|
|
text "BROCK: Your #-"
|
|
line "MON's powerful at-"
|
|
cont "tacks overcame my"
|
|
cont "rock-hard defense…"
|
|
|
|
para "You're stronger"
|
|
line "than I expected…"
|
|
|
|
para "Go ahead--take"
|
|
line "this BADGE."
|
|
done
|
|
|
|
UnknownText_0x1a2a3d:
|
|
text "<PLAYER> received"
|
|
line "BOULDERBADGE."
|
|
done
|
|
|
|
UnknownText_0x1a2a57:
|
|
text "BROCK: <PLAY_G>,"
|
|
line "thanks. I enjoyed"
|
|
|
|
para "battling you, even"
|
|
line "though I am a bit"
|
|
cont "upset."
|
|
|
|
para "That BOULDERBADGE"
|
|
line "will make your"
|
|
|
|
para "#MON even more"
|
|
line "powerful."
|
|
done
|
|
|
|
UnknownText_0x1a2ada:
|
|
text "BROCK: The world"
|
|
line "is huge. There are"
|
|
|
|
para "still many strong"
|
|
line "trainers like you."
|
|
|
|
para "Just wait and see."
|
|
line "I'm going to be-"
|
|
cont "come a lot strong-"
|
|
cont "er too."
|
|
done
|
|
|
|
CamperJerrySeenText:
|
|
text "The trainers of"
|
|
line "this GYM use rock-"
|
|
cont "type #MON."
|
|
|
|
para "The rock-type has"
|
|
line "high DEFENSE."
|
|
|
|
para "Battles could end"
|
|
line "up going a long"
|
|
|
|
para "time. Are you"
|
|
line "ready for this?"
|
|
done
|
|
|
|
CamperJerryBeatenText:
|
|
text "I have to win"
|
|
line "these battles…"
|
|
done
|
|
|
|
CamperJerryAfterBattleText:
|
|
text "Hey, you! Trainer"
|
|
line "from JOHTO! BROCK"
|
|
|
|
para "is tough. He'll"
|
|
line "punish you if you"
|
|
|
|
para "don't take him"
|
|
line "seriously."
|
|
done
|
|
|
|
PewterGymGuyText:
|
|
text "Yo! CHAMP in"
|
|
line "making! You're"
|
|
|
|
para "really rocking."
|
|
line "Are you battling"
|
|
|
|
para "the GYM LEADERS of"
|
|
line "KANTO?"
|
|
|
|
para "They're strong and"
|
|
line "dedicated people,"
|
|
|
|
para "just like JOHTO's"
|
|
line "GYM LEADERS."
|
|
done
|
|
|
|
PewterGymGuyWinText:
|
|
text "Yo! CHAMP in"
|
|
line "making! That GYM"
|
|
|
|
para "didn't give you"
|
|
line "much trouble."
|
|
|
|
para "The way you took"
|
|
line "charge was really"
|
|
|
|
para "inspiring. I mean"
|
|
line "that seriously."
|
|
done
|
|
|
|
PewterGym_MapEvents:
|
|
db 0, 0 ; filler
|
|
|
|
db 2 ; warp events
|
|
warp_event 4, 13, PEWTER_CITY, 2
|
|
warp_event 5, 13, PEWTER_CITY, 2
|
|
|
|
db 0 ; coord events
|
|
|
|
db 2 ; bg events
|
|
bg_event 2, 11, BGEVENT_READ, PewterGymStatue
|
|
bg_event 7, 11, BGEVENT_READ, PewterGymStatue
|
|
|
|
db 3 ; object events
|
|
object_event 5, 1, SPRITE_BROCK, SPRITEMOVEDATA_STANDING_DOWN, 0, 0, -1, -1, PAL_NPC_BROWN, OBJECTTYPE_SCRIPT, 0, BrockScript_0x1a2864, -1
|
|
object_event 2, 5, SPRITE_YOUNGSTER, SPRITEMOVEDATA_STANDING_RIGHT, 0, 0, -1, -1, PAL_NPC_GREEN, OBJECTTYPE_TRAINER, 3, TrainerCamperJerry, -1
|
|
object_event 6, 11, SPRITE_GYM_GUY, SPRITEMOVEDATA_STANDING_DOWN, 0, 0, -1, -1, PAL_NPC_BLUE, OBJECTTYPE_SCRIPT, 1, PewterGymGuyScript, -1
|