Scriptname FS_NQ05_AlchemyScript extends ObjectReference  

Actor Property PlayerREF Auto

Quest Property FS_NQ05 Auto
Book Property FS_NQ05_Rezept Auto
Ingredient Property Nirnroot Auto
Ingredient Property SkeeverTail Auto
Ingredient Property MothWingMonarch Auto
Ingredient Property Garlic Auto
Message Property FS_NQ05_AlchemyMessagebox Auto

Bool bActivationBlocked = False

Event OnActivate(ObjectReference akActionRef)
	If akActionRef == PlayerREF && _00E_PlayerhousingMaster.ReferenceCanBeActivated(Self) && bActivationBlocked == False
		bActivationBlocked = True

		Int qStage = FS_NQ05.GetStage()
		If qStage >= 30 && qStage < 40
			If FS_NQ05_AlchemyMessagebox.Show() == 0
				FS_NQ05.SetStage(40)
				PlayerREF.RemoveItem(Nirnroot, 1)
				PlayerREF.RemoveItem(SkeeverTail, 1)
				PlayerREF.RemoveItem(MothWingMonarch, 1)
				PlayerREF.RemoveItem(Garlic, 1)
				PlayerREF.RemoveItem(FS_NQ05_Rezept, 1)
			EndIf
		EndIf

		bActivationBlocked = False
	EndIf
EndEvent