pokecrystal/maps/LakeOfRageMagikarpHouse.asm

222 lines
4.1 KiB
NASM

const_def 2 ; object constants
const LAKEOFRAGEMAGIKARPHOUSE_FISHING_GURU
LakeOfRageMagikarpHouse_MapScripts:
db 0 ; scene scripts
db 0 ; callbacks
FishingGuruScript_0x19a6ae:
faceplayer
opentext
checkevent EVENT_LAKE_OF_RAGE_ELIXIR_ON_STANDBY
iftrue UnknownScript_0x19a6fe
checkevent EVENT_LAKE_OF_RAGE_ASKED_FOR_MAGIKARP
iftrue UnknownScript_0x19a6e0
checkevent EVENT_CLEARED_ROCKET_HIDEOUT
iftrue UnknownScript_0x19a6d7
checkevent EVENT_LAKE_OF_RAGE_EXPLAINED_WEIRD_MAGIKARP
iftrue UnknownScript_0x19a6d1
writetext UnknownText_0x19a72e
waitbutton
closetext
setevent EVENT_LAKE_OF_RAGE_EXPLAINED_WEIRD_MAGIKARP
end
UnknownScript_0x19a6d1:
writetext UnknownText_0x19a84d
waitbutton
closetext
end
UnknownScript_0x19a6d7:
writetext UnknownText_0x19a890
waitbutton
closetext
setevent EVENT_LAKE_OF_RAGE_ASKED_FOR_MAGIKARP
end
UnknownScript_0x19a6e0:
writebyte MAGIKARP
special FindPartyMonThatSpecies
iffalse UnknownScript_0x19a6d7
writetext UnknownText_0x19a93e
waitbutton
special CheckMagikarpLength
ifequal MAGIKARPLENGTH_NOT_MAGIKARP, UnknownScript_0x19a71c
ifequal MAGIKARPLENGTH_REFUSED, UnknownScript_0x19a722
ifequal MAGIKARPLENGTH_TOO_SHORT, UnknownScript_0x19a716
; MAGIKARPLENGTH_BEAT_RECORD
jump UnknownScript_0x19a6fe
UnknownScript_0x19a6fe:
writetext UnknownText_0x19a977
buttonsound
verbosegiveitem ELIXER
iffalse UnknownScript_0x19a711
writetext UnknownText_0x19a9c3
waitbutton
closetext
clearevent EVENT_LAKE_OF_RAGE_ELIXIR_ON_STANDBY
end
UnknownScript_0x19a711:
closetext
setevent EVENT_LAKE_OF_RAGE_ELIXIR_ON_STANDBY
end
UnknownScript_0x19a716:
writetext UnknownText_0x19aa01
waitbutton
closetext
end
UnknownScript_0x19a71c:
writetext UnknownText_0x19aa5c
waitbutton
closetext
end
UnknownScript_0x19a722:
writetext UnknownText_0x19aa79
waitbutton
closetext
end
UnknownScript_0x19a728:
jumptext UnknownText_0x19aabc
MagikarpHouseBookshelf:
jumpstd difficultbookshelf
UnknownText_0x19a72e:
text "LAKE OF RAGE is"
line "actually a crater"
para "made by rampaging"
line "GYARADOS."
para "The crater filled"
line "up with rainwater"
para "and the LAKE was"
line "formed."
para "That's the story"
line "passed on from my"
para "Grandpa's great-"
line "great-grandpa."
para "It used to be that"
line "you could catch"
para "lively MAGIKARP"
line "there, but…"
para "I don't understand"
line "what's happening."
done
UnknownText_0x19a84d:
text "The LAKE hasn't"
line "been normal since"
para "those men wearing"
line "black arrived."
done
UnknownText_0x19a890:
text "LAKE OF RAGE is"
line "back to normal."
para "The MAGIKARP have"
line "returned."
para "I may yet realize"
line "my dream of see-"
cont "ing the world's"
cont "largest MAGIKARP."
para "Do you have a ROD?"
line "Please help me if"
cont "you do."
done
UnknownText_0x19a93e:
text "Ah, you have a"
line "MAGIKARP! Let's"
para "see how big that"
line "baby is."
done
UnknownText_0x19a977:
text "Wow! This one is"
line "outstanding!"
para "I tip my hat to"
line "you!"
para "Take this as a"
line "memento!"
done
UnknownText_0x19a9c3:
text "The record is the"
line "important thing."
para "Think of that as"
line "a bonus!"
done
UnknownText_0x19aa01:
text "Wow! This one is"
line "outstanding!"
para "…I wish I could"
line "say that, but I've"
para "seen a bigger one"
line "before."
done
UnknownText_0x19aa5c:
text "What? That's not a"
line "MAGIKARP!"
done
UnknownText_0x19aa79:
text "Oh… So you didn't"
line "get one good"
para "enough to show me?"
line "Maybe next time."
done
UnknownText_0x19aabc:
text "CURRENT RECORD"
para "@"
text_from_ram StringBuffer3
text " caught by"
line "@"
text_from_ram StringBuffer4
db "@@"
LakeOfRageMagikarpHouse_MapEvents:
db 0, 0 ; filler
db 2 ; warp events
warp_event 2, 7, LAKE_OF_RAGE, 2
warp_event 3, 7, LAKE_OF_RAGE, 2
db 0 ; coord events
db 2 ; bg events
bg_event 0, 1, BGEVENT_READ, MagikarpHouseBookshelf
bg_event 1, 1, BGEVENT_READ, MagikarpHouseBookshelf
db 1 ; object events
object_event 2, 3, SPRITE_FISHING_GURU, SPRITEMOVEDATA_SPINRANDOM_SLOW, 0, 0, -1, -1, 0, OBJECTTYPE_SCRIPT, 0, FishingGuruScript_0x19a6ae, -1