enderal/enderalse
1
Fork 0
Code Releases Activity

The dismantle perk message uses standard activate entrypoint instead of scripted message

Browse Source
This commit is contained in:
Eddoursul 2022-08-19 23:56:14 +02:00
parent 33bf342ec0
commit ba2f87de52
3 changed files with 23 additions and 15 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

BIN
Dismatle perk adds activate options.esp Normal file
View File

Binary file not shown.

BIN
scripts/PRKF__00E_SE_DismantlePerk_03009D21.pex
View File

Binary file not shown.

36
source/scripts/PRKF__00E_SE_DismantlePerk_03009D21.psc
View File

@ -1,24 +1,32 @@
;BEGIN FRAGMENT CODE - Do not edit anything between this and the end comment ;BEGIN FRAGMENT CODE - Do not edit anything between this and the end comment
;NEXT FRAGMENT INDEX 8 ;NEXT FRAGMENT INDEX 12
Scriptname PRKF__00E_SE_DismantlePerk_03009D21 Extends Perk Hidden Scriptname PRKF__00E_SE_DismantlePerk_03009D21 Extends Perk Hidden
;BEGIN FRAGMENT Fragment_9
Function Fragment_9(ObjectReference akTargetRef, Actor akActor)
;BEGIN CODE
;
;END CODE
EndFunction
;END FRAGMENT
;BEGIN FRAGMENT Fragment_0 ;BEGIN FRAGMENT Fragment_0
Function Fragment_0(ObjectReference akTargetRef, Actor akActor) Function Fragment_0(ObjectReference akTargetRef, Actor akActor)
;BEGIN CODE ;BEGIN CODE
int iButton = _00E_Smelting_DismantlingMSG.Show() if ! akTargetRef.IsFurnitureInUse()
akTargetRef.SendModEvent("Enderal_StartCrafting")
endif
akTargetRef.Activate(akActor, true)
;END CODE
EndFunction
;END FRAGMENT
If iButton == 0 ; if the player wants to process ore into ingots ;BEGIN FRAGMENT Fragment_8
if ! akTargetRef.IsFurnitureInUse() Function Fragment_8(ObjectReference akTargetRef, Actor akActor)
akTargetRef.SendModEvent("Enderal_StartCrafting") ;BEGIN CODE
endif Game.DisablePlayerControls(true, true, true, true, true, true, true, true)
akTargetRef.Activate(akActor, true) _00E_Dismantling_SmelterREF.SendModEvent("Enderal_StartDismantling")
ElseIf iButton == 1 ; if the player wants to dismantle items back into crafting components, disable player controls _00E_Dismantling_SmelterREF.Activate(akActor)
Game.DisablePlayerControls(true, true, true, true, true, true, true, true)
_00E_Dismantling_SmelterREF.SendModEvent("Enderal_StartDismantling")
_00E_Dismantling_SmelterREF.Activate(akActor)
Else
return
EndIf
;END CODE ;END CODE
EndFunction EndFunction
;END FRAGMENT ;END FRAGMENT