mirror of
https://github.com/P3D-Legacy/P3D-Legacy.git
synced 2025-07-26 15:24:52 +02:00
Improved weather chances per season
This commit is contained in:
parent
9271d9b629
commit
700016dceb
@ -381,34 +381,34 @@ endsub:
|
|||||||
|
|
||||||
Select Case Season
|
Select Case Season
|
||||||
Case Seasons.Winter
|
Case Seasons.Winter
|
||||||
If r < 20 Then
|
If r < 30 Then
|
||||||
Return Weathers.Rain
|
|
||||||
ElseIf r >= 20 And r < 50 Then
|
|
||||||
Return Weathers.Clear
|
Return Weathers.Clear
|
||||||
|
ElseIf r >= 30 And r < 40 Then
|
||||||
|
Return Weathers.Rain
|
||||||
Else
|
Else
|
||||||
Return Weathers.Snow
|
Return Weathers.Snow
|
||||||
End If
|
End If
|
||||||
Case Seasons.Spring
|
Case Seasons.Spring
|
||||||
If r < 5 Then
|
If r < 45 Then
|
||||||
Return Weathers.Snow
|
Return Weathers.Clear
|
||||||
ElseIf r >= 5 And r < 40 Then
|
ElseIf r >= 45 And r < 95 Then
|
||||||
Return Weathers.Rain
|
Return Weathers.Rain
|
||||||
Else
|
Else
|
||||||
Return Weathers.Clear
|
Return Weathers.Snow
|
||||||
End If
|
End If
|
||||||
Case Seasons.Summer
|
Case Seasons.Summer
|
||||||
If r < 10 Then
|
If r < 90 Then
|
||||||
Return Weathers.Rain
|
|
||||||
Else
|
|
||||||
Return Weathers.Clear
|
Return Weathers.Clear
|
||||||
|
Else
|
||||||
|
Return Weathers.Rain
|
||||||
End If
|
End If
|
||||||
Case Seasons.Fall
|
Case Seasons.Fall
|
||||||
If r < 5 Then
|
If r < 50 Then
|
||||||
Return Weathers.Snow
|
Return Weathers.Clear
|
||||||
ElseIf r >= 5 And r < 80 Then
|
ElseIf r >= 50 And r < 85 Then
|
||||||
Return Weathers.Rain
|
Return Weathers.Rain
|
||||||
Else
|
Else
|
||||||
Return Weathers.Clear
|
Return Weathers.Snow
|
||||||
End If
|
End If
|
||||||
End Select
|
End Select
|
||||||
|
|
||||||
|
Loading…
x
Reference in New Issue
Block a user