pokecrystal-board/maps/VioletGym.asm

307 lines
5.6 KiB
NASM
Raw Normal View History

2015-11-26 21:22:14 -08:00
const_value set 2
const VIOLETGYM_FALKNER
const VIOLETGYM_YOUNGSTER1
const VIOLETGYM_YOUNGSTER2
const VIOLETGYM_GYM_GUY
2015-07-10 00:00:27 -07:00
VioletGym_MapScriptHeader:
.SceneScripts:
db 0
.MapCallbacks:
db 0
2015-07-10 00:00:27 -07:00
FalknerScript_0x683c2:
faceplayer
2015-12-09 15:25:44 -08:00
opentext
2013-09-24 00:48:58 -07:00
checkevent EVENT_BEAT_FALKNER
2015-07-10 00:00:27 -07:00
iftrue .FightDone
2015-01-20 00:01:23 -08:00
writetext UnknownText_0x68473
2015-11-25 07:16:29 -08:00
waitbutton
closetext
2015-11-02 11:37:02 -08:00
winlosstext UnknownText_0x6854a, 0
loadtrainer FALKNER, 1
startbattle
reloadmapafterbattle
2013-09-24 00:48:58 -07:00
setevent EVENT_BEAT_FALKNER
2015-12-09 15:25:44 -08:00
opentext
2015-01-20 00:01:23 -08:00
writetext UnknownText_0x685af
playsound SFX_GET_BADGE
2015-11-25 07:16:29 -08:00
waitsfx
2015-07-10 00:00:27 -07:00
setflag ENGINE_ZEPHYRBADGE
checkcode VAR_BADGES
scall VioletGymActivateRockets
.FightDone:
2013-09-24 00:48:58 -07:00
checkevent EVENT_GOT_TM31_MUD_SLAP
iftrue .SpeechAfterTM
2013-09-24 00:48:58 -07:00
setevent EVENT_BEAT_BIRD_KEEPER_ROD
setevent EVENT_BEAT_BIRD_KEEPER_ABE
setmapscene ELMS_LAB, $2
2015-10-24 07:34:19 -07:00
specialphonecall SPECIALCALL_ASSISTANT
2015-01-20 00:01:23 -08:00
writetext UnknownText_0x685c8
2015-11-29 19:29:45 -08:00
buttonsound
2015-11-04 17:20:14 -08:00
verbosegiveitem TM_MUD_SLAP
iffalse .NoRoomForMudSlap
2013-09-24 00:48:58 -07:00
setevent EVENT_GOT_TM31_MUD_SLAP
2015-01-20 00:01:23 -08:00
writetext UnknownText_0x68648
2015-11-25 07:16:29 -08:00
waitbutton
closetext
end
.SpeechAfterTM:
2015-01-20 00:01:23 -08:00
writetext UnknownText_0x68735
2015-11-25 07:16:29 -08:00
waitbutton
.NoRoomForMudSlap:
2015-11-25 07:16:29 -08:00
closetext
end
VioletGymActivateRockets:
2015-07-10 00:00:27 -07:00
if_equal 7, .RadioTowerRockets
if_equal 6, .GoldenrodRockets
end
.GoldenrodRockets:
2015-06-24 18:26:24 -07:00
jumpstd goldenrodrockets
.RadioTowerRockets:
2015-06-24 18:26:24 -07:00
jumpstd radiotowerrockets
2015-07-10 00:00:27 -07:00
TrainerBird_keeperRod:
2017-12-17 17:45:04 -08:00
trainer EVENT_BEAT_BIRD_KEEPER_ROD, BIRD_KEEPER, ROD, Bird_keeperRodSeenText, Bird_keeperRodBeatenText, 0, .Script
2017-12-17 17:45:04 -08:00
.Script:
2015-11-25 07:16:29 -08:00
end_if_just_battled
2015-12-09 15:25:44 -08:00
opentext
2017-12-10 12:36:58 -08:00
writetext Bird_keeperRodAfterBattleText
2015-11-25 07:16:29 -08:00
waitbutton
closetext
end
2015-07-10 00:00:27 -07:00
TrainerBird_keeperAbe:
2017-12-17 17:45:04 -08:00
trainer EVENT_BEAT_BIRD_KEEPER_ABE, BIRD_KEEPER, ABE, Bird_keeperAbeSeenText, Bird_keeperAbeBeatenText, 0, .Script
2017-12-17 17:45:04 -08:00
.Script:
2015-11-25 07:16:29 -08:00
end_if_just_battled
2015-12-09 15:25:44 -08:00
opentext
2017-12-10 12:36:58 -08:00
writetext Bird_keeperAbeAfterBattleText
2015-11-25 07:16:29 -08:00
waitbutton
closetext
end
2015-07-10 00:00:27 -07:00
VioletGymGuyScript:
faceplayer
2015-12-09 15:25:44 -08:00
opentext
2013-09-24 00:48:58 -07:00
checkevent EVENT_BEAT_FALKNER
iftrue .VioletGymGuyWinScript
2015-01-20 00:01:23 -08:00
writetext VioletGymGuyText
2015-11-25 07:16:29 -08:00
waitbutton
closetext
end
.VioletGymGuyWinScript:
2015-01-20 00:01:23 -08:00
writetext VioletGymGuyWinText
2015-11-25 07:16:29 -08:00
waitbutton
closetext
end
2015-06-24 20:51:36 -07:00
VioletGymStatue:
checkflag ENGINE_ZEPHYRBADGE
iftrue .Beaten
2015-06-24 18:26:24 -07:00
jumpstd gymstatue1
.Beaten:
trainertotext FALKNER, 1, $1
2015-06-24 18:26:24 -07:00
jumpstd gymstatue2
2015-07-10 00:00:27 -07:00
UnknownText_0x68473:
text "I'm FALKNER, the"
line "VIOLET #MON GYM"
cont "leader!"
para "People say you can"
line "clip flying-type"
para "#MON's wings"
line "with a jolt of"
cont "electricity…"
para "I won't allow such"
line "insults to bird"
cont "#MON!"
para "I'll show you the"
line "real power of the"
para "magnificent bird"
line "#MON!"
done
2015-07-10 00:00:27 -07:00
UnknownText_0x6854a:
text "…Darn! My dad's"
line "cherished bird"
cont "#MON…"
para "All right."
line "Take this."
para "It's the official"
line "#MON LEAGUE"
cont "ZEPHYRBADGE."
done
2015-07-10 00:00:27 -07:00
UnknownText_0x685af:
text "<PLAYER> received"
line "ZEPHYRBADGE."
done
2015-07-10 00:00:27 -07:00
UnknownText_0x685c8:
text "ZEPHYRBADGE"
line "raises the attack"
cont "power of #MON."
para "It also enables"
line "#MON to use"
para "FLASH, if they"
line "have it, anytime."
para "Here--take this"
line "too."
done
2015-07-10 00:00:27 -07:00
UnknownText_0x68648:
text "By using a TM, a"
line "#MON will"
para "instantly learn a"
line "new move."
para "Think before you"
line "act--a TM can be"
cont "used only once."
para "TM31 contains"
line "MUD-SLAP."
para "It reduces the"
line "enemy's accuracy"
para "while it causes"
line "damage."
para "In other words, it"
line "is both defensive"
cont "and offensive."
done
2015-07-10 00:00:27 -07:00
UnknownText_0x68735:
text "There are #MON"
line "GYMS in cities and"
cont "towns ahead."
para "You should test"
line "your skills at"
cont "these GYMS."
para "I'm going to train"
line "harder to become"
para "the greatest bird"
line "master!"
done
2015-07-10 00:00:27 -07:00
Bird_keeperRodSeenText:
text "The keyword is"
line "guts!"
para "Those here are"
line "training night and"
para "day to become bird"
line "#MON masters."
para "Come on!"
done
2015-07-10 00:00:27 -07:00
Bird_keeperRodBeatenText:
text "Gaaah!"
done
2017-12-10 12:36:58 -08:00
Bird_keeperRodAfterBattleText:
text "FALKNER's skills"
line "are for real!"
para "Don't get cocky"
line "just because you"
cont "beat me!"
done
2015-07-10 00:00:27 -07:00
Bird_keeperAbeSeenText:
text "Let me see if you"
line "are good enough to"
cont "face FALKNER!"
done
2015-07-10 00:00:27 -07:00
Bird_keeperAbeBeatenText:
text "This can't be"
line "true!"
done
2017-12-10 12:36:58 -08:00
Bird_keeperAbeAfterBattleText:
text "This is pathetic,"
line "losing to some"
cont "rookie trainer…"
done
2015-07-10 00:00:27 -07:00
VioletGymGuyText:
text "Hey! I'm no train-"
line "er but I can give"
cont "some advice!"
para "Believe me!"
line "If you believe, a"
para "championship dream"
line "can come true."
para "You believe?"
line "Then listen."
para "The grass-type is"
line "weak against the"
para "flying-type. Keep"
line "this in mind."
done
2015-07-10 00:00:27 -07:00
VioletGymGuyWinText:
text "Nice battle! Keep"
line "it up, and you'll"
para "be the CHAMP in no"
line "time at all!"
done
2015-07-10 00:00:27 -07:00
VioletGym_MapEventHeader:
; filler
db 0, 0
.Warps:
db 2
warp_def $f, $4, 2, VIOLET_CITY
warp_def $f, $5, 2, VIOLET_CITY
.CoordEvents:
db 0
.BGEvents:
db 2
bg_event 13, 3, BGEVENT_READ, VioletGymStatue
bg_event 13, 6, BGEVENT_READ, VioletGymStatue
.ObjectEvents:
db 4
object_event SPRITE_FALKNER, 1, 5, SPRITEMOVEDATA_STANDING_DOWN, 0, 0, -1, -1, PAL_NPC_BLUE, OBJECTTYPE_SCRIPT, 0, FalknerScript_0x683c2, -1
object_event SPRITE_YOUNGSTER, 6, 7, SPRITEMOVEDATA_STANDING_LEFT, 0, 2, -1, -1, PAL_NPC_BLUE, OBJECTTYPE_TRAINER, 3, TrainerBird_keeperRod, -1
object_event SPRITE_YOUNGSTER, 10, 2, SPRITEMOVEDATA_STANDING_RIGHT, 0, 2, -1, -1, PAL_NPC_BLUE, OBJECTTYPE_TRAINER, 3, TrainerBird_keeperAbe, -1
object_event SPRITE_GYM_GUY, 13, 7, SPRITEMOVEDATA_STANDING_DOWN, 0, 0, -1, -1, PAL_NPC_RED, OBJECTTYPE_SCRIPT, 0, VioletGymGuyScript, -1