mirror of https://github.com/pret/pokecrystal.git
533 lines
11 KiB
NASM
533 lines
11 KiB
NASM
const_value set 2
|
|
const LAKEOFRAGE_LANCE
|
|
const LAKEOFRAGE_GRAMPS
|
|
const LAKEOFRAGE_SUPER_NERD1
|
|
const LAKEOFRAGE_COOLTRAINER_F1
|
|
const LAKEOFRAGE_FISHER1
|
|
const LAKEOFRAGE_FISHER2
|
|
const LAKEOFRAGE_COOLTRAINER_M
|
|
const LAKEOFRAGE_COOLTRAINER_F2
|
|
const LAKEOFRAGE_GYARADOS
|
|
const LAKEOFRAGE_WESLEY
|
|
const LAKEOFRAGE_POKE_BALL1
|
|
const LAKEOFRAGE_POKE_BALL2
|
|
|
|
LakeOfRage_MapScriptHeader:
|
|
.MapTriggers:
|
|
db 2
|
|
maptrigger .DummyTrigger0
|
|
maptrigger .DummyTrigger1
|
|
|
|
.MapCallbacks:
|
|
db 2
|
|
dbw MAPCALLBACK_NEWMAP, .FlyPoint
|
|
dbw MAPCALLBACK_OBJECTS, .Wesley
|
|
|
|
.DummyTrigger0:
|
|
end
|
|
|
|
.DummyTrigger1:
|
|
end
|
|
|
|
.FlyPoint:
|
|
setflag ENGINE_FLYPOINT_LAKE_OF_RAGE
|
|
return
|
|
|
|
.Wesley:
|
|
checkcode VAR_WEEKDAY
|
|
if_equal WEDNESDAY, .WesleyAppears
|
|
disappear LAKEOFRAGE_WESLEY
|
|
return
|
|
|
|
.WesleyAppears:
|
|
appear LAKEOFRAGE_WESLEY
|
|
return
|
|
|
|
LanceScript_0x70022:
|
|
checkevent EVENT_REFUSED_TO_HELP_LANCE_AT_LAKE_OF_RAGE
|
|
iftrue UnknownScript_0x70057
|
|
opentext
|
|
writetext UnknownText_0x70157
|
|
buttonsound
|
|
faceplayer
|
|
writetext UnknownText_0x701b4
|
|
yesorno
|
|
iffalse UnknownScript_0x7004e
|
|
UnknownScript_0x70035:
|
|
writetext UnknownText_0x702c6
|
|
waitbutton
|
|
closetext
|
|
playsound SFX_WARP_TO
|
|
applymovement LAKEOFRAGE_LANCE, MovementData_0x70155
|
|
disappear LAKEOFRAGE_LANCE
|
|
clearevent EVENT_MAHOGANY_MART_LANCE_AND_DRAGONITE
|
|
setevent EVENT_DECIDED_TO_HELP_LANCE
|
|
domaptrigger MAHOGANY_MART_1F, $1
|
|
end
|
|
|
|
UnknownScript_0x7004e:
|
|
writetext UnknownText_0x70371
|
|
waitbutton
|
|
closetext
|
|
setevent EVENT_REFUSED_TO_HELP_LANCE_AT_LAKE_OF_RAGE
|
|
end
|
|
|
|
UnknownScript_0x70057:
|
|
faceplayer
|
|
opentext
|
|
writetext UnknownText_0x703a5
|
|
yesorno
|
|
iffalse UnknownScript_0x7004e
|
|
jump UnknownScript_0x70035
|
|
|
|
GyaradosScript_0x70063:
|
|
opentext
|
|
writetext UnknownText_0x703cb
|
|
pause 15
|
|
cry GYARADOS
|
|
closetext
|
|
loadwildmon GYARADOS, 30
|
|
writecode VAR_BATTLETYPE, BATTLETYPE_SHINY
|
|
startbattle
|
|
if_equal $1, UnknownScript_0x7007a
|
|
disappear LAKEOFRAGE_GYARADOS
|
|
UnknownScript_0x7007a:
|
|
reloadmapafterbattle
|
|
opentext
|
|
giveitem RED_SCALE
|
|
waitsfx
|
|
writetext UnknownText_0x703df
|
|
playsound SFX_ITEM
|
|
waitsfx
|
|
itemnotify
|
|
closetext
|
|
dotrigger $0
|
|
appear LAKEOFRAGE_LANCE
|
|
end
|
|
|
|
GrampsScript_0x7008e:
|
|
faceplayer
|
|
opentext
|
|
checkevent EVENT_CLEARED_ROCKET_HIDEOUT
|
|
iftrue UnknownScript_0x7009c
|
|
writetext UnknownText_0x703f8
|
|
waitbutton
|
|
closetext
|
|
end
|
|
|
|
UnknownScript_0x7009c:
|
|
writetext UnknownText_0x70421
|
|
waitbutton
|
|
closetext
|
|
end
|
|
|
|
SuperNerdScript_0x700a2:
|
|
jumptextfaceplayer UnknownText_0x70444
|
|
|
|
CooltrainerFScript_0x700a5:
|
|
jumptextfaceplayer UnknownText_0x704bb
|
|
|
|
MapLakeOfRageSignpost0Script:
|
|
jumptext UnknownText_0x708d7
|
|
|
|
MapLakeOfRageSignpost1Script:
|
|
opentext
|
|
writetext UnknownText_0x70903
|
|
checkevent EVENT_CLEARED_ROCKET_HIDEOUT
|
|
iftrue UnknownScript_0x700b8
|
|
waitbutton
|
|
closetext
|
|
end
|
|
|
|
UnknownScript_0x700b8:
|
|
buttonsound
|
|
special Special_MagikarpHouseSign
|
|
closetext
|
|
end
|
|
|
|
TrainerFisherAndre:
|
|
trainer EVENT_BEAT_FISHER_ANDRE, FISHER, ANDRE, FisherAndreSeenText, FisherAndreBeatenText, 0, FisherAndreScript
|
|
|
|
FisherAndreScript:
|
|
end_if_just_battled
|
|
opentext
|
|
writetext FisherAndreAfterBattleText
|
|
waitbutton
|
|
closetext
|
|
end
|
|
|
|
TrainerFisherRaymond:
|
|
trainer EVENT_BEAT_FISHER_RAYMOND, FISHER, RAYMOND, FisherRaymondSeenText, FisherRaymondBeatenText, 0, FisherRaymondScript
|
|
|
|
FisherRaymondScript:
|
|
end_if_just_battled
|
|
opentext
|
|
writetext FisherRaymondAfterBattleText
|
|
waitbutton
|
|
closetext
|
|
end
|
|
|
|
TrainerCooltrainermAaron:
|
|
trainer EVENT_BEAT_COOLTRAINERM_AARON, COOLTRAINERM, AARON, CooltrainermAaronSeenText, CooltrainermAaronBeatenText, 0, CooltrainermAaronScript
|
|
|
|
CooltrainermAaronScript:
|
|
end_if_just_battled
|
|
opentext
|
|
writetext CooltrainermAaronAfterBattleText
|
|
waitbutton
|
|
closetext
|
|
end
|
|
|
|
TrainerCooltrainerfLois:
|
|
trainer EVENT_BEAT_COOLTRAINERF_LOIS, COOLTRAINERF, LOIS, CooltrainerfLoisSeenText, CooltrainerfLoisBeatenText, 0, CooltrainerfLoisScript
|
|
|
|
CooltrainerfLoisScript:
|
|
end_if_just_battled
|
|
opentext
|
|
writetext CooltrainerfLoisAfterBattleText
|
|
waitbutton
|
|
closetext
|
|
end
|
|
|
|
WesleyScript:
|
|
faceplayer
|
|
opentext
|
|
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
|
|
buttonsound
|
|
setevent EVENT_MET_WESLEY_OF_WEDNESDAY
|
|
.MetWesley:
|
|
writetext WesleyGivesGiftText
|
|
buttonsound
|
|
verbosegiveitem BLACKBELT
|
|
iffalse WesleyDoneScript
|
|
setevent EVENT_GOT_BLACKBELT_FROM_WESLEY
|
|
writetext WesleyGaveGiftText
|
|
waitbutton
|
|
closetext
|
|
end
|
|
|
|
WesleyWednesdayScript:
|
|
writetext WesleyWednesdayText
|
|
waitbutton
|
|
WesleyDoneScript:
|
|
closetext
|
|
end
|
|
|
|
WesleyNotWednesdayScript:
|
|
writetext WesleyNotWednesdayText
|
|
waitbutton
|
|
closetext
|
|
end
|
|
|
|
LakeOfRageElixer:
|
|
itemball ELIXER
|
|
|
|
LakeOfRageTMDetect:
|
|
itemball TM_DETECT
|
|
|
|
LakeOfRageHiddenFullRestore:
|
|
dwb EVENT_LAKE_OF_RAGE_HIDDEN_FULL_RESTORE, FULL_RESTORE
|
|
|
|
|
|
LakeOfRageHiddenRareCandy:
|
|
dwb EVENT_LAKE_OF_RAGE_HIDDEN_RARE_CANDY, RARE_CANDY
|
|
|
|
|
|
LakeOfRageHiddenMaxPotion:
|
|
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
|
|
|
|
FisherAndreAfterBattleText:
|
|
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
|
|
|
|
FisherRaymondAfterBattleText:
|
|
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
|
|
|
|
CooltrainermAaronAfterBattleText:
|
|
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
|
|
|
|
CooltrainerfLoisAfterBattleText:
|
|
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, LakeOfRageHiddenFullRestore
|
|
signpost 4, 4, SIGNPOST_ITEM, LakeOfRageHiddenRareCandy
|
|
signpost 5, 35, SIGNPOST_ITEM, LakeOfRageHiddenMaxPotion
|
|
|
|
.PersonEvents:
|
|
db 12
|
|
person_event SPRITE_LANCE, 28, 21, SPRITEMOVEDATA_STANDING_UP, 0, 0, -1, -1, 0, PERSONTYPE_SCRIPT, 0, LanceScript_0x70022, EVENT_LAKE_OF_RAGE_LANCE
|
|
person_event SPRITE_GRAMPS, 26, 20, SPRITEMOVEDATA_STANDING_UP, 0, 0, -1, -1, 0, PERSONTYPE_SCRIPT, 0, GrampsScript_0x7008e, -1
|
|
person_event SPRITE_SUPER_NERD, 13, 36, SPRITEMOVEDATA_STANDING_LEFT, 0, 0, -1, -1, 0, PERSONTYPE_SCRIPT, 0, SuperNerdScript_0x700a2, -1
|
|
person_event SPRITE_COOLTRAINER_F, 29, 25, SPRITEMOVEDATA_WALK_LEFT_RIGHT, 0, 1, -1, -1, 0, PERSONTYPE_SCRIPT, 0, CooltrainerFScript_0x700a5, -1
|
|
person_event SPRITE_FISHER, 23, 30, SPRITEMOVEDATA_STANDING_LEFT, 0, 0, -1, -1, PAL_NPC_BLUE, PERSONTYPE_TRAINER, 1, TrainerFisherAndre, EVENT_LAKE_OF_RAGE_CIVILIANS
|
|
person_event SPRITE_FISHER, 26, 24, SPRITEMOVEDATA_STANDING_UP, 0, 0, -1, -1, PAL_NPC_BLUE, PERSONTYPE_TRAINER, 1, TrainerFisherRaymond, EVENT_LAKE_OF_RAGE_CIVILIANS
|
|
person_event SPRITE_COOLTRAINER_M, 15, 4, SPRITEMOVEDATA_STANDING_RIGHT, 0, 0, -1, -1, PAL_NPC_RED, PERSONTYPE_TRAINER, 1, TrainerCooltrainermAaron, EVENT_LAKE_OF_RAGE_CIVILIANS
|
|
person_event SPRITE_COOLTRAINER_F, 7, 36, SPRITEMOVEDATA_STANDING_LEFT, 0, 0, -1, -1, PAL_NPC_RED, PERSONTYPE_TRAINER, 0, TrainerCooltrainerfLois, EVENT_LAKE_OF_RAGE_CIVILIANS
|
|
person_event SPRITE_GYARADOS, 22, 18, SPRITEMOVEDATA_POKEMON, 0, 0, -1, -1, PAL_NPC_RED, PERSONTYPE_SCRIPT, 0, GyaradosScript_0x70063, EVENT_LAKE_OF_RAGE_RED_GYARADOS
|
|
person_event SPRITE_SUPER_NERD, 4, 4, SPRITEMOVEDATA_STANDING_DOWN, 0, 0, -1, -1, 0, PERSONTYPE_SCRIPT, 0, WesleyScript, EVENT_LAKE_OF_RAGE_WESLEY_OF_WEDNESDAY
|
|
person_event SPRITE_POKE_BALL, 10, 7, SPRITEMOVEDATA_ITEM_TREE, 0, 0, -1, -1, 0, PERSONTYPE_ITEMBALL, 0, LakeOfRageElixer, EVENT_LAKE_OF_RAGE_ELIXER
|
|
person_event SPRITE_POKE_BALL, 2, 35, SPRITEMOVEDATA_ITEM_TREE, 0, 0, -1, -1, 0, PERSONTYPE_ITEMBALL, 0, LakeOfRageTMDetect, EVENT_LAKE_OF_RAGE_TM_DETECT
|