Moved locking doors during the siege to a separate perk

This commit is contained in:
Eddoursul 2024-02-01 14:48:17 +01:00
parent 203bd62204
commit 3f08478b18
7 changed files with 681 additions and 669 deletions

Binary file not shown.

Binary file not shown.

Binary file not shown.

View File

@ -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

View File

@ -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

View File

@ -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