Fix model lighting bug

This commit is contained in:
JappaWakka 2023-08-09 19:33:53 +02:00
parent 35c8e8f4c5
commit cbce5512cc

View File

@ -655,7 +655,6 @@
If Not Me.Model Is Nothing Then If Not Me.Model Is Nothing Then
For Each mesh As ModelMesh In Me.Model.Meshes For Each mesh As ModelMesh In Me.Model.Meshes
For Each part As ModelMeshPart In mesh.MeshParts For Each part As ModelMeshPart In mesh.MeshParts
If part.Effect.GetType().Name.ToLower() = Screen.Effect.GetType().Name.ToLower() Then
With CType(part.Effect, BasicEffect) With CType(part.Effect, BasicEffect)
Lighting.UpdateLighting(CType(part.Effect, BasicEffect), True) Lighting.UpdateLighting(CType(part.Effect, BasicEffect), True)
.Alpha = Me.Opacity .Alpha = Me.Opacity
@ -672,7 +671,6 @@
.FogEnd = Screen.Effect.FogEnd .FogEnd = Screen.Effect.FogEnd
.FogStart = Screen.Effect.FogStart .FogStart = Screen.Effect.FogStart
End With End With
End If
Next Next
Next Next
End If End If