pokecrystal-board/maps/WillsRoom.asm

143 lines
2.7 KiB
NASM
Raw Normal View History

object_const_def ; object_event constants
2015-11-26 21:22:14 -08:00
const WILLSROOM_WILL
WillsRoom_MapScripts:
db 2 ; scene scripts
scene_script .LockDoor ; SCENE_DEFAULT
scene_script .DummyScene ; SCENE_FINISHED
db 1 ; callbacks
callback MAPCALLBACK_TILES, .WillsRoomDoors
.LockDoor:
prioritysjump .WillsDoorLocksBehindYou
end
.DummyScene:
end
2017-09-28 09:33:26 -07:00
.WillsRoomDoors:
checkevent EVENT_WILLS_ROOM_ENTRANCE_CLOSED
2018-01-17 10:23:43 -08:00
iffalse .KeepEntranceOpen
changeblock 4, 14, $2a ; wall
.KeepEntranceOpen:
2013-09-24 00:48:58 -07:00
checkevent EVENT_WILLS_ROOM_EXIT_OPEN
2018-01-17 10:23:43 -08:00
iffalse .KeepExitClosed
changeblock 4, 2, $16 ; open door
.KeepExitClosed:
return
2017-09-28 09:33:26 -07:00
.WillsDoorLocksBehindYou:
2018-01-17 10:23:43 -08:00
applymovement PLAYER, WillsRoom_EnterMovement
refreshscreen $86
playsound SFX_STRENGTH
earthquake 80
2018-01-17 10:23:43 -08:00
changeblock 4, 14, $2a ; wall
reloadmappart
2015-11-25 07:16:29 -08:00
closetext
setscene SCENE_FINISHED
setevent EVENT_WILLS_ROOM_ENTRANCE_CLOSED
2015-11-25 07:16:29 -08:00
waitsfx
end
2017-09-28 09:33:26 -07:00
WillScript_Battle:
faceplayer
2015-12-09 15:25:44 -08:00
opentext
2015-07-10 01:20:21 -07:00
checkevent EVENT_BEAT_ELITE_4_WILL
2018-01-17 10:23:43 -08:00
iftrue WillScript_AfterBattle
2017-09-28 09:33:26 -07:00
writetext WillScript_WillBeforeText
2015-11-25 07:16:29 -08:00
waitbutton
closetext
2017-09-28 09:33:26 -07:00
winlosstext WillScript_WillBeatenText, 0
loadtrainer WILL, WILL1
startbattle
reloadmapafterbattle
2015-07-10 01:20:21 -07:00
setevent EVENT_BEAT_ELITE_4_WILL
2015-12-09 15:25:44 -08:00
opentext
2017-09-28 09:33:26 -07:00
writetext WillScript_WillDefeatText
2015-11-25 07:16:29 -08:00
waitbutton
closetext
playsound SFX_ENTER_DOOR
2018-01-17 10:23:43 -08:00
changeblock 4, 2, $16 ; open door
reloadmappart
2015-11-25 07:16:29 -08:00
closetext
2013-09-24 00:48:58 -07:00
setevent EVENT_WILLS_ROOM_EXIT_OPEN
2015-11-25 07:16:29 -08:00
waitsfx
end
2018-01-17 10:23:43 -08:00
WillScript_AfterBattle:
2017-09-28 09:33:26 -07:00
writetext WillScript_WillDefeatText
2015-11-25 07:16:29 -08:00
waitbutton
closetext
end
2018-01-17 10:23:43 -08:00
WillsRoom_EnterMovement:
2016-05-14 10:46:14 -07:00
step UP
step UP
step UP
step UP
step_end
2017-09-28 09:33:26 -07:00
WillScript_WillBeforeText:
text "Welcome to #MON"
line "LEAGUE, <PLAYER>."
para "Allow me to intro-"
line "duce myself. I am"
cont "WILL."
para "I have trained all"
line "around the world,"
para "making my psychic"
line "#MON powerful."
para "And, at last, I've"
line "been accepted into"
cont "the ELITE FOUR."
para "I can only keep"
line "getting better!"
para "Losing is not an"
line "option!"
done
2017-09-28 09:33:26 -07:00
WillScript_WillBeatenText:
text "I… I can't…"
line "believe it…"
done
2017-09-28 09:33:26 -07:00
WillScript_WillDefeatText:
text "Even though I was"
line "defeated, I won't"
cont "change my course."
para "I will continue"
line "battling until I"
para "stand above all"
line "trainers!"
para "Now, <PLAYER>, move"
line "on and experience"
para "the true ferocity"
line "of the ELITE FOUR."
done
WillsRoom_MapEvents:
db 0, 0 ; filler
db 3 ; warp events
2018-02-01 19:22:07 -08:00
warp_event 5, 17, INDIGO_PLATEAU_POKECENTER_1F, 4
warp_event 4, 2, KOGAS_ROOM, 1
warp_event 5, 2, KOGAS_ROOM, 2
db 0 ; coord events
db 0 ; bg events
db 1 ; object events
2018-02-01 19:22:07 -08:00
object_event 5, 7, SPRITE_WILL, SPRITEMOVEDATA_STANDING_DOWN, 0, 0, -1, -1, PAL_NPC_RED, OBJECTTYPE_SCRIPT, 0, WillScript_Battle, -1