mirror of
https://gitlab.com/xCrystal/pokecrystal-board.git
synced 2024-09-09 09:51:34 -07:00
432df825d4
Updated macros that rely on the GROUP_, MAP_ constants to use the map macro Added GROUP_NONE and MAP_NONE for the sake of compatibility with this new scheme Added new macro elevfloor to simplify the definition of elevators under this new scheme
524 lines
10 KiB
NASM
524 lines
10 KiB
NASM
LakeofRage_MapScriptHeader:
|
|
.MapTriggers:
|
|
db 2
|
|
|
|
; triggers
|
|
dw .Trigger1, $0000
|
|
dw .Trigger2, $0000
|
|
|
|
.MapCallbacks:
|
|
db 2
|
|
|
|
; callbacks
|
|
|
|
dbw 5, .FlyPoint
|
|
dbw 2, .Wesley
|
|
|
|
.Trigger1
|
|
end
|
|
|
|
.Trigger2
|
|
end
|
|
|
|
.FlyPoint
|
|
setflag ENGINE_FLYPOINT_LAKE_OF_RAGE
|
|
return
|
|
|
|
.Wesley
|
|
checkcode VAR_WEEKDAY
|
|
if_equal WEDNESDAY, .WesleyAppears
|
|
disappear $b
|
|
return
|
|
|
|
.WesleyAppears
|
|
appear $b
|
|
return
|
|
|
|
LanceScript_0x70022:
|
|
checkevent EVENT_REFUSED_TO_HELP_LANCE_AT_LAKE_OF_RAGE
|
|
iftrue UnknownScript_0x70057
|
|
loadfont
|
|
writetext UnknownText_0x70157
|
|
keeptextopen
|
|
faceplayer
|
|
writetext UnknownText_0x701b4
|
|
yesorno
|
|
iffalse UnknownScript_0x7004e
|
|
UnknownScript_0x70035:
|
|
writetext UnknownText_0x702c6
|
|
closetext
|
|
loadmovesprites
|
|
playsound SFX_WARP_TO
|
|
applymovement $2, MovementData_0x70155
|
|
disappear $2
|
|
clearevent EVENT_MAHOGANY_MART_LANCE_AND_DRAGONITE
|
|
setevent EVENT_DECIDED_TO_HELP_LANCE
|
|
domaptrigger MAHOGANY_MART_1F, $1
|
|
end
|
|
|
|
UnknownScript_0x7004e:
|
|
writetext UnknownText_0x70371
|
|
closetext
|
|
loadmovesprites
|
|
setevent EVENT_REFUSED_TO_HELP_LANCE_AT_LAKE_OF_RAGE
|
|
end
|
|
|
|
UnknownScript_0x70057:
|
|
faceplayer
|
|
loadfont
|
|
writetext UnknownText_0x703a5
|
|
yesorno
|
|
iffalse UnknownScript_0x7004e
|
|
jump UnknownScript_0x70035
|
|
|
|
GyaradosScript_0x70063:
|
|
loadfont
|
|
writetext UnknownText_0x703cb
|
|
pause 15
|
|
cry GYARADOS
|
|
loadmovesprites
|
|
loadpokedata GYARADOS, 30
|
|
writecode VAR_BATTLETYPE, BATTLETYPE_SHINY
|
|
startbattle
|
|
if_equal $1, UnknownScript_0x7007a
|
|
disappear $a
|
|
UnknownScript_0x7007a:
|
|
returnafterbattle
|
|
loadfont
|
|
giveitem RED_SCALE, $1
|
|
waitbutton
|
|
writetext UnknownText_0x703df
|
|
playsound SFX_ITEM
|
|
waitbutton
|
|
itemnotify
|
|
loadmovesprites
|
|
dotrigger $0
|
|
appear $2
|
|
end
|
|
|
|
GrampsScript_0x7008e:
|
|
faceplayer
|
|
loadfont
|
|
checkevent EVENT_CLEARED_ROCKET_HIDEOUT
|
|
iftrue UnknownScript_0x7009c
|
|
writetext UnknownText_0x703f8
|
|
closetext
|
|
loadmovesprites
|
|
end
|
|
|
|
UnknownScript_0x7009c:
|
|
writetext UnknownText_0x70421
|
|
closetext
|
|
loadmovesprites
|
|
end
|
|
|
|
SuperNerdScript_0x700a2:
|
|
jumptextfaceplayer UnknownText_0x70444
|
|
|
|
CooltrainerFScript_0x700a5:
|
|
jumptextfaceplayer UnknownText_0x704bb
|
|
|
|
MapLakeofRageSignpost0Script:
|
|
jumptext UnknownText_0x708d7
|
|
|
|
MapLakeofRageSignpost1Script:
|
|
loadfont
|
|
writetext UnknownText_0x70903
|
|
checkevent EVENT_CLEARED_ROCKET_HIDEOUT
|
|
iftrue UnknownScript_0x700b8
|
|
closetext
|
|
loadmovesprites
|
|
end
|
|
|
|
UnknownScript_0x700b8:
|
|
keeptextopen
|
|
special Special_MagikarpHouseSign
|
|
loadmovesprites
|
|
end
|
|
|
|
TrainerFisherAndre:
|
|
trainer EVENT_BEAT_FISHER_ANDRE, FISHER, ANDRE, FisherAndreSeenText, FisherAndreBeatenText, $0000, FisherAndreScript
|
|
|
|
FisherAndreScript:
|
|
talkaftercancel
|
|
loadfont
|
|
writetext UnknownText_0x7058f
|
|
closetext
|
|
loadmovesprites
|
|
end
|
|
|
|
TrainerFisherRaymond:
|
|
trainer EVENT_BEAT_FISHER_RAYMOND, FISHER, RAYMOND, FisherRaymondSeenText, FisherRaymondBeatenText, $0000, FisherRaymondScript
|
|
|
|
FisherRaymondScript:
|
|
talkaftercancel
|
|
loadfont
|
|
writetext UnknownText_0x70611
|
|
closetext
|
|
loadmovesprites
|
|
end
|
|
|
|
TrainerCooltrainermAaron:
|
|
trainer EVENT_BEAT_COOLTRAINERM_AARON, COOLTRAINERM, AARON, CooltrainermAaronSeenText, CooltrainermAaronBeatenText, $0000, CooltrainermAaronScript
|
|
|
|
CooltrainermAaronScript:
|
|
talkaftercancel
|
|
loadfont
|
|
writetext UnknownText_0x7069c
|
|
closetext
|
|
loadmovesprites
|
|
end
|
|
|
|
TrainerCooltrainerfLois:
|
|
trainer EVENT_BEAT_COOLTRAINERF_LOIS, COOLTRAINERF, LOIS, CooltrainerfLoisSeenText, CooltrainerfLoisBeatenText, $0000, CooltrainerfLoisScript
|
|
|
|
CooltrainerfLoisScript:
|
|
talkaftercancel
|
|
loadfont
|
|
writetext UnknownText_0x70752
|
|
closetext
|
|
loadmovesprites
|
|
end
|
|
|
|
WesleyScript:
|
|
faceplayer
|
|
loadfont
|
|
checkevent EVENT_GOT_BLACKBELT_FROM_WESLEY
|
|
iftrue WesleyWednesdayScript
|
|
checkcode VAR_WEEKDAY
|
|
if_not_equal WEDNESDAY, WesleyNotWednesdayScript
|
|
checkevent EVENT_MET_WESLEY_OF_WEDNESDAY
|
|
iftrue .MetWesley
|
|
writetext MeetWesleyText
|
|
keeptextopen
|
|
setevent EVENT_MET_WESLEY_OF_WEDNESDAY
|
|
.MetWesley
|
|
writetext WesleyGivesGiftText
|
|
keeptextopen
|
|
verbosegiveitem BLACKBELT, 1
|
|
iffalse WesleyDoneScript
|
|
setevent EVENT_GOT_BLACKBELT_FROM_WESLEY
|
|
writetext WesleyGaveGiftText
|
|
closetext
|
|
loadmovesprites
|
|
end
|
|
|
|
WesleyWednesdayScript:
|
|
writetext WesleyWednesdayText
|
|
closetext
|
|
WesleyDoneScript:
|
|
loadmovesprites
|
|
end
|
|
|
|
WesleyNotWednesdayScript:
|
|
writetext WesleyNotWednesdayText
|
|
closetext
|
|
loadmovesprites
|
|
end
|
|
|
|
ItemFragment_0x70148:
|
|
db ELIXER, 1
|
|
|
|
ItemFragment_0x7014a:
|
|
db TM_DETECT, 1
|
|
|
|
MapLakeofRageSignpostItem2:
|
|
dwb EVENT_LAKE_OF_RAGE_HIDDEN_FULL_RESTORE, FULL_RESTORE
|
|
|
|
|
|
MapLakeofRageSignpostItem3:
|
|
dwb EVENT_LAKE_OF_RAGE_HIDDEN_RARE_CANDY, RARE_CANDY
|
|
|
|
|
|
MapLakeofRageSignpostItem4:
|
|
dwb EVENT_LAKE_OF_RAGE_HIDDEN_MAX_POTION, MAX_POTION
|
|
|
|
|
|
MovementData_0x70155:
|
|
teleport_from
|
|
step_end
|
|
|
|
UnknownText_0x70157:
|
|
text "This lake is full"
|
|
line "of GYARADOS but"
|
|
cont "nothing else…"
|
|
|
|
para "So the MAGIKARP"
|
|
line "are being forced"
|
|
cont "to evolve…"
|
|
done
|
|
|
|
UnknownText_0x701b4:
|
|
text "Did you come here"
|
|
line "because of the"
|
|
cont "rumors?"
|
|
|
|
para "You're <PLAYER>?"
|
|
line "I'm LANCE, a"
|
|
cont "trainer like you."
|
|
|
|
para "I heard some ru-"
|
|
line "mors, so I came to"
|
|
cont "investigate…"
|
|
|
|
para "I saw the way you"
|
|
line "battled earlier,"
|
|
cont "<PLAY_G>."
|
|
|
|
para "I can tell that"
|
|
line "you're a trainer"
|
|
|
|
para "with considerable"
|
|
line "skill."
|
|
|
|
para "If you don't mind,"
|
|
line "could you help me"
|
|
cont "investigate?"
|
|
done
|
|
|
|
UnknownText_0x702c6:
|
|
text "LANCE: Excellent!"
|
|
|
|
para "It seems that the"
|
|
line "LAKE's MAGIKARP"
|
|
|
|
para "are being forced"
|
|
line "to evolve."
|
|
|
|
para "A mysterious radio"
|
|
line "broadcast coming"
|
|
|
|
para "from MAHOGANY is"
|
|
line "the cause."
|
|
|
|
para "I'll be waiting"
|
|
line "for you, <PLAY_G>."
|
|
done
|
|
|
|
UnknownText_0x70371:
|
|
text "Oh… Well, if you"
|
|
line "change your mind,"
|
|
cont "please help me."
|
|
done
|
|
|
|
UnknownText_0x703a5:
|
|
text "LANCE: Hm? Are you"
|
|
line "going to help me?"
|
|
done
|
|
|
|
UnknownText_0x703cb:
|
|
text "GYARADOS: Gyashaa!"
|
|
done
|
|
|
|
UnknownText_0x703df:
|
|
text "<PLAYER> obtained a"
|
|
line "RED SCALE."
|
|
done
|
|
|
|
UnknownText_0x703f8:
|
|
text "The GYARADOS are"
|
|
line "angry!"
|
|
|
|
para "It's a bad omen!"
|
|
done
|
|
|
|
UnknownText_0x70421:
|
|
text "Hahah! The MAGI-"
|
|
line "KARP are biting!"
|
|
done
|
|
|
|
UnknownText_0x70444:
|
|
text "I heard this lake"
|
|
line "was made by ram-"
|
|
cont "paging GYARADOS."
|
|
|
|
para "I wonder if there"
|
|
line "is any connection"
|
|
|
|
para "to their mass out-"
|
|
line "break now?"
|
|
done
|
|
|
|
UnknownText_0x704bb:
|
|
text "Did my eyes de-"
|
|
line "ceive me? I saw a"
|
|
|
|
para "red GYARADOS in"
|
|
line "the LAKE…"
|
|
|
|
para "But I thought"
|
|
line "GYARADOS were"
|
|
cont "usually blue?"
|
|
done
|
|
|
|
FisherAndreSeenText:
|
|
text "Let me battle with"
|
|
line "the #MON I just"
|
|
cont "caught!"
|
|
done
|
|
|
|
FisherAndreBeatenText:
|
|
text "I might be an ex-"
|
|
line "pert angler, but"
|
|
|
|
para "I stink as a #-"
|
|
line "MON trainer…"
|
|
done
|
|
|
|
UnknownText_0x7058f:
|
|
text "I won't lose as an"
|
|
line "angler! I catch"
|
|
cont "#MON all day."
|
|
done
|
|
|
|
FisherRaymondSeenText:
|
|
text "No matter what I"
|
|
line "do, all I catch"
|
|
|
|
para "are the same #-"
|
|
line "MON…"
|
|
done
|
|
|
|
FisherRaymondBeatenText:
|
|
text "My line's all"
|
|
line "tangled up…"
|
|
done
|
|
|
|
UnknownText_0x70611:
|
|
text "Why can't I catch"
|
|
line "any good #MON?"
|
|
done
|
|
|
|
CooltrainermAaronSeenText:
|
|
text "If a trainer spots"
|
|
line "another trainer,"
|
|
|
|
para "he has to make a"
|
|
line "challenge."
|
|
|
|
para "That is our"
|
|
line "destiny."
|
|
done
|
|
|
|
CooltrainermAaronBeatenText:
|
|
text "Whew…"
|
|
line "Good battle."
|
|
done
|
|
|
|
UnknownText_0x7069c:
|
|
text "#MON and their"
|
|
line "trainer become"
|
|
|
|
para "powerful through"
|
|
line "constant battling."
|
|
done
|
|
|
|
CooltrainerfLoisSeenText:
|
|
text "What happened to"
|
|
line "the red GYARADOS?"
|
|
|
|
para "It's gone?"
|
|
|
|
para "Oh, darn. I came"
|
|
line "here for nothing?"
|
|
|
|
para "I know--let's"
|
|
line "battle!"
|
|
done
|
|
|
|
CooltrainerfLoisBeatenText:
|
|
text "Good going!"
|
|
done
|
|
|
|
UnknownText_0x70752:
|
|
text "Come to think of"
|
|
line "it, I've seen a"
|
|
cont "pink BUTTERFREE."
|
|
done
|
|
|
|
MeetWesleyText:
|
|
text "WESLEY: Well, how"
|
|
line "do you do?"
|
|
|
|
para "Seeing as how it's"
|
|
line "Wednesday today,"
|
|
|
|
para "I'm WESLEY of"
|
|
line "Wednesday."
|
|
done
|
|
|
|
WesleyGivesGiftText:
|
|
text "Pleased to meet"
|
|
line "you. Please take a"
|
|
cont "souvenir."
|
|
done
|
|
|
|
WesleyGaveGiftText:
|
|
text "WESLEY: BLACKBELT"
|
|
line "beefs up the power"
|
|
cont "of fighting moves."
|
|
done
|
|
|
|
WesleyWednesdayText:
|
|
text "WESLEY: Since you"
|
|
line "found me, you must"
|
|
|
|
para "have met my broth-"
|
|
line "ers and sisters."
|
|
|
|
para "Or did you just"
|
|
line "get lucky?"
|
|
done
|
|
|
|
WesleyNotWednesdayText:
|
|
text "WESLEY: Today's"
|
|
line "not Wednesday."
|
|
cont "That's too bad."
|
|
done
|
|
|
|
UnknownText_0x708d7:
|
|
text "LAKE OF RAGE,"
|
|
line "also known as"
|
|
cont "GYARADOS LAKE."
|
|
done
|
|
|
|
UnknownText_0x70903:
|
|
text "FISHING GURU'S"
|
|
line "HOUSE"
|
|
done
|
|
|
|
LakeofRage_MapEventHeader:
|
|
; filler
|
|
db 0, 0
|
|
|
|
.Warps:
|
|
db 2
|
|
warp_def $3, $7, 1, LAKE_OF_RAGE_HIDDEN_POWER_HOUSE
|
|
warp_def $1f, $1b, 1, LAKE_OF_RAGE_MAGIKARP_HOUSE
|
|
|
|
.XYTriggers:
|
|
db 0
|
|
|
|
.Signposts:
|
|
db 5
|
|
signpost 27, 21, SIGNPOST_READ, MapLakeofRageSignpost0Script
|
|
signpost 31, 25, SIGNPOST_READ, MapLakeofRageSignpost1Script
|
|
signpost 28, 11, SIGNPOST_ITEM, MapLakeofRageSignpostItem2
|
|
signpost 4, 4, SIGNPOST_ITEM, MapLakeofRageSignpostItem3
|
|
signpost 5, 35, SIGNPOST_ITEM, MapLakeofRageSignpostItem4
|
|
|
|
.PersonEvents:
|
|
db 12
|
|
person_event SPRITE_LANCE, 32, 25, OW_UP | $3, $0, -1, -1, $0, 0, LanceScript_0x70022, EVENT_LAKE_OF_RAGE_LANCE
|
|
person_event SPRITE_GRAMPS, 30, 24, OW_UP | $3, $0, -1, -1, $0, 0, GrampsScript_0x7008e, -1
|
|
person_event SPRITE_SUPER_NERD, 17, 40, OW_LEFT | $0, $0, -1, -1, $0, 0, SuperNerdScript_0x700a2, -1
|
|
person_event SPRITE_COOLTRAINER_F, 33, 29, OW_UP | $1, $1, -1, -1, $0, 0, CooltrainerFScript_0x700a5, -1
|
|
person_event SPRITE_FISHER, 27, 34, OW_LEFT | $0, $0, -1, -1, (PAL_OW_BLUE << 4) | $82, 1, TrainerFisherAndre, EVENT_LAKE_OF_RAGE_CIVILIANS
|
|
person_event SPRITE_FISHER, 30, 28, OW_UP | $3, $0, -1, -1, (PAL_OW_BLUE << 4) | $82, 1, TrainerFisherRaymond, EVENT_LAKE_OF_RAGE_CIVILIANS
|
|
person_event SPRITE_COOLTRAINER_M, 19, 8, OW_LEFT | $1, $0, -1, -1, (PAL_OW_RED << 4) | $82, 1, TrainerCooltrainermAaron, EVENT_LAKE_OF_RAGE_CIVILIANS
|
|
person_event SPRITE_COOLTRAINER_F, 11, 40, OW_LEFT | $0, $0, -1, -1, (PAL_OW_RED << 4) | $82, 0, TrainerCooltrainerfLois, EVENT_LAKE_OF_RAGE_CIVILIANS
|
|
person_event SPRITE_GYARADOS, 26, 22, OW_UP | $12, $0, -1, -1, (PAL_OW_RED << 4) | $80, 0, GyaradosScript_0x70063, EVENT_LAKE_OF_RAGE_RED_GYARADOS
|
|
person_event SPRITE_SUPER_NERD, 8, 8, OW_UP | $2, $0, -1, -1, $0, 0, WesleyScript, EVENT_LAKE_OF_RAGE_WESLEY_OF_WEDNESDAY
|
|
person_event SPRITE_POKE_BALL, 14, 11, OW_DOWN | $1, $0, -1, -1, $1, 0, ItemFragment_0x70148, EVENT_LAKE_OF_RAGE_ELIXER
|
|
person_event SPRITE_POKE_BALL, 6, 39, OW_DOWN | $1, $0, -1, -1, $1, 0, ItemFragment_0x7014a, EVENT_LAKE_OF_RAGE_TM_DETECT
|