4
Fork 0

Moved TeleportPlayer() from _00E_QuestFunctions

remove-levelsystem
Eddoursul 4 months ago
parent 41c56c742d
commit ecb1036105
  1. BIN
      Enderal - Forgotten Stories.esm
  2. BIN
      Skyrim.esm
  3. BIN
      TeleportPlayerQuest.esp
  4. BIN
      scripts/_00E_EnderalControls.pex
  5. BIN
      scripts/_00E_TeleportPlayer.pex
  6. BIN
      scripts/_00e_fs_nqr03_functions.pex
  7. BIN
      scripts/_00e_mq07a_functions.pex
  8. BIN
      scripts/_00e_playerfunctions.pex
  9. BIN
      scripts/_00e_questfunctions.pex
  10. BIN
      scripts/_00e_teleport_suntempleme.pex
  11. BIN
      scripts/_00e_teleportationmescript.pex
  12. 2
      source/scripts/_00E_EnderalControls.psc
  13. 89
      source/scripts/_00E_TeleportPlayer.psc
  14. 4
      source/scripts/_00e_fs_nqr03_functions.psc
  15. 2
      source/scripts/_00e_mq07a_functions.psc
  16. 4
      source/scripts/_00e_playerfunctions.psc
  17. 69
      source/scripts/_00e_questfunctions.psc
  18. 6
      source/scripts/_00e_teleport_suntempleme.psc
  19. 4
      source/scripts/_00e_teleportationmescript.psc

Binary file not shown.

Binary file not shown.

Binary file not shown.

Binary file not shown.

Binary file not shown.

Binary file not shown.

Binary file not shown.

Binary file not shown.

@ -1,3 +1,5 @@
Scriptname _00E_EnderalControls extends Quest Hidden
_00E_FadeToBlackControl Property FadeToBlackControl Auto
_00E_TeleportPlayer Property TeleportPlayer Auto

@ -0,0 +1,89 @@
Scriptname _00E_TeleportPlayer extends Quest Hidden
import Utility
Function TeleportPlayer(ObjectReference TeleportTarget)
Game.DisablePlayerControls(abCamSwitch = true)
Wait(3)
If PlayerREF.IsWeaponDrawn()
PlayerREF.SheatheWeapon()
EndIf
Wait(2)
TeleportIn()
PlayerREF.MoveTo(TeleportTarget)
TeleportOut()
_00E_QuestFunctions.RefreshFace()
EndFunction
Function TeleportIn()
Game.ForceThirdPerson()
if Player.GetSex() == 0
PlayerREF.PlayIdle(IdleT02AscendMale)
Else
PlayerREF.PlayIdle(IdleT02AscendFemale)
EndIf
_00E_MagicProtectionSpellM.Play(PlayerREF)
Wait(2.7)
TimeFadeOut01FXS.Play(PlayerREF)
Wait(1.3)
_00E_TeleportImod.Apply()
Wait(2)
EndFunction
Function TeleportOut()
_00E_A2_Ghostwalk_TeleportDoneSound.Play(playerREF)
PlayerREF.PlaceAtMe(_00E_NPCOorbayaTeleportExplosionBlue, 1)
Debug.sendAnimationEvent(playerREF, "IdleWebEnterInstant")
PlayerREF.setActorValue("Variable03", 5)
TimeFadeOut01FXS.Stop(PlayerREF)
TimeFadeIn01FXS.Play(PlayerREF)
Wait(0.5)
PlayerREF.playidle(WebIdleExit)
TimeFadeIn01FXS.Stop(PlayerREF)
PlayerREF.setActorValue("Variable03", 0)
PlayerREF.DrawWeapon()
Wait(3)
Debug.SendAnimationEvent(PlayerREF, "IdleForceDefaultState")
PlayerREF.PlayIdle(IdleForceDefaultState)
PlayerREF.setActorValue("Variable03", 0)
Game.EnablePlayerControls()
_FS_Phasmalist_ControlQuest.MoveApparitionToPlayer()
RegisterForSingleUpdate(2)
EndFunction
Event OnUpdate()
Game.EnablePlayerControls()
EndEvent
actor Property PlayerRef Auto
Idle Property IdleT02AscendMale Auto
Idle Property IdleT02AscendFemale Auto
Sound Property _00E_MagicProtectionSpellM Auto
EffectShader Property TimeFadeOut01FXS Auto
ImageSpaceModifier Property _00E_TeleportImod Auto
Sound Property _00E_A2_Ghostwalk_TeleportDoneSound Auto
Explosion Property _00E_NPCOorbayaTeleportExplosionBlue Auto
EffectShader Property TimeFadeIn01FXS Auto
Idle Property WebIdleExit Auto
Idle Property IdleForceDefaultState Auto
ActorBase Property Player Auto

