Prevent scrolling while script active
This commit is contained in:
parent
88d72bb451
commit
6c49740ba2
|
@ -281,6 +281,7 @@ Public Class OverworldCamera
|
|||
|
||||
Private Sub ScrollThirdPersonCamera()
|
||||
If _isFixed = False Then
|
||||
If CurrentScreen.Identification <> Screen.Identifications.OverworldScreen OrElse CType(CurrentScreen, OverworldScreen).ActionScript.IsReady = True Then
|
||||
If Controls.Down(True, False, True, False, False, False) = True Then
|
||||
If _scrollSpeed = 0.0F Or _scrollDirection <> 1 Then
|
||||
_scrollSpeed = 0.01F
|
||||
|
@ -331,6 +332,7 @@ Public Class OverworldCamera
|
|||
End If
|
||||
End If
|
||||
End If
|
||||
End If
|
||||
End Sub
|
||||
|
||||
Public Sub UpdateThirdPersonCamera()
|
||||
|
|
Loading…
Reference in New Issue