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

;BEGIN ALIAS PROPERTY ByBedTrigger
;ALIAS PROPERTY TYPE ReferenceAlias
ReferenceAlias Property Alias_ByBedTrigger Auto
;END ALIAS PROPERTY

;BEGIN ALIAS PROPERTY Nicolette
;ALIAS PROPERTY TYPE ReferenceAlias
ReferenceAlias Property Alias_Nicolette Auto
;END ALIAS PROPERTY

;BEGIN ALIAS PROPERTY DoorEntryTrigger
;ALIAS PROPERTY TYPE ReferenceAlias
ReferenceAlias Property Alias_DoorEntryTrigger Auto
;END ALIAS PROPERTY

;BEGIN ALIAS PROPERTY RoomInvisWall
;ALIAS PROPERTY TYPE ReferenceAlias
ReferenceAlias Property Alias_RoomInvisWall Auto
;END ALIAS PROPERTY

;BEGIN ALIAS PROPERTY Bjorn
;ALIAS PROPERTY TYPE ReferenceAlias
ReferenceAlias Property Alias_Bjorn Auto
;END ALIAS PROPERTY

;BEGIN ALIAS PROPERTY Feria
;ALIAS PROPERTY TYPE ReferenceAlias
ReferenceAlias Property Alias_Feria Auto
;END ALIAS PROPERTY

;BEGIN FRAGMENT Fragment_14
Function Fragment_14()
;BEGIN AUTOCAST TYPE __LALLMiscDialogueQSTScript
Quest __temp = self as Quest
__LALLMiscDialogueQSTScript kmyQuest = __temp as __LALLMiscDialogueQSTScript
;END AUTOCAST
;BEGIN CODE
;Can ask Feria for sex anytime
SetObjectiveCompleted(40)
SetObjectiveDisplayed(55)
FeriaSpecScenario.SetValue(0)
;END CODE
EndFunction
;END FRAGMENT

;BEGIN FRAGMENT Fragment_0
Function Fragment_0()
;BEGIN CODE
;can ask dad about sex
SetObjectiveCompleted(8)
SetObjectiveCompleted(9)
SetObjectiveDisplayed(10)
;END CODE
EndFunction
;END FRAGMENT

;BEGIN FRAGMENT Fragment_3
Function Fragment_3()
;BEGIN AUTOCAST TYPE __LALLMiscDialogueQSTScript
Quest __temp = self as Quest
__LALLMiscDialogueQSTScript kmyQuest = __temp as __LALLMiscDialogueQSTScript
;END AUTOCAST
;BEGIN CODE
;Can have sex with parents after 9
SetObjectiveDisplayed(30)
SetObjectiveCompleted(22)
;END CODE
EndFunction
;END FRAGMENT

;BEGIN FRAGMENT Fragment_16
Function Fragment_16()
;BEGIN CODE
SetObjectiveCompleted(55)
Stop()
;END CODE
EndFunction
;END FRAGMENT

;BEGIN FRAGMENT Fragment_12
Function Fragment_12()
;BEGIN AUTOCAST TYPE __LALLMiscDialogueQSTScript
Quest __temp = self as Quest
__LALLMiscDialogueQSTScript kmyQuest = __temp as __LALLMiscDialogueQSTScript
;END AUTOCAST
;BEGIN CODE
;Feria gave player oral
;END CODE
EndFunction
;END FRAGMENT

;BEGIN FRAGMENT Fragment_15
Function Fragment_15()
;BEGIN AUTOCAST TYPE __LALLMiscDialogueQSTScript
Quest __temp = self as Quest
__LALLMiscDialogueQSTScript kmyQuest = __temp as __LALLMiscDialogueQSTScript
;END AUTOCAST
;BEGIN CODE
SetObjectiveDisplayed(8)
SpecialEvent.SetValue(1)
kmyQuest.GetBjornNicolette()
;END CODE
EndFunction
;END FRAGMENT

;BEGIN FRAGMENT Fragment_1
Function Fragment_1()
;BEGIN AUTOCAST TYPE __LALLMiscDialogueQSTScript
Quest __temp = self as Quest
__LALLMiscDialogueQSTScript kmyQuest = __temp as __LALLMiscDialogueQSTScript
;END AUTOCAST
;BEGIN CODE
;am grounded
SetObjectiveCompleted(20)
kmyQuest.Stage20Thoughts()
ParentsConvoScene.Start()
SpecialEvent.SetValue(1)
kmyQuest.SetObjectiveDisplayed(21)
;END CODE
EndFunction
;END FRAGMENT

;BEGIN FRAGMENT Fragment_11
Function Fragment_11()
;BEGIN AUTOCAST TYPE __LALLMiscDialogueQSTScript
Quest __temp = self as Quest
__LALLMiscDialogueQSTScript kmyQuest = __temp as __LALLMiscDialogueQSTScript
;END AUTOCAST
;BEGIN CODE
;Feria masturbated you, go further?
FeriaSpecScenario.SetValue(1)
;END CODE
EndFunction
;END FRAGMENT

