tyler.durden
/
P3D-Legacy
mirror of https://github.com/P3D-Legacy/P3D-Legacy.git
1
0
Fork 0
Code Issues Packages Projects Releases Wiki Activity

Potential bugfix for 2x debug move on water

This commit is contained in:
Jasper "JappaWakka" Speelman 2022-04-07 12:01:32 +02:00
parent 7165cd70bc
commit e62c49b7bb
3 changed files with 7 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
P3D/Entites/Enviroment/AnimatedBlock.vb
View File

@ -109,7 +109,9 @@
Next
If canSurf = True Then
Screen.Camera.Move(1)
If CType(Screen.Camera, OverworldCamera)._debugWalk = False Then
Screen.Camera.Move(1)
End If
Screen.Level.PokemonEncounter.TryEncounterWildPokemon(Me.Position, Spawner.EncounterMethods.Surfing, "")
End If

4
P3D/Entites/Enviroment/Water.vb
View File

@ -92,7 +92,9 @@
Next
If canSurf = True Then
Screen.Camera.Move(1)
If CType(Screen.Camera, OverworldCamera)._debugWalk = False Then
Screen.Camera.Move(1)
End If
Screen.Level.PokemonEncounter.TryEncounterWildPokemon(Me.Position, Spawner.EncounterMethods.Surfing, "")
End If

2
P3D/Overworld/OverworldCamera.vb
View File

@ -848,7 +848,7 @@ Public Class OverworldCamera
End If
If GameController.IS_DEBUG_ACTIVE = True Or Core.Player.SandBoxMode = True Then
If _debugWalk = True Then
If _debugWalk = True AndAlso CType(Core.CurrentScreen, OverworldScreen).ActionScript.IsReady = True Then
cannotWalk = False
End If
End If