mirror of
https://github.com/pret/pokefirered.git
synced 2026-05-09 12:35:23 -05:00
67 lines
2.4 KiB
C++
67 lines
2.4 KiB
C++
FiveIsland_WaterLabyrinth_MapScripts::
|
|
.byte 0
|
|
|
|
FiveIsland_WaterLabyrinth_EventScript_EggGentleman::
|
|
goto_if_questlog EventScript_ReleaseEnd
|
|
special QuestLog_CutRecording
|
|
lock
|
|
faceplayer
|
|
goto_if_set FLAG_GOT_TOGEPI_EGG, FiveIsland_WaterLabyrinth_EventScript_PostEggComment
|
|
goto_if_set FLAG_NO_ROOM_FOR_TOGEPI_EGG, FiveIsland_WaterLabyrinth_EventScript_ReturnForEgg
|
|
msgbox FiveIsland_WaterLabyrinth_Text_LetMeTakeLookAtMons
|
|
specialvar VAR_RESULT, GetLeadMonFriendship
|
|
goto_if_eq VAR_RESULT, 6, FiveIsland_WaterLabyrinth_EventScript_LeadMonMaxFriendship
|
|
msgbox FiveIsland_WaterLabyrinth_Text_HmmISeeIsee
|
|
release
|
|
end
|
|
|
|
FiveIsland_WaterLabyrinth_EventScript_MonDaisyComment::
|
|
famechecker FAMECHECKER_DAISY, 2
|
|
msgbox FiveIsland_WaterLabyrinth_Text_CuteMonRemindsMeOfDaisy
|
|
release
|
|
end
|
|
|
|
FiveIsland_WaterLabyrinth_EventScript_LeadMonMaxFriendship::
|
|
msgbox FiveIsland_WaterLabyrinth_Text_TreatMonRightHaveThis
|
|
goto FiveIsland_WaterLabyrinth_EventScript_TryGiveEgg
|
|
end
|
|
|
|
FiveIsland_WaterLabyrinth_EventScript_TryGiveEgg::
|
|
getpartysize
|
|
goto_if_eq VAR_RESULT, PARTY_SIZE, FiveIsland_WaterLabyrinth_EventScript_NoRoomForEgg
|
|
setflag FLAG_GOT_TOGEPI_EGG
|
|
giveegg SPECIES_TOGEPI
|
|
textcolor NPC_TEXT_COLOR_NEUTRAL
|
|
playfanfare MUS_LEVEL_UP
|
|
message FiveIsland_WaterLabyrinth_Text_ReceivedEggFromMan
|
|
waitfanfare
|
|
waitmessage
|
|
call EventScript_RestorePrevTextColor
|
|
goto FiveIsland_WaterLabyrinth_EventScript_PostEggComment
|
|
end
|
|
|
|
@ If the player has a Togepi/Togetic from this game (assumed to be the one the man gave you) then comment on it
|
|
@ Otherwise make normal comment
|
|
FiveIsland_WaterLabyrinth_EventScript_PostEggComment::
|
|
bufferspeciesname STR_VAR_2, SPECIES_TOGEPI
|
|
setvar VAR_0x8004, SPECIES_TOGEPI
|
|
specialvar VAR_RESULT, PlayerPartyContainsSpeciesWithPlayerID
|
|
goto_if_eq VAR_RESULT, TRUE, FiveIsland_WaterLabyrinth_EventScript_MonDaisyComment
|
|
bufferspeciesname STR_VAR_2, SPECIES_TOGETIC
|
|
setvar VAR_0x8004, SPECIES_TOGETIC
|
|
specialvar VAR_RESULT, PlayerPartyContainsSpeciesWithPlayerID
|
|
goto_if_eq VAR_RESULT, TRUE, FiveIsland_WaterLabyrinth_EventScript_MonDaisyComment
|
|
msgbox FiveIsland_WaterLabyrinth_Text_GladIMetSomeoneLikeYou
|
|
release
|
|
end
|
|
|
|
FiveIsland_WaterLabyrinth_EventScript_NoRoomForEgg::
|
|
setflag FLAG_NO_ROOM_FOR_TOGEPI_EGG
|
|
msgbox FiveIsland_WaterLabyrinth_Text_DontHaveSpaceInYourParty
|
|
release
|
|
end
|
|
|
|
FiveIsland_WaterLabyrinth_EventScript_ReturnForEgg::
|
|
goto FiveIsland_WaterLabyrinth_EventScript_TryGiveEgg
|
|
end
|