Scriptname _00E_MQ07bDoorScript extends ObjectReference  

Event OnInit()

	self.BlockActivation(True)

EndEvent

Event OnActivate(ObjectReference akActionRef)
	If akActionRef == Game.GetPlayer() && DoOnce == false
		If CaliaRef.IsInLocation(_00E_AltDothulgrad) == 1 && DoOnce == false
			self.BlockActivation(False)
			Self.Activate(Game.GetPlayer())
			DoOnce = true
			Utility.Wait(0.3)
			CaliaRef.MoveTo(Game.GetPlayer())
		Else
			_00E_MQ07b_sDoorUnderground.Show()
		EndIf
	EndIf
EndEvent

Message Property _00E_MQ07b_sDoorUnderground Auto
ObjectReference Property CaliaRef Auto
Location Property _00E_AltDothulgrad Auto
Bool DoOnce = false