;BEGIN FRAGMENT Fragment_9
Function Fragment_9()
;BEGIN AUTOCAST TYPE __LALLMiscDialogueQSTScript
Quest __temp = self as Quest
__LALLMiscDialogueQSTScript kmyQuest = __temp as __LALLMiscDialogueQSTScript
;END AUTOCAST
;BEGIN CODE
;sex scenes with parents complete. Can init sex with them anytime now
SetObjectiveCompleted(35)
SpecialEvent.SetValue(0)
debug.messagebox("Mmhmm... this is so amazing! I wonder if I could show Feria this after we're done?")
SetObjectiveDisplayed(40)
ParentsSpecScenario.SetValue(0)
;END CODE
EndFunction
;END FRAGMENT

;BEGIN FRAGMENT Fragment_13
Function Fragment_13()
;BEGIN AUTOCAST TYPE __LALLMiscDialogueQSTScript
Quest __temp = self as Quest
__LALLMiscDialogueQSTScript kmyQuest = __temp as __LALLMiscDialogueQSTScript
;END AUTOCAST
;BEGIN CODE
;Feria after sex dialogue
;END CODE
EndFunction
;END FRAGMENT

;BEGIN FRAGMENT Fragment_4
Function Fragment_4()
;BEGIN AUTOCAST TYPE __LALLMiscDialogueQSTScript
Quest __temp = self as Quest
__LALLMiscDialogueQSTScript kmyQuest = __temp as __LALLMiscDialogueQSTScript
;END AUTOCAST
;BEGIN CODE
;disable room barrier
debug.messagebox("Maybe I can talk to dad again. I think mom calmed him down.")
SetObjectiveCompleted(21)
SetObjectiveDisplayed(22)
;END CODE
EndFunction
;END FRAGMENT

;BEGIN FRAGMENT Fragment_8
Function Fragment_8()
;BEGIN AUTOCAST TYPE __LALLMiscDialogueQSTScript
Quest __temp = self as Quest
__LALLMiscDialogueQSTScript kmyQuest = __temp as __LALLMiscDialogueQSTScript
;END AUTOCAST
;BEGIN CODE
;threesome
kmyQuest.ThreesomeFuck()
Utility.Wait(10.0)
ThisQuest.SetStage(40)
;END CODE
EndFunction
;END FRAGMENT

;BEGIN FRAGMENT Fragment_5
Function Fragment_5()
;BEGIN AUTOCAST TYPE __LALLMiscDialogueQSTScript
Quest __temp = self as Quest
__LALLMiscDialogueQSTScript kmyQuest = __temp as __LALLMiscDialogueQSTScript
;END AUTOCAST
;BEGIN CODE
;Nicolette gives oral
SetObjectiveCompleted(30)
SetObjectiveDisplayed(35)
kmyQuest.NicoletteGiveOral()
ParentsSpecScenario.SetValue(1)
;END CODE
EndFunction
;END FRAGMENT

;BEGIN FRAGMENT Fragment_7
Function Fragment_7()
;BEGIN AUTOCAST TYPE __LALLMiscDialogueQSTScript
Quest __temp = self as Quest
__LALLMiscDialogueQSTScript kmyQuest = __temp as __LALLMiscDialogueQSTScript
;END AUTOCAST
;BEGIN CODE
;bjorn gives oral
kmyQuest.BjornGiveOral()
;END CODE
EndFunction
;END FRAGMENT

;BEGIN FRAGMENT Fragment_10
Function Fragment_10()
;BEGIN AUTOCAST TYPE __LALLMiscDialogueQSTScript
Quest __temp = self as Quest
__LALLMiscDialogueQSTScript kmyQuest = __temp as __LALLMiscDialogueQSTScript
;END AUTOCAST
;BEGIN CODE
;Able to ask Feria to masturbate together
;END CODE
EndFunction
;END FRAGMENT

;BEGIN FRAGMENT Fragment_2
Function Fragment_2()
;BEGIN AUTOCAST TYPE __LALLMiscDialogueQSTScript
Quest __temp = self as Quest
__LALLMiscDialogueQSTScript kmyQuest = __temp as __LALLMiscDialogueQSTScript
;END AUTOCAST
;BEGIN CODE
SetObjectiveDisplayed(20)
SetObjectiveCompleted(10)
kmyQuest.Stage15Thoughts()
;END CODE
EndFunction
;END FRAGMENT

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

Scene Property ParentsConvoScene  Auto  

GlobalVariable Property SpecialEvent  Auto  

Quest Property ThisQuest  Auto  

GlobalVariable Property ParentsSpecScenario  Auto  

GlobalVariable Property FeriaSpecScenario  Auto  
