mirror of
https://github.com/P3D-Legacy/P3D-Legacy.git
synced 2025-09-23 18:08:30 +02:00
Tweaked weather colors and chances
This commit is contained in:
parent
02aef02183
commit
686cef84fe
@ -107,16 +107,18 @@
|
|||||||
BasicEffect.DiffuseColor = New Vector3(1)
|
BasicEffect.DiffuseColor = New Vector3(1)
|
||||||
Else
|
Else
|
||||||
Select Case Screen.Level.World.CurrentMapWeather
|
Select Case Screen.Level.World.CurrentMapWeather
|
||||||
Case World.Weathers.Clear, World.Weathers.Sunny
|
Case World.Weathers.Clear
|
||||||
BasicEffect.DiffuseColor = New Vector3(1)
|
BasicEffect.DiffuseColor = New Vector3(1)
|
||||||
|
Case World.Weathers.Sunny
|
||||||
|
BasicEffect.DiffuseColor = New Vector3(1.5, 1.3, 1.3)
|
||||||
Case World.Weathers.Rain
|
Case World.Weathers.Rain
|
||||||
BasicEffect.DiffuseColor = New Vector3(0.4, 0.4, 0.7)
|
BasicEffect.DiffuseColor = New Vector3(0.4, 0.4, 0.7)
|
||||||
Case World.Weathers.Snow
|
Case World.Weathers.Snow
|
||||||
BasicEffect.DiffuseColor = New Vector3(0.8)
|
BasicEffect.DiffuseColor = New Vector3(0.9)
|
||||||
Case World.Weathers.Underwater
|
Case World.Weathers.Underwater
|
||||||
BasicEffect.DiffuseColor = New Vector3(0.1, 0.3, 0.9)
|
BasicEffect.DiffuseColor = New Vector3(0.1, 0.3, 0.9)
|
||||||
Case World.Weathers.Fog
|
Case World.Weathers.Fog
|
||||||
BasicEffect.DiffuseColor = New Vector3(0.7, 0.7, 0.8)
|
BasicEffect.DiffuseColor = New Vector3(0.7, 0.7, 0.7)
|
||||||
Case World.Weathers.Sandstorm
|
Case World.Weathers.Sandstorm
|
||||||
BasicEffect.DiffuseColor = New Vector3(0.8, 0.5, 0.2)
|
BasicEffect.DiffuseColor = New Vector3(0.8, 0.5, 0.2)
|
||||||
Case World.Weathers.Ash
|
Case World.Weathers.Ash
|
||||||
|
@ -399,23 +399,30 @@ endsub:
|
|||||||
Return Weathers.Snow
|
Return Weathers.Snow
|
||||||
End If
|
End If
|
||||||
Case Seasons.Spring
|
Case Seasons.Spring
|
||||||
If r < 45 Then
|
If r < 70 Then
|
||||||
Return Weathers.Clear
|
Return Weathers.Clear
|
||||||
ElseIf r >= 45 And r < 95 Then
|
ElseIf r >= 70 And r < 90 Then
|
||||||
Return Weathers.Rain
|
Return Weathers.Rain
|
||||||
Else
|
Else
|
||||||
Return Weathers.Snow
|
Return Weathers.Snow
|
||||||
End If
|
End If
|
||||||
Case Seasons.Summer
|
Case Seasons.Summer
|
||||||
If r < 90 Then
|
If r < 60 Then
|
||||||
Return Weathers.Clear
|
Return Weathers.Clear
|
||||||
|
ElseIf r >= 60 And r < 95 Then
|
||||||
|
Select Case Screen.Level.DayTime
|
||||||
|
Case DayTimes.Day, DayTimes.Morning
|
||||||
|
Return Weathers.Sunny
|
||||||
|
Case Else
|
||||||
|
Return Weathers.Clear
|
||||||
|
End Select
|
||||||
Else
|
Else
|
||||||
Return Weathers.Rain
|
Return Weathers.Rain
|
||||||
End If
|
End If
|
||||||
Case Seasons.Fall
|
Case Seasons.Fall
|
||||||
If r < 50 Then
|
If r < 60 Then
|
||||||
Return Weathers.Clear
|
Return Weathers.Clear
|
||||||
ElseIf r >= 50 And r < 85 Then
|
ElseIf r >= 60 And r < 90 Then
|
||||||
Return Weathers.Rain
|
Return Weathers.Rain
|
||||||
Else
|
Else
|
||||||
Return Weathers.Snow
|
Return Weathers.Snow
|
||||||
@ -547,13 +554,13 @@ endsub:
|
|||||||
Case Weathers.Rain, Weathers.Thunderstorm
|
Case Weathers.Rain, Weathers.Thunderstorm
|
||||||
Screen.Effect.DiffuseColor = New Vector3(0.4, 0.4, 0.7)
|
Screen.Effect.DiffuseColor = New Vector3(0.4, 0.4, 0.7)
|
||||||
Case Weathers.Snow
|
Case Weathers.Snow
|
||||||
Screen.Effect.DiffuseColor = New Vector3(0.8)
|
Screen.Effect.DiffuseColor = New Vector3(0.9, 0.9, 0.9)
|
||||||
Case Weathers.Underwater
|
Case Weathers.Underwater
|
||||||
Screen.Effect.DiffuseColor = New Vector3(0.1, 0.3, 0.9)
|
Screen.Effect.DiffuseColor = New Vector3(0.1, 0.3, 0.9)
|
||||||
Case Weathers.Sunny
|
Case Weathers.Sunny
|
||||||
Screen.Effect.DiffuseColor = New Vector3(1.6, 1.3, 1.3)
|
Screen.Effect.DiffuseColor = New Vector3(1.5, 1.3, 1.3)
|
||||||
Case Weathers.Fog
|
Case Weathers.Fog
|
||||||
Screen.Effect.DiffuseColor = New Vector3(0.5, 0.5, 0.6)
|
Screen.Effect.DiffuseColor = New Vector3(0.7, 0.7, 0.7)
|
||||||
Case Weathers.Sandstorm
|
Case Weathers.Sandstorm
|
||||||
Screen.Effect.DiffuseColor = New Vector3(0.8, 0.5, 0.2)
|
Screen.Effect.DiffuseColor = New Vector3(0.8, 0.5, 0.2)
|
||||||
Case Weathers.Ash
|
Case Weathers.Ash
|
||||||
|
Loading…
x
Reference in New Issue
Block a user