pokefirered/data/maps/SixIsland_WaterPath_House1/scripts.inc
2022-08-09 20:41:54 -04:00

78 lines
2.7 KiB
PHP

SixIsland_WaterPath_House1_MapScripts::
.byte 0
SixIsland_WaterPath_House1_EventScript_Beauty::
lock
faceplayer
goto_if_questlog EventScript_ReleaseEnd
special QuestLog_CutRecording
setvar VAR_0x8004, SPECIES_HERACROSS
specialvar VAR_RESULT, DoesPlayerPartyContainSpecies
goto_if_eq VAR_RESULT, FALSE, SixIsland_WaterPath_House1_EventScript_NoHeracrossInParty
special GetHeracrossSizeRecordInfo
msgbox SixIsland_WaterPath_House1_Text_MayIMeasureHeracross
special ChoosePartyMon
waitstate
copyvar VAR_RESULT, VAR_0x8004
goto_if_ge VAR_RESULT, PARTY_SIZE, SixIsland_WaterPath_House1_EventScript_DontShowMon
special CompareHeracrossSize
goto_if_eq VAR_RESULT, 1, SixIsland_WaterPath_House1_EventScript_ShownNonHeracross
goto_if_eq VAR_RESULT, 2, SixIsland_WaterPath_House1_EventScript_ShownSmallHeracross
goto_if_eq VAR_RESULT, 3, SixIsland_WaterPath_House1_EventScript_ShownBigHeracross
goto_if_eq VAR_RESULT, 4, SixIsland_WaterPath_House1_EventScript_ShownTiedHeracross
release
end
SixIsland_WaterPath_House1_EventScript_NoHeracrossInParty::
msgbox SixIsland_WaterPath_House1_Text_LoveItNeedItHeracross
release
end
SixIsland_WaterPath_House1_EventScript_DontShowMon::
release
end
SixIsland_WaterPath_House1_EventScript_ShownNonHeracross::
msgbox SixIsland_WaterPath_House1_Text_ThisWontDo
release
end
SixIsland_WaterPath_House1_EventScript_ShownSmallHeracross::
goto_if_unset FLAG_GOT_NEST_BALL_FROM_WATER_PATH_HOUSE_1, SixIsland_WaterPath_House1_EventScript_ShownBigHeracross
msgbox SixIsland_WaterPath_House1_Text_ItsXInchesYInchesWasBiggest
release
end
SixIsland_WaterPath_House1_EventScript_ShownTiedHeracross::
goto_if_unset FLAG_GOT_NEST_BALL_FROM_WATER_PATH_HOUSE_1, SixIsland_WaterPath_House1_EventScript_ShownBigHeracross
msgbox SixIsland_WaterPath_House1_Text_ItsXInchesSameAsBefore
release
end
SixIsland_WaterPath_House1_EventScript_ShownBigHeracross::
setflag FLAG_GOT_NEST_BALL_FROM_WATER_PATH_HOUSE_1
msgbox SixIsland_WaterPath_House1_Text_ItsXInchesDeserveReward
giveitem ITEM_NEST_BALL
goto_if_eq VAR_RESULT, FALSE, SixIsland_WaterPath_House1_EventScript_NoRoomForNestBall
msgbox SixIsland_WaterPath_House1_Text_WantToSeeBiggerOne
release
end
SixIsland_WaterPath_House1_EventScript_NoRoomForNestBall::
msgbox SixIsland_WaterPath_House1_Text_YourBagIsFull
release
end
SixIsland_WaterPath_House1_EventScript_SizeRecord::
lockall
goto_if_set FLAG_GOT_NEST_BALL_FROM_WATER_PATH_HOUSE_1, SixIsland_WaterPath_House1_EventScript_SizeRecordNonEmpty
msgbox SixIsland_WaterPath_House1_Text_BlankChartOfSomeSort
releaseall
end
SixIsland_WaterPath_House1_EventScript_SizeRecordNonEmpty::
special GetHeracrossSizeRecordInfo
msgbox SixIsland_WaterPath_House1_Text_BiggestHeracrossIsXInches
releaseall
end