ScriptName _00E_DothulgradMiningScript Extends ObjectReference
{Part of a small Doorpuzzle in Alt-Dothulgrad}

;written by Julian "Sagantor"
;Gives the player an energy crystal to activate a door in Alt-Dothulgrad
;Script can only be fired once

Bool doOnce = True
Sound Property miningSound Auto
MiscObject Property energyCrystal Auto

Event OnActivate(ObjectReference akActionRef)
	if (akActionRef == Game.GetPlayer() && doOnce == True)
		akActionRef.AddItem(energyCrystal, 1, false)
		miningSound.Play(Self)
		doOnce = False
	EndIf
	
EndEvent