Moved locking doors during the siege to a separate perk

source/scripts/PRKF__00E_ArkSiegeLockedGate_0300146D.psc

@@ -0,0 +1,15 @@
+;BEGIN FRAGMENT CODE - Do not edit anything between this and the end comment
+;NEXT FRAGMENT INDEX 3
+Scriptname PRKF__00E_ArkSiegeLockedGate_0300146D Extends Perk Hidden
+
+;BEGIN FRAGMENT Fragment_1
+Function Fragment_1(ObjectReference akTargetRef, Actor akActor)
+;BEGIN CODE
+_00E_sDoorLocked.Show()
+;END CODE
+EndFunction
+;END FRAGMENT
+
+;END FRAGMENT CODE - Do not edit anything between this and the begin comment
+
+Message Property _00E_sDoorLocked  Auto  

source/scripts/PRKF__00E_LockpickingReqPerk_030039BA.psc

@@ -2,14 +2,6 @@
 ;NEXT FRAGMENT INDEX 2
 Scriptname PRKF__00E_LockpickingReqPerk_030039BA Extends Perk Hidden
 
-;BEGIN FRAGMENT Fragment_1
-Function Fragment_1(ObjectReference akTargetRef, Actor akActor)
-;BEGIN CODE
-_00E_sDoorLocked.Show()
-;END CODE
-EndFunction
-;END FRAGMENT
-
 ;BEGIN FRAGMENT Fragment_0
 Function Fragment_0(ObjectReference akTargetRef, Actor akActor)
 ;BEGIN CODE

source/scripts/_00e_mq12b_functions.psc

@@ -163,6 +163,7 @@ Function SetUp()
 	MQ12b_DisableThisDudeHeIsAnnoyingREF.Disable()
 	_00E_TeleportGlobal.SetValueInt(1)
 	PlayerREF.AddToFaction(MQ12b_TemporarySiegeFaction)
+	PlayerREF.AddPerk(_00E_ArkSiegeLockedGatesPerk)
 	Ordenshueter.GetReference().Enable()
 	Ordenshueter.GetReference().MoveTo(MQ12b_SC1_Orderguard01)
 	Ordenshueterin.GetReference().MoveTo(MQ12b_SC1_Orderguard02)
@@ -903,6 +904,7 @@ Function CompleteQuestAndStartMQ12c()
 	MQ12b_Market_CastleCollisionREF.Disable()
 	MQ12b_SC12_YoungGuardREF.Disable()
 	AudioCategoryAMB.SetVolume(1.0)
+	PlayerREF.RemovePerk(_00E_ArkSiegeLockedGatesPerk)
 	PlayerREF.RemoveFromFaction(MQ12b_TemporarySiegeFaction)
 	MQ12b_SC14_JorrekREF.Disable()
 	; the following line is called twice before, that was inserted later, see description of bug above, still needs to be called here for save compatibility
@@ -1030,6 +1032,7 @@ Event OnUpdate()
 	EndIf
 	
 	If !bArkUnderAttackFinalScene
+		if ! PlayerREF.IsInInterior()
 			If sCurrentStrikeLocation == "Market"
 				MQ12b_SC4_StrikeSpawnerMarket.CallCatapultStrike()
 			ElseIf sCurrentStrikeLocation == "UpperCity"
@@ -1039,7 +1042,7 @@ Event OnUpdate()
 			ElseIf sCurrentStrikeLocation == "HarborDistrict"
 				MQ12b_SC4_StrikeSpawnerHarborDistrict.CallCatapultStrike()
 			EndIf
-        
+		endif
 		
 		If (GameHour.GetValue() <= 4 || GameHour.GetValue() >= 21) && TimeScale.GetValue() > 1.0
 			TimeScale.SetValue(0.1)
@@ -1300,3 +1303,5 @@ EffectShader Property _00E_A1_DevourSoul_DisintegrateFXS Auto
 EffectShader Property BerserkerFXS Auto
 
 _00E_GypsyMinstrelsControlScript Property GypsyMinstrelsControl Auto
+
+Perk Property _00E_ArkSiegeLockedGatesPerk  Auto