;BEGIN FRAGMENT CODE - Do not edit anything between this and the end comment
Scriptname Fragments:Quests:QF_CLAPBCLAQuest_040D6C3A Extends Quest Hidden Const

;BEGIN FRAGMENT Fragment_Stage_0000_Item_00
Function Fragment_Stage_0000_Item_00()
;BEGIN CODE
; Talk to Father Frederic, no objective
;END CODE
EndFunction
;END FRAGMENT

;BEGIN FRAGMENT Fragment_Stage_0010_Item_00
Function Fragment_Stage_0010_Item_00()
;BEGIN CODE
; Read the terminal in Trinity Plaza
setobjectivedisplayed(10)
;END CODE
EndFunction
;END FRAGMENT

;BEGIN FRAGMENT Fragment_Stage_0020_Item_00
Function Fragment_Stage_0020_Item_00()
;BEGIN AUTOCAST TYPE BCLAQuestScript
Quest __temp = self as Quest
BCLAQuestScript kmyQuest = __temp as BCLAQuestScript
;END AUTOCAST
;BEGIN CODE
; New objectives
setobjectivecompleted(10)
If Camera.GetRef().IsDisabled()
   Camera.GetRef().Enable()
EndIf
setobjectivedisplayed(20)
setobjectivedisplayed(30)
setobjectivedisplayed(40)
setobjectivedisplayed(50)
setobjectivedisplayed(60)
utility.wait(1)
If Alias_Leonard.GetActorRef().IsDead()
   setobjectivecompleted(30)
endif
setobjectivecompleted(60)
utility.wait(0.1)
kmyQuest.CheckObjectives()
;END CODE
EndFunction
;END FRAGMENT

;BEGIN FRAGMENT Fragment_Stage_0070_Item_00
Function Fragment_Stage_0070_Item_00()
;BEGIN CODE
; Return to Frederic
setobjectivedisplayed(70)
;END CODE
EndFunction
;END FRAGMENT

;BEGIN FRAGMENT Fragment_Stage_0100_Item_00
Function Fragment_Stage_0100_Item_00()
;BEGIN CODE
setobjectivecompleted(70)
game.getplayer().additem(Caps001,500)
;END CODE
EndFunction
;END FRAGMENT

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

ReferenceAlias Property Alias_Leonard Auto Const

ReferenceAlias Property Camera Auto Const

MiscObject Property Caps001 Auto Const
