diff --git a/Project/Modules/Game Support/Ark/Configs/EngramControl.xojo_code b/Project/Modules/Game Support/Ark/Configs/EngramControl.xojo_code
index ef351ea86..3fb2d17c4 100644
--- a/Project/Modules/Game Support/Ark/Configs/EngramControl.xojo_code	
+++ b/Project/Modules/Game Support/Ark/Configs/EngramControl.xojo_code	
@@ -860,11 +860,17 @@ Inherits Ark.ConfigGroup
 		  End If
 		  
 		  Var Parts As New Dictionary
-		  Parts.Value(Self.KeyAutoUnlockLevel) = AutoUnlocks
-		  Parts.Value(Self.KeyHidden) = Hidden
-		  Parts.Value(Self.KeyPlayerLevel) = PlayerLevel
-		  Parts.Value(Self.KeyUnlockPoints) = RequiredPoints
-		  Parts.Value(Self.KeyRemovePrerequisites) = RemovePrerequisites
+		  If Hidden <> Self.mOnlyAllowSpecifiedEngrams Then
+		    Parts.Value(Self.KeyHidden) = Hidden
+		  End If
+		  If Hidden = False Then
+		    Parts.Value(Self.KeyAutoUnlockLevel) = AutoUnlocks
+		    Parts.Value(Self.KeyPlayerLevel) = PlayerLevel
+		    If AutoUnlocks = False Then
+		      Parts.Value(Self.KeyUnlockPoints) = RequiredPoints
+		      Parts.Value(Self.KeyRemovePrerequisites) = RemovePrerequisites
+		    End If
+		  End If
 		  
 		  Return Beacon.GenerateJson(Parts, False)
 		End Function
diff --git a/Project/Modules/Game Support/ArkSA/Configs/EngramControl.xojo_code b/Project/Modules/Game Support/ArkSA/Configs/EngramControl.xojo_code
index 797c4e2ab..ed76abfec 100644
--- a/Project/Modules/Game Support/ArkSA/Configs/EngramControl.xojo_code	
+++ b/Project/Modules/Game Support/ArkSA/Configs/EngramControl.xojo_code	
@@ -883,11 +883,17 @@ Implements Beacon.BlueprintConsumer
 		  End If
 		  
 		  Var Parts As New Dictionary
-		  Parts.Value(Self.KeyAutoUnlockLevel) = AutoUnlocks
-		  Parts.Value(Self.KeyHidden) = Hidden
-		  Parts.Value(Self.KeyPlayerLevel) = PlayerLevel
-		  Parts.Value(Self.KeyUnlockPoints) = RequiredPoints
-		  Parts.Value(Self.KeyRemovePrerequisites) = RemovePrerequisites
+		  If Hidden <> Self.mOnlyAllowSpecifiedEngrams Then
+		    Parts.Value(Self.KeyHidden) = Hidden
+		  End If
+		  If Hidden = False Then
+		    Parts.Value(Self.KeyAutoUnlockLevel) = AutoUnlocks
+		    Parts.Value(Self.KeyPlayerLevel) = PlayerLevel
+		    If AutoUnlocks = False Then
+		      Parts.Value(Self.KeyUnlockPoints) = RequiredPoints
+		      Parts.Value(Self.KeyRemovePrerequisites) = RemovePrerequisites
+		    End If
+		  End If
 		  
 		  Return Beacon.GenerateJson(Parts, False)
 		End Function