;BEGIN FRAGMENT CODE - Do not edit anything between this and the end comment
;NEXT FRAGMENT INDEX 10
Scriptname QF_MQ_P01_ASummersDay_00046F1A Extends Quest Hidden

;BEGIN ALIAS PROPERTY Father
;ALIAS PROPERTY TYPE ReferenceAlias
ReferenceAlias Property Alias_Father Auto
;END ALIAS PROPERTY

;BEGIN ALIAS PROPERTY PlayerRef
;ALIAS PROPERTY TYPE ReferenceAlias
ReferenceAlias Property Alias_PlayerRef Auto
;END ALIAS PROPERTY

;BEGIN ALIAS PROPERTY Elk
;ALIAS PROPERTY TYPE ReferenceAlias
ReferenceAlias Property Alias_Elk Auto
;END ALIAS PROPERTY

;BEGIN FRAGMENT Fragment_3
Function Fragment_3()
;BEGIN AUTOCAST TYPE _00E_MQP01_Functions
Quest __temp = self as Quest
_00E_MQP01_Functions kmyQuest = __temp as _00E_MQP01_Functions
;END AUTOCAST
;BEGIN CODE
kmyQuest.ArriveInHouse()
;END CODE
EndFunction
;END FRAGMENT

;BEGIN FRAGMENT Fragment_5
Function Fragment_5()
;BEGIN AUTOCAST TYPE _00E_MQP01_Functions
Quest __temp = self as Quest
_00E_MQP01_Functions kmyQuest = __temp as _00E_MQP01_Functions
;END AUTOCAST
;BEGIN CODE
kmyQuest.StartFatherAccuseScene()
;END CODE
EndFunction
;END FRAGMENT

;BEGIN FRAGMENT Fragment_9
Function Fragment_9()
;BEGIN AUTOCAST TYPE _00E_MQP01_Functions
Quest __temp = self as Quest
_00E_MQP01_Functions kmyQuest = __temp as _00E_MQP01_Functions
;END AUTOCAST
;BEGIN CODE
kmyQuest.UnlockDoor()
kmyQuest.UnblockDoor()
SetObjectiveCompleted(5)
;END CODE
EndFunction
;END FRAGMENT

;BEGIN FRAGMENT Fragment_4
Function Fragment_4()
;BEGIN AUTOCAST TYPE _00E_MQP01_Functions
Quest __temp = self as Quest
_00E_MQP01_Functions kmyQuest = __temp as _00E_MQP01_Functions
;END AUTOCAST
;BEGIN CODE
kmyQuest.StartFatherWhistleScene()
;END CODE
EndFunction
;END FRAGMENT

;BEGIN FRAGMENT Fragment_2
Function Fragment_2()
;BEGIN AUTOCAST TYPE _00E_MQP01_Functions
Quest __temp = self as Quest
_00E_MQP01_Functions kmyQuest = __temp as _00E_MQP01_Functions
;END AUTOCAST
;BEGIN CODE
kmyQuest.SetUpScene()
SetObjectiveDisplayed(5)
;END CODE
EndFunction
;END FRAGMENT

;BEGIN FRAGMENT Fragment_8
Function Fragment_8()
;BEGIN AUTOCAST TYPE _00E_MQP01_Functions
Quest __temp = self as Quest
_00E_MQP01_Functions kmyQuest = __temp as _00E_MQP01_Functions
;END AUTOCAST
;BEGIN CODE
CompleteAllObjectives()
kmyQuest.PlayIntroAndMovePlayerToShip()
;END CODE
EndFunction
;END FRAGMENT

;END FRAGMENT CODE - Do not edit anything between this and the begin comment