@ -158,7 +158,7 @@ Function TeleportPlayer()
Levelsystem.TeleportNPC(FS_NQR03_BrotherGreedREF, FS_NQR03_BrotherGreedMarkerREF)
FS_NQR03_BrotherGreedREF.EvaluatePackage()
Levelsystem.TeleportPlayer(FS_NQR03_DarkValleyMarkerREF)
_00E_PlayerFunctions.GetPlayerTeleport().TeleportPlayer(FS_NQR03_DarkValleyMarkerREF)
SetStage(75)
RegisterForSingleUpdate(2)
@ -253,7 +253,7 @@ Function TeleportPlayerAndBrotherGreed()
Levelsystem.TeleportNPC(FS_NQR03_BrotherGreedREF, FS_NQR03_TeleportBackMarkerBrotherGreed)
FS_NQR03_BrotherGreedREF.EvaluatePackage()
Levelsystem.TeleportPlayer(FS_NQR03_TeleportBackMarkerPlayer)
_00E_PlayerFunctions.GetPlayerTeleport().TeleportPlayer(FS_NQR03_TeleportBackMarkerPlayer)
RegisterForSingleUpdate(2)
SetObjectiveCompleted(50)

@ -735,7 +735,7 @@ Function Teleport(String WhoToTeleport)
ElseIf WhoToTeleport == "Both"
Game.DisablePlayerControls()
Levelsystem.TeleportNPC(_00E_MC_JesparREF, MQ07a_SC13_JesparTeleport)
Levelsystem.TeleportPlayer(MQ07a_SC13_PlayerTeleport)
_00E_PlayerFunctions.GetPlayerTeleport().TeleportPlayer(MQ07a_SC13_PlayerTeleport)
EndIf
EndFunction

@ -27,6 +27,10 @@ _00E_FadeToBlackControl function GetFadeToBlackControl() Global
return (Game.GetForm(0x14) as _00E_PlayerFunctions).ControlRepository.FadeToBlackControl
endfunction
_00E_TeleportPlayer function GetPlayerTeleport() Global
return (Game.GetForm(0x14) as _00E_PlayerFunctions).ControlRepository.TeleportPlayer
endfunction
;=====================================================================================
; Stop/restart random headtracking

