Changed a bit particle drawing fix

This commit is contained in:
Aragas 2016-09-25 16:25:09 +03:00
parent d8aec25f2f
commit 4595c78d8e
2 changed files with 7 additions and 2 deletions

View File

@ -371,7 +371,13 @@
End If
End If
CameraDistance = Vector3.Distance(Me.GetCameraDistanceCenterPoint(), CPosition)
If Me.GetType = GetType(Particle)
CameraDistance = Vector3.Distance(Me.GetCameraDistanceCenterPoint(), CPosition) - 1000000
Else
CameraDistance = Vector3.Distance(Me.GetCameraDistanceCenterPoint(), CPosition)
End If
If Me.DropUpdateUnlessDrawn = True And Me.DrawnLastFrame = False And Me.Visible = True And ActionScriptActive = False Then
Exit Sub

View File

@ -826,7 +826,6 @@ Public Class Level
Public Sub SortEntities()
If LevelLoader.IsBusy = False Then
Entities = (From f In Entities Order By f.CameraDistance Descending).ToList()
Entities = (From f In Entities Order By f.GetType Is GetType(Particle) Ascending).ToList()
End If
End Sub