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
VioletGym_MapScripts:
.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, FALKNER1
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
TrainerBirdKeeperRod:
trainer BIRD_KEEPER, ROD, EVENT_BEAT_BIRD_KEEPER_ROD, BirdKeeperRodSeenText, BirdKeeperRodBeatenText, 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
writetext BirdKeeperRodAfterBattleText
2015-11-25 07:16:29 -08:00
waitbutton
closetext
end
TrainerBirdKeeperAbe:
trainer BIRD_KEEPER, ABE, EVENT_BEAT_BIRD_KEEPER_ABE, BirdKeeperAbeSeenText, BirdKeeperAbeBeatenText, 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
writetext BirdKeeperAbeAfterBattleText
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:
2018-01-11 22:40:20 -08:00
trainertotext FALKNER, FALKNER1, MEM_BUFFER_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
BirdKeeperRodSeenText:
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
BirdKeeperRodBeatenText:
text "Gaaah!"
done
BirdKeeperRodAfterBattleText:
text "FALKNER's skills"
line "are for real!"
para "Don't get cocky"
line "just because you"
cont "beat me!"
done
BirdKeeperAbeSeenText:
text "Let me see if you"
line "are good enough to"
cont "face FALKNER!"
done
BirdKeeperAbeBeatenText:
text "This can't be"
line "true!"
done
BirdKeeperAbeAfterBattleText:
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
VioletGym_MapEvents:
; filler
db 0, 0
.Warps:
db 2
warp_def 4, 15, 2, VIOLET_CITY
warp_def 5, 15, 2, VIOLET_CITY
.CoordEvents:
db 0
.BGEvents:
db 2
bg_event 3, 13, BGEVENT_READ, VioletGymStatue
bg_event 6, 13, BGEVENT_READ, VioletGymStatue
.ObjectEvents:
db 4
object_event 5, 1, SPRITE_FALKNER, SPRITEMOVEDATA_STANDING_DOWN, 0, 0, -1, -1, PAL_NPC_BLUE, OBJECTTYPE_SCRIPT, 0, FalknerScript_0x683c2, -1
object_event 7, 6, SPRITE_YOUNGSTER, SPRITEMOVEDATA_STANDING_LEFT, 2, 0, -1, -1, PAL_NPC_BLUE, OBJECTTYPE_TRAINER, 3, TrainerBirdKeeperRod, -1
object_event 2, 10, SPRITE_YOUNGSTER, SPRITEMOVEDATA_STANDING_RIGHT, 2, 0, -1, -1, PAL_NPC_BLUE, OBJECTTYPE_TRAINER, 3, TrainerBirdKeeperAbe, -1
object_event 7, 13, SPRITE_GYM_GUY, SPRITEMOVEDATA_STANDING_DOWN, 0, 0, -1, -1, PAL_NPC_RED, OBJECTTYPE_SCRIPT, 0, VioletGymGuyScript, -1