pokecrystal/maps/WillsRoom.asm

152 lines
2.6 KiB
NASM

WillsRoom_MapScriptHeader:
.MapTriggers:
db 2
; triggers
dw UnknownScript_0x1804c6, $0000
dw UnknownScript_0x1804ca, $0000
.MapCallbacks:
db 1
; callbacks
dbw 1, UnknownScript_0x1804cb
UnknownScript_0x1804c6:
priorityjump UnknownScript_0x1804e0
end
UnknownScript_0x1804ca:
end
UnknownScript_0x1804cb:
checkevent EVENT_WILLS_ROOM_ENTRANCE_CLOSED
iffalse UnknownScript_0x1804d5
changeblock $4, $e, $2a
UnknownScript_0x1804d5:
checkevent EVENT_WILLS_ROOM_EXIT_OPEN
iffalse UnknownScript_0x1804df
changeblock $4, $2, $16
UnknownScript_0x1804df:
return
UnknownScript_0x1804e0:
applymovement PLAYER, MovementData_0x18052c
refreshscreen $86
playsound SFX_STRENGTH
earthquake 80
changeblock $4, $e, $2a
reloadmappart
loadmovesprites
dotrigger $1
setevent EVENT_WILLS_ROOM_ENTRANCE_CLOSED
waitbutton
end
WillScript_0x1804f8:
faceplayer
loadfont
checkevent EVENT_BEAT_ELITE_4_WILL
iftrue UnknownScript_0x180526
writetext UnknownText_0x180531
closetext
loadmovesprites
winlosstext UnknownText_0x18062c, $0000
loadtrainer WILL, 1
startbattle
returnafterbattle
setevent EVENT_BEAT_ELITE_4_WILL
loadfont
writetext UnknownText_0x180644
closetext
loadmovesprites
playsound SFX_ENTER_DOOR
changeblock $4, $2, $16
reloadmappart
loadmovesprites
setevent EVENT_WILLS_ROOM_EXIT_OPEN
waitbutton
end
UnknownScript_0x180526:
writetext UnknownText_0x180644
closetext
loadmovesprites
end
MovementData_0x18052c:
step_up
step_up
step_up
step_up
step_end
UnknownText_0x180531:
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
UnknownText_0x18062c:
text "I… I can't…"
line "believe it…"
done
UnknownText_0x180644:
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_MapEventHeader:
; filler
db 0, 0
.Warps:
db 3
warp_def $11, $5, 4, INDIGO_PLATEAU_POKECENTER_1F
warp_def $2, $4, 1, KOGAS_ROOM
warp_def $2, $5, 2, KOGAS_ROOM
.XYTriggers:
db 0
.Signposts:
db 0
.PersonEvents:
db 1
person_event SPRITE_WILL, 11, 9, $6, 0, 0, -1, -1, (PAL_OW_RED << 4) | $80, 0, WillScript_0x1804f8, -1