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

Probably fixing aurora sky

This commit is contained in:
JappaWakka 2022-09-16 11:06:20 +02:00
parent b9a7183166
commit 3f3836cb6f
1 changed files with 6 additions and 7 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

13
P3D/World/LevelLoader.vb
View File

@ -1054,6 +1054,12 @@
Screen.Level.IsDark = False Screen.Level.IsDark = False
End If End If
If TagExists(Tags, "IsAurora") = True Then
World.IsAurora = CBool(GetTag(Tags, "IsAurora"))
Else
World.IsAurora = False
End If
If Screen.Level.DayTime = World.DayTimes.Night Then If Screen.Level.DayTime = World.DayTimes.Night Then
If World.IsAurora = False Then If World.IsAurora = False Then
Dim chance = Random.Next(0, 250) Dim chance = Random.Next(0, 250)
@ -1065,13 +1071,6 @@
World.IsAurora = False World.IsAurora = False
End If End If
If TagExists(Tags, "IsAurora") = True Then
World.IsAurora = CBool(GetTag(Tags, "IsAurora"))
Else
World.IsAurora = False
End If
If TagExists(Tags, "Terrain") = True Then If TagExists(Tags, "Terrain") = True Then
Screen.Level.Terrain.TerrainType = Terrain.FromString(CStr(GetTag(Tags, "Terrain"))) Screen.Level.Terrain.TerrainType = Terrain.FromString(CStr(GetTag(Tags, "Terrain")))
Else Else