enderalse/source/scripts/_00e_phasmalist_playeraliasscript.psc

28 lines
991 B
Plaintext
Raw Normal View History

2021-10-05 22:59:59 +00:00
Scriptname _00E_Phasmalist_PlayerAliasScript extends ReferenceAlias
Actor Property PlayerREF Auto
_FS_Phasmalist_ControlQuest Property ControlQuest Auto
Keyword Property _00E_Phasmalist_NoSummonLocationTown Auto
Message Property _00E_Phasmalist_ForceDesummonMessageTown Auto
Message Property _00E_Phasmalist_ForceDesummonMessage Auto
Event OnLocationChange(Location akOldLoc, Location akNewLoc)
If ControlQuest.IsBadApparitionLocation(akNewLoc)
If ControlQuest.IsBadApparitionLocation(akOldLoc) == False && ControlQuest.IsApparitionSpawned()
Message.ResetHelpMessage("Empty")
2021-10-05 22:59:59 +00:00
If akNewLoc && akNewLoc.HasKeyword(_00E_Phasmalist_NoSummonLocationTown)
_00E_Phasmalist_ForceDesummonMessageTown.ShowAsHelpMessage("Empty", 3.0, 1.0, 1)
2021-10-05 22:59:59 +00:00
Else
_00E_Phasmalist_ForceDesummonMessage.ShowAsHelpMessage("Empty", 3.0, 1.0, 1)
2021-10-05 22:59:59 +00:00
EndIf
RegisterForSingleUpdate(6.0)
EndIf
Else
UnregisterForUpdate()
EndIf
EndEvent
Event OnUpdate()
ControlQuest.UnsummonApparition()
EndEvent