pokegold/maps/MountMortarB1F.asm
2020-06-05 15:25:19 -04:00

140 lines
3.0 KiB
NASM

object_const_def ; object_event constants
const MOUNTMORTARB1F_POKE_BALL1
const MOUNTMORTARB1F_POKE_BALL2
const MOUNTMORTARB1F_BOULDER
const MOUNTMORTARB1F_KIYO
MountMortarB1F_MapScripts:
db 0 ; scene scripts
db 0 ; callbacks
MountMortarB1FKiyoScript:
faceplayer
opentext
checkevent EVENT_GOT_TYROGUE_FROM_KIYO
iftrue .GotTyrogue
checkevent EVENT_BEAT_BLACKBELT_KIYO
iftrue .BeatKiyo
writetext MountMortarB1FKiyoIntroText
waitbutton
closetext
winlosstext MountMortarB1FKiyoWinText, 0
loadtrainer BLACKBELT_T, KIYO
startbattle
reloadmapafterbattle
setevent EVENT_BEAT_BLACKBELT_KIYO
opentext
.BeatKiyo:
writetext MountMortarB1FTyrogueRewardText
promptbutton
waitsfx
readvar VAR_PARTYCOUNT
ifequal PARTY_LENGTH, .NoRoom
writetext MountMortarB1FReceiveMonText
playsound SFX_CAUGHT_MON
waitsfx
givepoke TYROGUE, 10
setevent EVENT_GOT_TYROGUE_FROM_KIYO
.GotTyrogue:
writetext MountMortarB1FKiyoGotTyrogueText
waitbutton
closetext
end
.NoRoom:
writetext MountMortarB1FKiyoFullPartyText
waitbutton
closetext
end
MountMortarB1FBoulder:
jumpstd strengthboulder
MountMortarB1FHyperPotion:
itemball HYPER_POTION
MountMortarB1FFullHeal:
itemball FULL_HEAL
MountMortarB1FHiddenMaxRevive:
hiddenitem MAX_REVIVE, EVENT_MOUNT_MORTAR_B1F_HIDDEN_MAX_REVIVE
MountMortarB1FKiyoIntroText:
text "Hey!"
para "I am the KARATE"
line "KING!"
para "I train alone here"
line "in the dark!"
para "You!"
line "Battle with me!"
para "Hwaaarggh!"
done
MountMortarB1FKiyoWinText:
text "Waaaarggh!"
line "I'm beaten!"
done
MountMortarB1FTyrogueRewardText:
text "I… I'm crushed…"
para "My training is"
line "still not enough…"
para "But a loss is a"
line "loss. I admit it."
para "As proof that you"
line "defeated me, I'll"
para "give you a rare"
line "fighting #MON."
done
MountMortarB1FReceiveMonText:
text "<PLAYER> received"
line "TYROGUE."
done
MountMortarB1FKiyoGotTyrogueText:
text "TYROGUE is a"
line "fighting-type."
para "It evolves into a"
line "tougher #MON."
para "Keep up the hard"
line "work. I'll keep"
cont "training too."
para "Farewell!"
done
MountMortarB1FKiyoFullPartyText:
text "You have no room"
line "in your party!"
done
MountMortarB1F_MapEvents:
db 0, 0 ; filler
db 2 ; warp events
warp_event 3, 3, MOUNT_MORTAR_1F_INSIDE, 5
warp_event 19, 29, MOUNT_MORTAR_1F_OUTSIDE, 7
db 0 ; coord events
db 1 ; bg events
bg_event 4, 6, BGEVENT_ITEM, MountMortarB1FHiddenMaxRevive
db 4 ; object events
object_event 31, 17, SPRITE_POKE_BALL, SPRITEMOVEDATA_STILL, 0, 0, -1, -1, 0, OBJECTTYPE_ITEMBALL, 0, MountMortarB1FHyperPotion, EVENT_MOUNT_MORTAR_B1F_HYPER_POTION
object_event 4, 16, SPRITE_POKE_BALL, SPRITEMOVEDATA_STILL, 0, 0, -1, -1, 0, OBJECTTYPE_ITEMBALL, 0, MountMortarB1FFullHeal, EVENT_MOUNT_MORTAR_B1F_CARBOS
object_event 9, 10, SPRITE_BOULDER, SPRITEMOVEDATA_STRENGTH_BOULDER, 0, 0, -1, -1, 0, OBJECTTYPE_SCRIPT, 0, MountMortarB1FBoulder, -1
object_event 13, 4, SPRITE_BLACK_BELT, SPRITEMOVEDATA_STANDING_DOWN, 0, 0, -1, -1, PAL_NPC_BROWN, OBJECTTYPE_SCRIPT, 0, MountMortarB1FKiyoScript, -1