Scriptname tegtelchest2script extends ObjectReference  

Quest Property demonseyequest01  Auto  
SoulGem Property TEGDemonseyeSoulGemQuestitem  Auto  

int doonce01

Event OnActivate(ObjectReference akActionRef)
if (doonce01 != 1)
demonseyequest01.SetObjectiveCompleted(31)
Game.GetPlayer().AddItem(TEGDemonseyeSoulGemQuestitem, 1)
doonce01 = 1
endif
EndEvent