Scriptname _00E_MQ17_SC07_BroodingPotSC extends ObjectReference  

Event OnUpdate()

	if akChild.GetDistance(Self) >= 75
		Self.SetOpen(False)
		Self.Lock(False)
	Else
		RegisterForSingleUpdate(3)
	EndIf
	
EndEvent

Function OpenAndClose()

	Self.SetOpen(True)
	RegisterForSingleUpdate(3)
	
EndFunction

Function SetChild(Actor akSpawnedLemming)
	
	akChild = akSpawnedLemming

EndFunction

Actor akChild