pokecrystal-board/maps/DragonShrine.asm

694 lines
12 KiB
NASM
Raw Normal View History

2015-11-26 21:22:14 -08:00
const_value set 2
const DRAGONSHRINE_ELDER1
const DRAGONSHRINE_ELDER2
const DRAGONSHRINE_ELDER3
const DRAGONSHRINE_CLAIR
2015-07-10 01:45:35 -07:00
DragonShrine_MapScriptHeader:
.MapTriggers:
db 2
; triggers
dw .Trigger0, 0
2015-11-02 11:37:02 -08:00
dw .Trigger1, 0
.MapCallbacks:
db 0
.Trigger0:
priorityjump DragonShrineTestScript
end
.Trigger1:
end
DragonShrineTestScript:
applymovement PLAYER, MovementData_0x18d2bf
2015-11-26 21:22:14 -08:00
applymovement DRAGONSHRINE_ELDER1, MovementData_0x18d2c7
2015-12-09 15:25:44 -08:00
opentext
2015-01-20 00:01:23 -08:00
writetext UnknownText_0x18d2ea
2015-11-29 19:29:45 -08:00
buttonsound
.Question1:
setevent EVENT_RECEIVED_BALLS_FROM_KURT
2015-01-20 00:01:23 -08:00
writetext UnknownText_0x18d3bc
2015-11-29 19:29:45 -08:00
buttonsound
2013-04-30 23:32:25 -07:00
loadmenudata MenuDataHeader_0x18d215
interpretmenu2
writebackup
if_equal $1, .RightAnswer
if_equal $2, .WrongAnswer
if_equal $3, .RightAnswer
end
.Question2:
setevent EVENT_DRAGON_SHRINE_QUESTION_2
2015-01-20 00:01:23 -08:00
writetext UnknownText_0x18d3d3
2015-11-29 19:29:45 -08:00
buttonsound
2013-04-30 23:32:25 -07:00
loadmenudata MenuDataHeader_0x18d234
interpretmenu2
writebackup
if_equal $1, .RightAnswer
if_equal $2, .RightAnswer
if_equal $3, .WrongAnswer
.Question3:
setevent EVENT_DRAGON_SHRINE_QUESTION_3
2015-01-20 00:01:23 -08:00
writetext UnknownText_0x18d3f3
2015-11-29 19:29:45 -08:00
buttonsound
2013-04-30 23:32:25 -07:00
loadmenudata MenuDataHeader_0x18d258
interpretmenu2
writebackup
if_equal $1, .WrongAnswer
if_equal $2, .RightAnswer
if_equal $3, .RightAnswer
.Question4:
setevent EVENT_DRAGON_SHRINE_QUESTION_4
2015-01-20 00:01:23 -08:00
writetext UnknownText_0x18d420
2015-11-29 19:29:45 -08:00
buttonsound
2013-04-30 23:32:25 -07:00
loadmenudata MenuDataHeader_0x18d283
interpretmenu2
writebackup
if_equal $1, .RightAnswer
if_equal $2, .WrongAnswer
if_equal $3, .RightAnswer
.Question5:
setevent EVENT_DRAGON_SHRINE_QUESTION_5
2015-01-20 00:01:23 -08:00
writetext UnknownText_0x18d44a
2015-11-29 19:29:45 -08:00
buttonsound
2013-04-30 23:32:25 -07:00
loadmenudata MenuDataHeader_0x18d2a5
interpretmenu2
writebackup
if_equal $1, .WrongAnswer
if_equal $2, .RightAnswer
if_equal $3, .WrongAnswer
.RightAnswer:
checkevent EVENT_DRAGON_SHRINE_QUESTION_5
iftrue .PassedTheTest
2015-01-20 00:01:23 -08:00
writetext UnknownText_0x18d82d
2015-11-29 19:29:45 -08:00
buttonsound
checkevent EVENT_DRAGON_SHRINE_QUESTION_4
iftrue .Question5
checkevent EVENT_DRAGON_SHRINE_QUESTION_3
iftrue .Question4
checkevent EVENT_DRAGON_SHRINE_QUESTION_2
iftrue .Question3
checkevent EVENT_RECEIVED_BALLS_FROM_KURT
iftrue .Question2
.WrongAnswer:
2015-11-25 07:16:29 -08:00
closetext
2015-11-26 21:22:14 -08:00
spriteface DRAGONSHRINE_ELDER1, LEFT
2015-12-09 15:25:44 -08:00
opentext
2015-01-20 00:01:23 -08:00
writetext UnknownText_0x18d7f6
2015-11-25 07:16:29 -08:00
waitbutton
closetext
2015-11-26 21:22:14 -08:00
spriteface DRAGONSHRINE_ELDER1, DOWN
2015-12-09 15:25:44 -08:00
opentext
2015-01-20 00:01:23 -08:00
writetext UnknownText_0x18d816
2015-11-25 07:16:29 -08:00
waitbutton
closetext
2015-07-10 05:08:03 -07:00
setevent EVENT_ANSWERED_DRAGON_MASTER_QUIZ_WRONG
2015-12-09 15:25:44 -08:00
opentext
checkevent EVENT_DRAGON_SHRINE_QUESTION_5
iftrue .Question5
checkevent EVENT_DRAGON_SHRINE_QUESTION_4
iftrue .Question4
checkevent EVENT_DRAGON_SHRINE_QUESTION_3
iftrue .Question3
checkevent EVENT_DRAGON_SHRINE_QUESTION_2
iftrue .Question2
checkevent EVENT_RECEIVED_BALLS_FROM_KURT
iftrue .Question1
.PassedTheTest:
2015-01-20 00:01:23 -08:00
writetext UnknownText_0x18d47c
2015-11-25 07:16:29 -08:00
waitbutton
closetext
playsound SFX_ENTER_DOOR
showemote EMOTE_SHOCK, PLAYER, 15
playmusic MUSIC_CLAIR
2015-11-26 21:22:14 -08:00
appear DRAGONSHRINE_CLAIR
2015-11-25 07:16:29 -08:00
waitsfx
spriteface PLAYER, DOWN
pause 30
2015-11-26 21:22:14 -08:00
applymovement DRAGONSHRINE_CLAIR, MovementData_0x18d2d4
spriteface DRAGONSHRINE_CLAIR, RIGHT
spriteface PLAYER, LEFT
2015-11-26 21:22:14 -08:00
spriteface DRAGONSHRINE_ELDER1, LEFT
2015-12-09 15:25:44 -08:00
opentext
2015-01-20 00:01:23 -08:00
writetext UnknownText_0x18d916
2015-11-25 07:16:29 -08:00
waitbutton
closetext
special Special_FadeOutMusic
2015-11-26 21:22:14 -08:00
applymovement DRAGONSHRINE_CLAIR, MovementData_0x18d2da
2015-12-09 15:25:44 -08:00
opentext
2015-01-20 00:01:23 -08:00
writetext UnknownText_0x18d974
2015-11-25 07:16:29 -08:00
waitbutton
closetext
2015-11-26 21:22:14 -08:00
applymovement DRAGONSHRINE_CLAIR, MovementData_0x18d2dd
2015-12-09 15:25:44 -08:00
opentext
2015-01-20 00:01:23 -08:00
writetext UnknownText_0x18d983
2015-11-25 07:16:29 -08:00
waitbutton
closetext
2015-11-26 21:22:14 -08:00
applymovement DRAGONSHRINE_ELDER1, MovementData_0x18d2c9
spriteface DRAGONSHRINE_CLAIR, UP
2015-12-09 15:25:44 -08:00
opentext
2015-01-20 00:01:23 -08:00
writetext UnknownText_0x18d520
2015-11-25 07:16:29 -08:00
waitbutton
closetext
2015-11-26 21:22:14 -08:00
showemote EMOTE_SHOCK, DRAGONSHRINE_CLAIR, 15
2015-12-09 15:25:44 -08:00
opentext
2015-01-20 00:01:23 -08:00
writetext UnknownText_0x18d9ae
2015-11-25 07:16:29 -08:00
waitbutton
closetext
2015-11-26 21:22:14 -08:00
applymovement DRAGONSHRINE_CLAIR, MovementData_0x18d2e0
2015-12-09 15:25:44 -08:00
opentext
2015-01-20 00:01:23 -08:00
writetext UnknownText_0x18d9bf
2015-11-25 07:16:29 -08:00
waitbutton
2015-07-10 05:08:03 -07:00
setflag ENGINE_RISINGBADGE
playsound SFX_GET_BADGE
2015-11-25 07:16:29 -08:00
waitsfx
special RestartMapMusic
2015-10-24 07:34:19 -07:00
specialphonecall SPECIALCALL_MASTERBALL
dotrigger $1
domaptrigger DRAGONS_DEN_B1F, $1
2015-01-20 00:01:23 -08:00
writetext UnknownText_0x18d9f2
2015-11-29 19:29:45 -08:00
buttonsound
2015-01-20 00:01:23 -08:00
writetext UnknownText_0x18da0b
2015-11-25 07:16:29 -08:00
waitbutton
closetext
2015-11-26 21:22:14 -08:00
applymovement DRAGONSHRINE_ELDER1, MovementData_0x18d2ce
spriteface DRAGONSHRINE_CLAIR, UP
applymovement DRAGONSHRINE_ELDER1, MovementData_0x18d2d1
spriteface PLAYER, UP
2015-12-09 15:25:44 -08:00
opentext
2015-01-20 00:01:23 -08:00
writetext UnknownText_0x18d5a3
2015-11-25 07:16:29 -08:00
waitbutton
closetext
2015-12-09 15:25:44 -08:00
opentext
2015-01-20 00:01:23 -08:00
writetext UnknownText_0x18dab4
2015-11-25 07:16:29 -08:00
waitbutton
closetext
2015-11-26 21:22:14 -08:00
applymovement DRAGONSHRINE_CLAIR, MovementData_0x18d2e3
playsound SFX_ENTER_DOOR
2015-11-26 21:22:14 -08:00
disappear DRAGONSHRINE_CLAIR
2015-11-25 07:16:29 -08:00
waitsfx
setevent EVENT_GAVE_KURT_APRICORNS
end
2015-07-10 01:45:35 -07:00
ElderScript_0x18d1a5:
faceplayer
2015-12-09 15:25:44 -08:00
opentext
checkevent EVENT_GAVE_KURT_APRICORNS
iftrue .DontGiveDratiniYet
checkevent EVENT_JUST_RECEIVED_DRATINI
iftrue .ReceivedDratini
2015-07-10 05:08:03 -07:00
checkevent EVENT_GOT_DRATINI
iffalse .GiveDratini
2013-09-24 00:48:58 -07:00
checkevent EVENT_BEAT_RIVAL_IN_MT_MOON
iftrue .BeatRivalInMtMoon
2015-01-20 00:01:23 -08:00
writetext UnknownText_0x18d724
2015-11-25 07:16:29 -08:00
waitbutton
closetext
end
.GiveDratini:
2015-01-20 00:01:23 -08:00
writetext UnknownText_0x18d604
2015-11-25 07:16:29 -08:00
waitbutton
checkcode VAR_PARTYCOUNT
if_equal 6, .PartyFull
2015-01-20 00:01:23 -08:00
writetext UnknownText_0x18d697
playsound SFX_CAUGHT_MON
2015-11-25 07:16:29 -08:00
waitsfx
2015-10-04 11:14:51 -07:00
givepoke DRATINI, 15
2015-07-10 05:08:03 -07:00
checkevent EVENT_ANSWERED_DRAGON_MASTER_QUIZ_WRONG
special SpecialDratini
2015-07-10 05:08:03 -07:00
setevent EVENT_GOT_DRATINI
setevent EVENT_JUST_RECEIVED_DRATINI
2015-01-20 00:01:23 -08:00
writetext UnknownText_0x18d6ca
2015-11-25 07:16:29 -08:00
waitbutton
closetext
end
.PartyFull:
2015-01-20 00:01:23 -08:00
writetext UnknownText_0x18d6ac
2015-11-25 07:16:29 -08:00
waitbutton
closetext
end
.BeatRivalInMtMoon:
2015-01-20 00:01:23 -08:00
writetext UnknownText_0x18d782
2015-11-25 07:16:29 -08:00
waitbutton
closetext
end
.DontGiveDratiniYet:
2015-01-20 00:01:23 -08:00
writetext UnknownText_0x18d5e5
2015-11-25 07:16:29 -08:00
waitbutton
closetext
end
.ReceivedDratini:
2015-01-20 00:01:23 -08:00
writetext UnknownText_0x18d6ca
2015-11-25 07:16:29 -08:00
waitbutton
closetext
end
2015-07-10 01:45:35 -07:00
ElderScript_0x18d205:
faceplayer
2015-12-09 15:25:44 -08:00
opentext
2015-01-20 00:01:23 -08:00
writetext UnknownText_0x18d840
2015-11-25 07:16:29 -08:00
waitbutton
closetext
end
2015-07-10 01:45:35 -07:00
ElderScript_0x18d20d:
faceplayer
2015-12-09 15:25:44 -08:00
opentext
2015-01-20 00:01:23 -08:00
writetext UnknownText_0x18d8b1
2015-11-25 07:16:29 -08:00
waitbutton
closetext
end
2013-04-30 23:32:25 -07:00
2015-07-10 01:45:35 -07:00
MenuDataHeader_0x18d215:
2013-04-30 23:32:25 -07:00
db $40 ; flags
db 04, 08 ; start coords
db 11, 19 ; end coords
dw MenuData2_0x18d21d
db 1 ; default option
2015-07-10 01:45:35 -07:00
MenuData2_0x18d21d:
2013-04-30 23:32:25 -07:00
db $81 ; flags
db 3 ; items
db "Pal@"
db "Underling@"
db "Friend@"
2015-07-10 01:45:35 -07:00
MenuDataHeader_0x18d234:
2013-04-30 23:32:25 -07:00
db $40 ; flags
db 04, 09 ; start coords
db 11, 19 ; end coords
dw MenuData2_0x18d23c
db 1 ; default option
2015-07-10 01:45:35 -07:00
MenuData2_0x18d23c:
2013-04-30 23:32:25 -07:00
db $81 ; flags
db 3 ; items
db "Strategy@"
db "Raising@"
db "Cheating@"
2015-07-10 01:45:35 -07:00
MenuDataHeader_0x18d258:
2013-04-30 23:32:25 -07:00
db $40 ; flags
db 04, 05 ; start coords
db 11, 19 ; end coords
dw MenuData2_0x18d260
db 1 ; default option
2015-07-10 01:45:35 -07:00
MenuData2_0x18d260:
2013-04-30 23:32:25 -07:00
db $81 ; flags
db 3 ; items
db "Weak person@"
db "Tough person@"
db "Anybody@"
2015-07-10 01:45:35 -07:00
MenuDataHeader_0x18d283:
2013-04-30 23:32:25 -07:00
db $40 ; flags
db 04, 08 ; start coords
db 11, 19 ; end coords
dw MenuData2_0x18d28b
db 1 ; default option
2015-07-10 01:45:35 -07:00
MenuData2_0x18d28b:
2013-04-30 23:32:25 -07:00
db $81 ; flags
db 3 ; items
db "Love@"
db "Violence@"
db "Knowledge@"
2015-07-10 01:45:35 -07:00
MenuDataHeader_0x18d2a5:
2013-04-30 23:32:25 -07:00
db $40 ; flags
db 04, 12 ; start coords
db 11, 19 ; end coords
dw MenuData2_0x18d2ad
db 1 ; default option
2015-07-10 01:45:35 -07:00
MenuData2_0x18d2ad:
2013-04-30 23:32:25 -07:00
db $81 ; flags
db 3 ; items
db "Tough@"
db "Both@"
db "Weak@"
2015-07-10 01:45:35 -07:00
MovementData_0x18d2bf:
slow_step_up
slow_step_up
slow_step_up
slow_step_right
slow_step_up
slow_step_up
slow_step_up
step_end
2015-07-10 01:45:35 -07:00
MovementData_0x18d2c7:
slow_step_down
step_end
2015-07-10 01:45:35 -07:00
MovementData_0x18d2c9:
slow_step_left
slow_step_left
slow_step_left
turn_head_down
step_end
2015-07-10 01:45:35 -07:00
MovementData_0x18d2ce:
slow_step_right
slow_step_right
step_end
2015-07-10 01:45:35 -07:00
MovementData_0x18d2d1:
slow_step_right
turn_head_down
step_end
2015-07-10 01:45:35 -07:00
MovementData_0x18d2d4:
slow_step_up
slow_step_up
slow_step_up
slow_step_up
slow_step_up
step_end
2015-07-10 01:45:35 -07:00
MovementData_0x18d2da:
fix_facing
big_step_left
step_end
2015-07-10 01:45:35 -07:00
MovementData_0x18d2dd:
slow_step_left
remove_fixed_facing
step_end
2015-07-10 01:45:35 -07:00
MovementData_0x18d2e0:
slow_step_right
slow_step_right
step_end
2015-07-10 01:45:35 -07:00
MovementData_0x18d2e3:
step_down
step_down
step_down
step_down
step_down
step_down
step_end
2015-07-10 01:45:35 -07:00
UnknownText_0x18d2ea:
text "Hm… Good to see"
line "you here."
para "No need to explain"
line "why you came."
para "CLAIR sent you"
line "here, didn't she?"
para "That girl is a"
line "handful…"
para "I am sorry, but I"
line "must test you."
para "Not to worry, you"
line "are to answer only"
cont "a few questions."
para "Ready?"
done
2015-07-10 01:45:35 -07:00
UnknownText_0x18d3bc:
text "What are #MON"
line "to you?"
done
2015-07-10 01:45:35 -07:00
UnknownText_0x18d3d3:
text "What helps you to"
line "win battles?"
done
2015-07-10 01:45:35 -07:00
UnknownText_0x18d3f3:
text "What kind of"
line "trainer do you"
cont "wish to battle?"
done
2015-07-10 01:45:35 -07:00
UnknownText_0x18d420:
text "What is most"
line "important for"
cont "raising #MON?"
done
2015-07-10 01:45:35 -07:00
UnknownText_0x18d44a:
text "Strong #MON."
line "Weak #MON."
para "Which is more"
line "important?"
done
2015-07-10 01:45:35 -07:00
UnknownText_0x18d47c:
text "Hm… I see…"
para "You care deeply"
line "for #MON."
para "Very commendable."
para "That conviction is"
line "what is important!"
para "<PLAYER>, don't"
line "lose that belief."
para "It will see you"
line "through at the"
cont "#MON LEAGUE."
done
2015-07-10 01:45:35 -07:00
UnknownText_0x18d520:
text "CLAIR!"
para "This child is"
line "impeccable, in"
cont "skill and spirit!"
para "Admit defeat and"
line "confer the RISING-"
cont "BADGE!"
para "…Or must I inform"
line "LANCE of this?"
done
2015-07-10 01:45:35 -07:00
UnknownText_0x18d5a3:
text "CLAIR…"
para "Reflect upon what"
line "it is that you"
para "lack and this"
line "child has."
done
2015-07-10 01:45:35 -07:00
UnknownText_0x18d5e5:
text "Come again, if you"
line "so desire."
done
2015-07-10 01:45:35 -07:00
UnknownText_0x18d604:
text "Hm… Good to see"
line "you here."
para "Your arrival is"
line "most fortunate."
para "I have something"
line "for you."
para "Take this DRATINI"
line "as proof that I"
para "have recognized"
line "your worth."
done
2015-07-10 01:45:35 -07:00
UnknownText_0x18d697:
text "<PLAYER> received"
line "DRATINI!"
done
2015-07-10 01:45:35 -07:00
UnknownText_0x18d6ac:
text "Hm? Your #MON"
line "party is full."
done
2015-07-10 01:45:35 -07:00
UnknownText_0x18d6ca:
text "Dragon #MON are"
line "symbolic of our"
cont "clan."
para "You have shown"
line "that you can be"
para "entrusted with"
line "one."
done
2015-07-10 01:45:35 -07:00
UnknownText_0x18d724:
text "CLAIR appears to"
line "have learned an"
para "invaluable lesson"
line "from you."
para "I thank you as her"
line "grandfather."
done
2015-07-10 01:45:35 -07:00
UnknownText_0x18d782:
text "A boy close to"
line "your age is in"
cont "training here."
para "He is much like"
line "CLAIR when she was"
para "younger. It is a"
line "little worrisome…"
done
2015-07-10 01:45:35 -07:00
UnknownText_0x18d7f6:
text "Hah? I didn't"
line "quite catch that…"
done
2015-07-10 01:45:35 -07:00
UnknownText_0x18d816:
text "What was it you"
line "said?"
done
2015-07-10 01:45:35 -07:00
UnknownText_0x18d82d:
text "Oh, I understand…"
done
2015-07-10 01:45:35 -07:00
UnknownText_0x18d840:
text "It's been quite"
line "some time since a"
para "trainer has gained"
line "our MASTER's rare"
cont "approval."
para "In fact, not since"
line "Master LANCE."
done
2015-07-10 01:45:35 -07:00
UnknownText_0x18d8b1:
text "You know young"
line "Master LANCE?"
para "He looks so much"
line "like our MASTER"
cont "did in his youth."
para "It's in their"
line "blood."
done
2015-07-10 01:45:35 -07:00
UnknownText_0x18d916:
text "So how did it go?"
para "I guess there's no"
line "point in asking."
para "You did fail?"
para $56, $56, $56, $56, $56, $56
para "…What? You passed?"
done
2015-07-10 01:45:35 -07:00
UnknownText_0x18d974:
text "That can't be!"
done
2015-07-10 01:45:35 -07:00
UnknownText_0x18d983:
text "You're lying!"
para "Even I haven't"
line "been approved!"
done
2015-07-10 01:45:35 -07:00
UnknownText_0x18d9ae:
text "I-I understand…"
done
2015-07-10 01:45:35 -07:00
UnknownText_0x18d9bf:
text "Here, this is the"
line "RISINGBADGE…"
para "Hurry up! Take it!"
done
2015-07-10 01:45:35 -07:00
UnknownText_0x18d9f2:
text "<PLAYER> received"
line "RISINGBADGE."
done
2015-07-10 01:45:35 -07:00
UnknownText_0x18da0b:
text "RISINGBADGE will"
line "enable your"
para "#MON to use the"
line "move for climbing"
cont "waterfalls."
para "Also, all #MON"
line "will recognize you"
para "as a trainer and"
line "obey your every"
para "command without"
line "question."
done
2015-07-10 01:45:35 -07:00
UnknownText_0x18dab4:
text $56, $56, $56, $56, $56, $56
done
2015-07-10 01:45:35 -07:00
DragonShrine_MapEventHeader:
; filler
db 0, 0
.Warps:
db 2
warp_def $9, $4, 2, DRAGONS_DEN_B1F
warp_def $9, $5, 2, DRAGONS_DEN_B1F
.XYTriggers:
db 0
.Signposts:
db 0
.PersonEvents:
db 4
person_event SPRITE_ELDER, 1, 5, SPRITEMOVEDATA_STANDING_DOWN, 0, 0, -1, -1, 0, PERSONTYPE_SCRIPT, 0, ElderScript_0x18d1a5, EVENT_GAVE_KURT_APRICORNS
person_event SPRITE_ELDER, 4, 2, SPRITEMOVEDATA_STANDING_RIGHT, 0, 0, -1, -1, 0, PERSONTYPE_SCRIPT, 0, ElderScript_0x18d205, EVENT_GAVE_KURT_APRICORNS
person_event SPRITE_ELDER, 4, 7, SPRITEMOVEDATA_STANDING_LEFT, 0, 0, -1, -1, 0, PERSONTYPE_SCRIPT, 0, ElderScript_0x18d20d, EVENT_GAVE_KURT_APRICORNS
person_event SPRITE_CLAIR, 8, 4, SPRITEMOVEDATA_STANDING_UP, 0, 0, -1, -1, (1 << 3) | PAL_OW_BLUE, PERSONTYPE_SCRIPT, 0, ObjectEvent, EVENT_DRAGON_SHRINE_CLAIR