Changed a bit particle drawing fix

2.5DHero/2.5DHero/Entites/Entity.vb

@@ -371,7 +371,13 @@
             End If
         End If
 
+        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

2.5DHero/2.5DHero/World/Level.vb

@@ -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