tyler.durden/P3D-Legacy
1
0
Fork 0
mirror of https://github.com/P3D-Legacy/P3D-Legacy.git synced 2025-07-27 07:44:31 +02:00
Code Issues Packages Projects Releases Wiki Activity

Reset Camera speed for run or ride in scripts

Browse Source
This commit is contained in:
JappaWakka 2023-06-11 20:36:41 +02:00
parent b91a5f586f
commit 2e0966dd04
2 changed files with 6 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
P3D/Overworld/OverworldCamera.vb
View File

@ -445,9 +445,9 @@ Public Class OverworldCamera
Speed = 0.04F Speed = 0.04F
ElseIf Core.Player.IsRunning() = True Then ElseIf Core.Player.IsRunning() = True Then
Speed = 0.06F Speed = 0.06F
Else Else
Speed = 0.04F Speed = 0.04F
End If End If
End If End If
Screen.Level.OverworldPokemon.MoveSpeed = Speed Screen.Level.OverworldPokemon.MoveSpeed = Speed
End Sub End Sub

3
P3D/World/ActionScript/ActionScript.vb
View File

@ -101,6 +101,9 @@ nextScript:
''' <param name="InputType">Type of information; 0: Script path, 1: Text, 2: Direct input.</param> ''' <param name="InputType">Type of information; 0: Script path, 1: Text, 2: Direct input.</param>
Public Sub StartScript(ByVal Input As String, ByVal InputType As Integer, Optional ByVal CheckDelay As Boolean = True, Optional ByVal ResetInsight As Boolean = True) Public Sub StartScript(ByVal Input As String, ByVal InputType As Integer, Optional ByVal CheckDelay As Boolean = True, Optional ByVal ResetInsight As Boolean = True)
Screen.Level.OwnPlayer.Opacity = 1 Screen.Level.OwnPlayer.Opacity = 1
If Core.Player.IsRunning = True OrElse Screen.Level.Riding = True Then
Screen.Camera.Speed = 0.04F
End If
ScriptLevelIndex += 1 ScriptLevelIndex += 1
TempSpin = False TempSpin = False