4
Fork 0

Block object activation with a perk in FS_NQ03

development
Eddoursul 3 months ago
parent 2a51d12219
commit 38bad6c50e
  1. BIN
      Perk prevent looting in FSNQ03.esp
  2. BIN
      scripts/PRKF__00E_FS_NQ03_PreventLoo_0300146D.pex
  3. BIN
      scripts/_00e_fs_nq03_functions.pex
  4. BIN
      scripts/_00e_fs_nq03_nolootscr.pex
  5. 18
      source/scripts/PRKF__00E_FS_NQ03_PreventLoo_0300146D.psc
  6. 6
      source/scripts/_00e_fs_nq03_functions.psc
  7. 15
      source/scripts/_00e_fs_nq03_nolootscr.psc

@ -0,0 +1,18 @@
;BEGIN FRAGMENT CODE - Do not edit anything between this and the end comment
;NEXT FRAGMENT INDEX 1
Scriptname PRKF__00E_FS_NQ03_PreventLoo_0300146D Extends Perk Hidden
;BEGIN FRAGMENT Fragment_0
Function Fragment_0(ObjectReference akTargetRef, Actor akActor)
;BEGIN CODE
_00E_MQ07a_sNotLootable.Show()
_00E_A2_Ghostwalk_TeleportDoneSound.Play(akActor)
;END CODE
EndFunction
;END FRAGMENT
;END FRAGMENT CODE - Do not edit anything between this and the begin comment
Message Property _00E_MQ07a_sNotLootable Auto
Sound Property _00E_A2_Ghostwalk_TeleportDoneSound Auto

@ -82,6 +82,7 @@ Function StartMemory1()
Game.SetHUDCartMode(True)
_00E_FS_NQ03_WordOfTheDeadFLoatIMOD.Apply()
_00E_FS_NQ03_SpiritActorREF.SplineTranslateToRef(FS_NQ03_WordOfTheDeadSummonMarkerREF, 35.0, 35.0, 2000.0)
PlayerREF.AddPerk(_00E_FS_NQ03_PreventLooting)
EndFunction
@ -415,6 +416,7 @@ Function TeleportBack()
_00E_MQ07a_VisionStartM.Play(PlayerREF)
FS_NQ03_SC22_Epilog.ForceStart()
Game.ShowFirstPersonGeometry(true)
PlayerREF.RemovePerk(_00E_FS_NQ03_PreventLooting)
EndFunction
@ -575,4 +577,6 @@ Sound Property _00E_MQ07a_VisionStartM Auto
Sound Property MAGVampireSunlight Auto
Sound Property UIHealthHeartbeatALP Auto
Sound Property NPCKillSlashMarker Auto
Sound Property _00E_MAGEldritchFireM Auto
Sound Property _00E_MAGEldritchFireM Auto
Perk Property _00E_FS_NQ03_PreventLooting Auto

@ -1,20 +1,5 @@
Scriptname _00E_FS_NQ03_NoLootScr extends ObjectReference
Event OnInit()
Self.BlockActivation(True)
EndEvent
Event OnActivate(ObjectReference akActionRef)
If akActionRef == PlayerREF
_00E_MQ07a_sNotLootable.Show()
_00E_A2_Ghostwalk_TeleportDoneSound.Play(PlayerREF)
EndIf
EndEvent
Message Property _00E_MQ07a_sNotLootable Auto
Actor Property PlayerREF Auto

Loading…
Cancel
Save