Scriptname _00E_Theriantrophist_SummonLabSC extends activemagiceffect  

ObjectReference Property _00E_Theriantrophist_SummonPortableLaboratory_Target Auto

Event OnEffectStart(Actor akTarget, Actor akCaster)

	if PlayerREF.GetRace() == _00E_Theriantrophist_PlayerWerewolfRace
		_00E_Theriantrophist_CantCraftMSG.Show()
	else
		CheckforQuestPotions()
		Utility.Wait(1.0)
		_00E_Theriantrophist_SummonPortableLaboratory_Target.activate(PlayerREF, true)
	endif
			
EndEvent

Function CheckforQuestPotions()

	If (FS_NQ05.GetStage() < 40 && FS_NQ05.GetStage() >= 30)
		int iButton1 = FS_NQ05_AlchemyMessagebox.Show()
	
		if iButton1 == 0
			PlayerREF.RemoveItem(Vynroot, 1)
			PlayerREF.RemoveItem(SkeeverTail, 1)
			PlayerREF.RemoveItem(MothWingMonarch, 1)
			PlayerREF.RemoveItem(Garlic, 1)
			PlayerREF.RemoveItem(_00E_FS_NQ05_Rezept, 1)
			FS_NQ05.SetStage(40)
		ElseIf iButton1 == 1
			;
		EndIf
	Endif

	If (FS_NQ07.GetStage() == 115)
		int iButton2 = _00E_FS_NQ07_AlchemyMessagebox.Show()
	
		if iButton2 == 0
			PlayerREF.RemoveItem(FoodMead, 1)
			PlayerREF.RemoveItem(FrostMirriam, 2)
			PlayerREF.RemoveItem(FoodBananenschnaps, 1)
			PlayerREF.RemoveItem(_00E_FS_NQ07_Rezept, 1)
			FS_NQ07.SetStage(120)
		ElseIf iButton2 == 1
			;
		EndIf
	EndIf

EndFunction

Actor Property PlayerREF Auto
Message Property _00E_Theriantrophist_CantCraftMSG Auto
Race Property _00E_Theriantrophist_PlayerWerewolfRace Auto

Quest Property FS_NQ05 Auto
Book Property _00E_FS_NQ05_Rezept Auto
Ingredient Property Vynroot Auto
Ingredient Property SkeeverTail Auto
Ingredient Property MothWingMonarch Auto
Ingredient Property Garlic Auto
Message Property FS_NQ05_AlchemyMessagebox Auto

Quest Property FS_NQ07 Auto
Book Property _00E_FS_NQ07_Rezept Auto
Potion Property FoodMead Auto
Ingredient Property FrostMirriam Auto
Potion Property FoodBananenschnaps Auto
Message Property _00E_FS_NQ07_AlchemyMessagebox Auto