@ -458,72 +458,6 @@ Function SkipHours(Float fHoursToSkip)
EndFunction
;=====================================================================================
; Player Teleport
;=====================================================================================
Event OnUpdate()
Game.EnablePlayerControls()
EndEvent
Function TeleportPlayer(ObjectReference TeleportTarget)
Game.DisablePlayerControls(abCamSwitch = true)
Wait(3)
If PlayerREF.IsWeaponDrawn()
PlayerREF.SheatheWeapon()
EndIf
Wait(2)
TeleportIn()
PlayerREF.MoveTo(TeleportTarget)
TeleportOut()
RefreshFace()
EndFunction
Function TeleportIn()
Game.ForceThirdPerson()
if Player.GetSex() == 0
PlayerREF.PlayIdle(IdleT02AscendMale)
Else
PlayerREF.PlayIdle(IdleT02AscendFemale)
EndIf
_00E_MagicProtectionSpellM.Play(PlayerREF)
Wait(2.7)
TimeFadeOut01FXS.Play(PlayerREF)
Wait(1.3)
_00E_TeleportImod.Apply()
Wait(2)
EndFunction
Function TeleportOut()
_00E_A2_Ghostwalk_TeleportDoneSound.Play(playerREF)
PlayerREF.PlaceAtMe(_00E_NPCOorbayaTeleportExplosionBlue, 1)
Debug.sendAnimationEvent(playerREF, "IdleWebEnterInstant")
PlayerREF.setActorValue("Variable03", 5)
TimeFadeOut01FXS.Stop(PlayerREF)
TimeFadeIn01FXS.Play(PlayerREF)
Wait(0.5)
PlayerREF.playidle(WebIdleExit)
TimeFadeIn01FXS.Stop(PlayerREF)
PlayerREF.setActorValue("Variable03", 0)
PlayerREF.DrawWeapon()
Wait(3)
Debug.SendAnimationEvent(PlayerREF, "IdleForceDefaultState")
PlayerREF.PlayIdle(IdleForceDefaultState)
PlayerREF.setActorValue("Variable03", 0)
Game.EnablePlayerControls()
_FS_Phasmalist_ControlQuest.MoveApparitionToPlayer()
RegisterForSingleUpdate(2)
EndFunction
;=====================================================================================
; VISION
;=====================================================================================
@ -1171,12 +1105,10 @@ ActorBase Property Player Auto
EffectShader Property TimeFadeOut01FXS Auto
EffectShader Property TimeFadeIn01FXS Auto
Explosion Property _00E_TeleportExplosion Auto
Explosion Property _00E_NPCOorbayaTeleportExplosionBlue Auto
Idle Property WebIdleExit Auto
Idle Property IdleT02AscendMale Auto
Idle Property IdleT02AscendFemale Auto
Idle Property IdleForceDefaultState Auto
Static Property XMarkerHeading Auto
@ -1242,7 +1174,6 @@ Spell Property _00E_FS_NQR05_SlowMotionSP Auto
GlobalVariable Property _00E_HeadtrackGlobal Auto
ImageSpaceModifier Property _00E_NPCTeleportExplosionIMOD Auto
ImageSpaceModifier Property _00E_TeleportImod Auto
ImageSpaceModifier Property _00E_VisionStartTimestopIMOD Auto
ImageSpaceModifier Property _00E_MQ16_VisionIMOD Auto

@ -11,9 +11,9 @@ Event OnEffectStart (Actor akTarket, Actor akCaster)
MAGVampireSunlight.Play(PlayerREF)
PlayerREF.AddItem(_01E_TeleportrolleSonnentempel, 1)
Elseif ((_00E_TeleportGlobal.GetValueInt() == 1) && (MQ12b.GetStage() == 115) ||(MQ12b.GetStage() == 120))
Levelsystem.TeleportPlayer(_00E_TeleportMarker_Suntemple)
_00E_PlayerFunctions.GetPlayerTeleport().TeleportPlayer(_00E_TeleportMarker_Suntemple)
ElseIf (_00E_TeleportGlobal.GetValueInt() == 0)
Levelsystem.TeleportPlayer(_00E_TeleportMarker_Suntemple)
_00E_PlayerFunctions.GetPlayerTeleport().TeleportPlayer(_00E_TeleportMarker_Suntemple)
EndIf
EndEvent
@ -22,8 +22,6 @@ EndEvent
; PROPERTIES
;=====================================================================================
_00E_Questfunctions Property Levelsystem Auto
Worldspace Property Akropolis Auto
Actor Property PlayerREF Auto

@ -29,7 +29,7 @@ Event OnEffectStart (Actor akTarket, Actor akCaster)
If __Config_TeleportTargetMarker.GetParentCell() == ability_container
_00E_Teleport_sNoTargetMarked.Show()
Else
Levelsystem.TeleportPlayer(__Config_TeleportTargetMarker)
_00E_PlayerFunctions.GetPlayerTeleport().TeleportPlayer(__Config_TeleportTargetMarker)
EndIf
EndIf
@ -41,8 +41,6 @@ EndEvent
bool bScrollAdded
_00E_Questfunctions Property Levelsystem Auto
WorldSpace Property Akropolis Auto
Cell Property ability_container Auto

Loading…
Cancel
Save