Prevent grave digging in werewolf form

source/scripts/_00e_treasuremarkerscript.psc

@@ -6,14 +6,26 @@ Import Utility
 ;              							EVENTS                    					 
 ;=====================================================================================
 
+Event OnInit()
+	Self.BlockActivation()
+endEvent
+	
 Auto State Waiting
 
-	Event OnLoad()
-		Self.BlockActivation()
-	endEvent
-
 	Event OnActivate (ObjectReference akActionRef)
-
+	
+		if akActionRef != PlayerREF
+			return
+		endif
+		
+		if PlayerREF.GetRace() == Game.GetFormFromFile(0x2EE47, "Enderal - Forgotten Stories.esm") as Race
+			Message werewolfMessage = Game.GetFormFromFile(0x2F032, "Enderal - Forgotten Stories.esm") as Message
+			if werewolfMessage
+				werewolfMessage.Show()
+				return
+			endif
+		endif
+		
 		If akActionRef.GetItemCount(ShovelKeyword) > 0
 			TreasureDigger = akActionRef as Actor
 			if TreasureDigger.IsInCombat()
@@ -110,4 +122,4 @@ Message Property _00E_TreasureMarkerScript_sShovelNeeded Auto
 
 Keyword Property ShovelKeyword Auto
 Actor Property PlayerREF Auto
-Idle Property DefaultSheathe Auto
+Idle Property DefaultSheathe Auto