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

Made the brightness of the stars not be affected by the weather

This commit is contained in:
JappaWakka 2022-01-16 17:25:04 +01:00
parent b69bfbfea4
commit 2533598295
1 changed files with 22 additions and 18 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

40
P3D/World/SkyDome.vb
View File

@ -103,24 +103,28 @@
BasicEffect.Texture = texture
BasicEffect.Alpha = alpha
Select Case Screen.Level.World.CurrentMapWeather
Case World.Weathers.Clear, World.Weathers.Sunny
BasicEffect.DiffuseColor = New Vector3(1)
Case World.Weathers.Rain
BasicEffect.DiffuseColor = New Vector3(0.4, 0.4, 0.7)
Case World.Weathers.Snow
BasicEffect.DiffuseColor = New Vector3(0.8)
Case World.Weathers.Underwater
BasicEffect.DiffuseColor = New Vector3(0.1, 0.3, 0.9)
Case World.Weathers.Fog
BasicEffect.DiffuseColor = New Vector3(0.7, 0.7, 0.8)
Case World.Weathers.Sandstorm
BasicEffect.DiffuseColor = New Vector3(0.8, 0.5, 0.2)
Case World.Weathers.Ash
BasicEffect.DiffuseColor = New Vector3(0.5, 0.5, 0.5)
Case World.Weathers.Blizzard
BasicEffect.DiffuseColor = New Vector3(0.6, 0.6, 0.6)
End Select
If BasicEffect.Texture Is TextureDown Then
BasicEffect.DiffuseColor = New Vector3(1)
Else
Select Case Screen.Level.World.CurrentMapWeather
Case World.Weathers.Clear, World.Weathers.Sunny
BasicEffect.DiffuseColor = New Vector3(1)
Case World.Weathers.Rain
BasicEffect.DiffuseColor = New Vector3(0.4, 0.4, 0.7)
Case World.Weathers.Snow
BasicEffect.DiffuseColor = New Vector3(0.8)
Case World.Weathers.Underwater
BasicEffect.DiffuseColor = New Vector3(0.1, 0.3, 0.9)
Case World.Weathers.Fog
BasicEffect.DiffuseColor = New Vector3(0.7, 0.7, 0.8)
Case World.Weathers.Sandstorm
BasicEffect.DiffuseColor = New Vector3(0.8, 0.5, 0.2)
Case World.Weathers.Ash
BasicEffect.DiffuseColor = New Vector3(0.5, 0.5, 0.5)
Case World.Weathers.Blizzard
BasicEffect.DiffuseColor = New Vector3(0.6, 0.6, 0.6)
End Select
End If
If BasicEffect.DiffuseColor <> New Vector3(1) Then
BasicEffect.DiffuseColor = GetWeatherColorMultiplier(BasicEffect.DiffuseColor)