pokefirered/data/maps/Route12_FishingHouse/scripts.inc

111 lines
3.6 KiB
PHP

Route12_FishingHouse_MapScripts:: @ 816FF0B
.byte 0
Route12_FishingHouse_EventScript_FishingGuruBrother:: @ 816FF0C
lock
faceplayer
goto_if_set FLAG_GOT_SUPER_ROD, Route12_FishingHouse_EventScript_CheckMagikarpRecord
msgbox Route12_FishingHouse_Text_DoYouLikeToFish, MSGBOX_YESNO
compare VAR_RESULT, YES
goto_if_eq Route12_FishingHouse_EventScript_GiveSuperRod
msgbox Route12_FishingHouse_Text_OhThatsDisappointing
release
end
Route12_FishingHouse_EventScript_GiveSuperRod:: @ 816FF34
checkitemspace ITEM_SUPER_ROD, 1
compare VAR_RESULT, FALSE
goto_if_eq Route12_FishingHouse_EventScript_NoRoomForSuperRod
additem ITEM_SUPER_ROD
msgbox Route12_FishingHouse_Text_TakeThisAndFish
msgreceiveditem Route12_FishingHouse_Text_ReceivedSuperRod, ITEM_SUPER_ROD
setflag FLAG_GOT_SUPER_ROD
msgbox Route12_FishingHouse_Text_IfYouCatchBigMagikarpShowMe
release
end
Route12_FishingHouse_EventScript_NoRoomForSuperRod:: @ 816FF75
msgbox Route12_FishingHouse_Text_NoRoomForGift
release
end
Route12_FishingHouse_EventScript_CheckMagikarpRecord:: @ 816FF7F
goto_if_questlog EventScript_ReleaseEnd
special sub_8112364
setvar VAR_0x8004, SPECIES_MAGIKARP
specialvar VAR_RESULT, DoesPlayerPartyContainSpecies
compare VAR_RESULT, FALSE
goto_if_eq Route12_FishingHouse_EventScript_NoMagikarpInParty
special GetMagikarpSizeRecordInfo
msgbox Route12_FishingHouse_Text_OhMagikarpAllowMeToSee
special ChoosePartyMon
waitstate
copyvar VAR_RESULT, VAR_0x8004
compare VAR_RESULT, PARTY_SIZE
goto_if_ge Route12_FishingHouse_EventScript_CancelShowMon
special CompareMagikarpSize
compare VAR_RESULT, 1
goto_if_eq Route12_FishingHouse_EventScript_NotMagikarp
compare VAR_RESULT, 2
goto_if_eq Route12_FishingHouse_EventScript_NotRecordMagikarp
compare VAR_RESULT, 3
goto_if_eq Route12_FishingHouse_EventScript_NewRecordMagikarp
compare VAR_RESULT, 4
goto_if_eq Route12_FishingHouse_EventScript_TieRecordMagikarp
release
end
Route12_FishingHouse_EventScript_NoMagikarpInParty:: @ 816FFF5
msgbox Route12_FishingHouse_Text_TryFishingBringMeMagikarp
release
end
Route12_FishingHouse_EventScript_CancelShowMon:: @ 816FFFF
release
end
Route12_FishingHouse_EventScript_NotMagikarp:: @ 8170001
msgbox Route12_FishingHouse_Text_DoesntLookLikeMagikarp
release
end
Route12_FishingHouse_EventScript_NotRecordMagikarp:: @ 817000B
goto_if_unset FLAG_GOT_RECORD_SETTING_MAGIKARP, Route12_FishingHouse_EventScript_NewRecordMagikarp
msgbox Route12_FishingHouse_Text_HmmXInchesDoesntMeasureUp
release
end
Route12_FishingHouse_EventScript_TieRecordMagikarp:: @ 817001E
goto_if_unset FLAG_GOT_RECORD_SETTING_MAGIKARP, Route12_FishingHouse_EventScript_NewRecordMagikarp
msgbox Route12_FishingHouse_Text_HuhXInchesSameSizeAsLast
release
end
Route12_FishingHouse_EventScript_NewRecordMagikarp:: @ 8170031
setflag FLAG_GOT_RECORD_SETTING_MAGIKARP
msgbox Route12_FishingHouse_Text_WhoaXInchesTakeThis
giveitem ITEM_NET_BALL
compare VAR_RESULT, FALSE
goto_if_eq Route12_FishingHouse_EventScript_NoRoomForNetBall
msgbox Route12_FishingHouse_Text_LookForwardToGreaterRecords
release
end
Route12_FishingHouse_EventScript_NoRoomForNetBall:: @ 817005D
msgbox Route12_FishingHouse_Text_NoRoomForGift
release
end
Route12_FishingHouse_EventScript_MagikarpRecordSign:: @ 8170067
lockall
goto_if_set FLAG_GOT_RECORD_SETTING_MAGIKARP, Route12_FishingHouse_EventScript_MagikarpRecordSignRecordSet
msgbox Route12_FishingHouse_Text_BlankChartOfSomeSort
releaseall
end
Route12_FishingHouse_EventScript_MagikarpRecordSignRecordSet:: @ 817007B
special GetMagikarpSizeRecordInfo
msgbox Route12_FishingHouse_Text_MostGiganticMagikarpXInches
releaseall
end