pokecrystal-board/maps/DragonsDenB1F.asm
2015-07-13 00:29:20 -04:00

498 lines
8.7 KiB
NASM

DragonsDenB1F_MapScriptHeader:
; trigger count
db 2
; triggers
dw UnknownScript_0x18c89d, $0000
dw UnknownScript_0x18c89e, $0000
; callback count
db 1
; callbacks
dbw 5, UnknownScript_0x18c89f
UnknownScript_0x18c89d:
end
UnknownScript_0x18c89e:
end
UnknownScript_0x18c89f:
checkevent EVENT_BEAT_RIVAL_IN_MT_MOON
iftrue UnknownScript_0x18c8a8
disappear $4
return
UnknownScript_0x18c8a8:
checkcode VAR_WEEKDAY
if_equal TUESDAY, UnknownScript_0x18c8b5
if_equal THURSDAY, UnknownScript_0x18c8b5
disappear $4
return
UnknownScript_0x18c8b5:
appear $4
return
UnknownScript_0x18c8b8:
appear $3
loadfont
writetext UnknownText_0x18c9b8
pause 30
loadmovesprites
showemote $0, $0, 15
spriteface $0, LEFT
playmusic MUSIC_CLAIR
applymovement $3, MovementData_0x18c9ae
loadfont
writetext UnknownText_0x18c9bf
keeptextopen
giveitem TM_DRAGONBREATH, $1
iffalse UnknownScript_0x18c8f4
itemtotext TM_DRAGONBREATH, $0
writetext UnknownText_0x18c9fb
playsound SFX_ITEM
waitbutton
itemnotify
setevent EVENT_GOT_TM24_DRAGONBREATH
writetext UnknownText_0x18ca0d
keeptextopen
writetext UnknownText_0x18caf1
closetext
loadmovesprites
jump UnknownScript_0x18c8f9
UnknownScript_0x18c8f4:
writetext UnknownText_0x18ca8b
closetext
loadmovesprites
UnknownScript_0x18c8f9:
applymovement $3, MovementData_0x18c9b3
special Functionc48f
pause 30
special RestartMapMusic
disappear $3
dotrigger $0
end
TrainerCooltrainermDarin:
; bit/flag number
dw EVENT_BEAT_COOLTRAINERM_DARIN
; trainer group && trainer id
db COOLTRAINERM, DARIN
; text when seen
dw CooltrainermDarinSeenText
; text when trainer beaten
dw CooltrainermDarinBeatenText
; script when lost
dw $0000
; script when talk again
dw CooltrainermDarinScript
CooltrainermDarinScript:
talkaftercancel
loadfont
writetext UnknownText_0x18cd82
closetext
loadmovesprites
end
TrainerCooltrainerfCara:
; bit/flag number
dw EVENT_BEAT_COOLTRAINERF_CARA
; trainer group && trainer id
db COOLTRAINERF, CARA
; text when seen
dw CooltrainerfCaraSeenText
; text when trainer beaten
dw CooltrainerfCaraBeatenText
; script when lost
dw $0000
; script when talk again
dw CooltrainerfCaraScript
CooltrainerfCaraScript:
talkaftercancel
loadfont
writetext UnknownText_0x18ce11
closetext
loadmovesprites
end
TrainerTwinsLeaandpia1:
; bit/flag number
dw EVENT_BEAT_TWINS_LEA_AND_PIA
; trainer group && trainer id
db TWINS, LEAANDPIA1
; text when seen
dw TwinsLeaandpia1SeenText
; text when trainer beaten
dw TwinsLeaandpia1BeatenText
; script when lost
dw $0000
; script when talk again
dw TwinsLeaandpia1Script
TwinsLeaandpia1Script:
talkaftercancel
loadfont
writetext UnknownText_0x18ced3
closetext
loadmovesprites
end
TrainerTwinsLeaandpia2:
; bit/flag number
dw EVENT_BEAT_TWINS_LEA_AND_PIA
; trainer group && trainer id
db TWINS, LEAANDPIA1
; text when seen
dw TwinsLeaandpia2SeenText
; text when trainer beaten
dw TwinsLeaandpia2BeatenText
; script when lost
dw $0000
; script when talk again
dw TwinsLeaandpia2Script
TwinsLeaandpia2Script:
talkaftercancel
loadfont
writetext UnknownText_0x18cf0f
closetext
loadmovesprites
end
PokeBallScript_0x18c95a:
giveitem DRAGON_FANG, $1
iffalse UnknownScript_0x18c970
disappear $2
loadfont
itemtotext DRAGON_FANG, $0
writetext UnknownText_0x18cf41
playsound SFX_ITEM
waitbutton
itemnotify
loadmovesprites
end
UnknownScript_0x18c970:
loadfont
itemtotext DRAGON_FANG, $0
writetext UnknownText_0x18cf41
keeptextopen
writetext UnknownText_0x18cf51
closetext
loadmovesprites
end
SilverScript_0x18c97e:
playmusic MUSIC_RIVAL_ENCOUNTER
faceplayer
loadfont
checkevent EVENT_000
iftrue UnknownScript_0x18c995
writetext UnknownText_0x18cc83
closetext
loadmovesprites
setevent EVENT_000
special RestartMapMusic
end
UnknownScript_0x18c995:
writetext UnknownText_0x18cd2d
closetext
loadmovesprites
special RestartMapMusic
end
MapDragonsDenB1FSignpost0Script:
jumptext UnknownText_0x18cc2e
ItemFragment_0x18c9a1:
db CALCIUM, 1
ItemFragment_0x18c9a3:
db MAX_ELIXER, 1
MapDragonsDenB1FSignpostItem1:
dw $00a0
db REVIVE
MapDragonsDenB1FSignpostItem2:
dw $00a1
db MAX_POTION
MapDragonsDenB1FSignpostItem3:
dw $00a2
db MAX_ELIXER
MovementData_0x18c9ae:
slow_step_right
slow_step_right
slow_step_right
slow_step_right
step_end
MovementData_0x18c9b3:
slow_step_left
slow_step_left
slow_step_left
slow_step_left
step_end
UnknownText_0x18c9b8:
text "Wait!"
done
UnknownText_0x18c9bf:
text "CLAIR: I'm sorry"
line "about this."
para "Here, take this as"
line "my apology."
done
UnknownText_0x18c9fb:
text "<PLAYER> received"
line "TM24."
done
UnknownText_0x18ca0d:
text "That contains"
line "DRAGONBREATH."
para "No, it doesn't"
line "have anything to"
cont "do with my breath."
para "If you don't want"
line "it, you don't have"
cont "to take it."
done
UnknownText_0x18ca8b:
text "Oh? You don't have"
line "any room for this."
para "I'm going back to"
line "the GYM, so make"
para "room, then come"
line "see me there."
done
UnknownText_0x18caf1:
text "CLAIR: What's the"
line "matter? Aren't you"
para "going on to the"
line "#MON LEAGUE?"
para "Do you know how to"
line "get there?"
para "From here, go to"
line "NEW BARK TOWN."
para "Then SURF east to"
line "#MON LEAGUE."
para "The route there is"
line "very tough."
para "Don't you dare"
line "lose at the #-"
cont "MON LEAGUE!"
para "If you do, I'll"
line "feel even worse"
para "about having lost"
line "to you!"
para "Give it everything"
line "you've got."
done
UnknownText_0x18cc2e:
text "DRAGON SHRINE"
para "A shrine honoring"
line "the dragon #MON"
para "said to have lived"
line "in DRAGON'S DEN."
done
UnknownText_0x18cc83:
text "…"
line "What? <PLAYER>?"
para "…No, I won't"
line "battle you now…"
para "My #MON aren't"
line "ready to beat you."
para "I can't push them"
line "too hard now."
para "I have to be dis-"
line "ciplined to become"
para "the greatest #-"
line "MON trainer…"
done
UnknownText_0x18cd2d:
text "…"
para "Whew…"
para "Learn to stay out"
line "of my way…"
done
CooltrainermDarinSeenText:
text "You! How dare you"
line "enter uninvited!"
done
CooltrainermDarinBeatenText:
text "S-strong!"
done
UnknownText_0x18cd82:
text "The SHRINE ahead"
line "is home to the"
para "MASTER of our"
line "dragon-user clan."
para "You're not allowed"
line "to just go in!"
done
CooltrainerfCaraSeenText:
text "You shouldn't be"
line "in here!"
done
CooltrainerfCaraBeatenText:
text "Oh yikes, I lost!"
done
UnknownText_0x18ce11:
text "Soon I'm going to"
line "get permission"
para "from our MASTER to"
line "use dragons."
para "When I do, I'm"
line "going to become an"
para "admirable dragon"
line "trainer and gain"
para "our MASTER's"
line "approval."
done
TwinsLeaandpia1SeenText:
text "It's a stranger we"
line "don't know."
done
TwinsLeaandpia1BeatenText:
text "Ouchies."
done
UnknownText_0x18ced3:
text "It was like having"
line "to battle LANCE."
done
TwinsLeaandpia2SeenText:
text "Who are you?"
done
TwinsLeaandpia2BeatenText:
text "Meanie."
done
UnknownText_0x18cf0f:
text "We'll tell on you."
para "MASTER will be"
line "angry with you."
done
UnknownText_0x18cf41:
text "<PLAYER> found"
line "@"
text_from_ram StringBuffer3
text "!"
done
UnknownText_0x18cf51:
text "But <PLAYER> can't"
line "carry any more"
cont "items."
done
DragonsDenB1F_MapEventHeader:
; filler
db 0, 0
; warps
db 2
warp_def $3, $14, 3, GROUP_DRAGONS_DEN_1F, MAP_DRAGONS_DEN_1F
warp_def $1d, $13, 1, GROUP_DRAGON_SHRINE, MAP_DRAGON_SHRINE
; xy triggers
db 1
xy_trigger 1, $1e, $13, $0, UnknownScript_0x18c8b8, $0, $0
; signposts
db 4
signpost 24, 18, $0, MapDragonsDenB1FSignpost0Script
signpost 29, 33, $7, MapDragonsDenB1FSignpostItem1
signpost 17, 21, $7, MapDragonsDenB1FSignpostItem2
signpost 15, 31, $7, MapDragonsDenB1FSignpostItem3
; people-events
db 9
person_event SPRITE_POKE_BALL, 20, 39, $1, $0, 255, 255, $0, 0, PokeBallScript_0x18c95a, EVENT_6A8
person_event SPRITE_CLAIR, 34, 18, $7, $0, 255, 255, $90, 0, ObjectEvent, EVENT_6D8
person_event SPRITE_SILVER, 27, 24, $2, $22, 255, 255, $0, 0, SilverScript_0x18c97e, EVENT_6C6
person_event SPRITE_COOLTRAINER_M, 12, 24, $7, $0, 255, 255, $82, 4, TrainerCooltrainermDarin, -1
person_event SPRITE_COOLTRAINER_F, 12, 12, $6, $0, 255, 255, $82, 3, TrainerCooltrainerfCara, -1
person_event SPRITE_TWIN, 21, 8, $9, $0, 255, 255, $82, 1, TrainerTwinsLeaandpia1, -1
person_event SPRITE_TWIN, 22, 8, $9, $0, 255, 255, $82, 1, TrainerTwinsLeaandpia2, -1
person_event SPRITE_POKE_BALL, 8, 34, $1, $0, 255, 255, $1, 0, ItemFragment_0x18c9a1, EVENT_7BF
person_event SPRITE_POKE_BALL, 24, 9, $1, $0, 255, 255, $1, 0, ItemFragment_0x18c9a3, EVENT_7C0