Fixed the daytimes
Instead of Day = 0 Night = 1 Morning = 2 Evening = 3 it is now Night = 0 Morning = 1 Day = 2 Evening = 3 this also affects the @environment.setdaytimeI(int) commands which have the same order but increased with 1
This commit is contained in:
parent
a8bc9f972f
commit
3d25b132bb
Binary file not shown.
Before Width: | Height: | Size: 167 B After Width: | Height: | Size: 165 B |
|
@ -351,11 +351,11 @@ Public Class Level
|
|||
Public Property DayTime As Integer
|
||||
Get
|
||||
Select Case Me._DayTime
|
||||
Case World.DayTimes.Day
|
||||
Return 1
|
||||
Case World.DayTimes.Night
|
||||
Return 2
|
||||
Return 1
|
||||
Case World.DayTimes.Morning
|
||||
Return 2
|
||||
Case World.DayTimes.Day
|
||||
Return 3
|
||||
Case World.DayTimes.Evening
|
||||
Return 4
|
||||
|
@ -366,11 +366,11 @@ Public Class Level
|
|||
Set(value As Integer)
|
||||
Select Case value
|
||||
Case 1
|
||||
Me._DayTime = World.DayTimes.Day
|
||||
Case 2
|
||||
Me._DayTime = World.DayTimes.Night
|
||||
Case 3
|
||||
Case 2
|
||||
Me._DayTime = World.DayTimes.Morning
|
||||
Case 3
|
||||
Me._DayTime = World.DayTimes.Day
|
||||
Case 4
|
||||
Me._DayTime = World.DayTimes.Evening
|
||||
Case Else
|
||||
|
|
|
@ -143,11 +143,11 @@
|
|||
End If
|
||||
Select Case Screen.Level.DayTime
|
||||
Case 1
|
||||
Return New Color(48, 200, 248)
|
||||
Case 2
|
||||
Return New Color(40, 88, 136)
|
||||
Case 3
|
||||
Case 2
|
||||
Return New Color(168, 224, 248)
|
||||
Case 3
|
||||
Return New Color(48, 200, 248)
|
||||
Case 4
|
||||
Return New Color(192, 152, 184)
|
||||
End Select
|
||||
|
@ -183,9 +183,9 @@
|
|||
If Screen.Level.World.EnvironmentType = World.EnvironmentTypes.Outside And World.IsAurora = False Then
|
||||
Select Case Screen.Level.DayTime
|
||||
Case 1
|
||||
Return 0.0F
|
||||
Case 2
|
||||
Return 1.0F
|
||||
Case 2
|
||||
Return 0.0F
|
||||
Case 3
|
||||
Return 0.0F
|
||||
Case 4
|
||||
|
@ -202,9 +202,9 @@
|
|||
If Screen.Level.World.EnvironmentType = World.EnvironmentTypes.Outside And World.IsAurora = False Then
|
||||
Select Case Screen.Level.DayTime
|
||||
Case 1
|
||||
Return 1.0F
|
||||
Case 2
|
||||
Return 0.0F
|
||||
Case 2
|
||||
Return 1.0F
|
||||
Case 3
|
||||
Return 1.0F
|
||||
Case 4
|
||||
|
@ -226,11 +226,11 @@
|
|||
Case World.Weathers.Clear
|
||||
Select Case Screen.Level.DayTime
|
||||
Case 1
|
||||
Return TextureManager.GetTexture("SkyDomeResource\Clouds_Day")
|
||||
Case 2
|
||||
Return TextureManager.GetTexture("SkyDomeResource\Clouds_Night")
|
||||
Case 3
|
||||
Case 2
|
||||
Return TextureManager.GetTexture("SkyDomeResource\Clouds_Morning")
|
||||
Case 3
|
||||
Return TextureManager.GetTexture("SkyDomeResource\Clouds_Day")
|
||||
Case 4
|
||||
Return TextureManager.GetTexture("SkyDomeResource\Clouds_Evening")
|
||||
End Select
|
||||
|
@ -252,11 +252,11 @@
|
|||
End If
|
||||
Select Case Screen.Level.DayTime
|
||||
Case 1
|
||||
Return TextureManager.GetTexture("SkyDomeResource\Sky_Day")
|
||||
Case 2
|
||||
Return TextureManager.GetTexture("SkyDomeResource\Sky_Night")
|
||||
Case 3
|
||||
Case 2
|
||||
Return TextureManager.GetTexture("SkyDomeResource\Sky_Morning")
|
||||
Case 3
|
||||
Return TextureManager.GetTexture("SkyDomeResource\Sky_Day")
|
||||
Case 4
|
||||
Return TextureManager.GetTexture("SkyDomeResource\Sky_Evening")
|
||||
End Select
|
||||
|
|
|
@ -40,9 +40,9 @@ Public Class World
|
|||
End Enum
|
||||
|
||||
Public Enum DayTimes As Integer
|
||||
Day = 0
|
||||
Night = 1
|
||||
Morning = 2
|
||||
Night = 0
|
||||
Morning = 1
|
||||
Day = 2
|
||||
Evening = 3
|
||||
End Enum
|
||||
|
||||
|
|
Loading…
Reference in New Issue