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

Bubble weather fix

This commit is contained in:
jianmingyong 2016-12-11 14:38:28 +08:00
parent 3fc324976e
commit a6d2613fef
1 changed files with 5 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
2.5DHero/2.5DHero/World/World.vb
View File

@ -1,3 +1,5 @@
Imports net.Pokemon3D.Game.BattleSystem
Public Class World
Private Shared _regionWeather As Weathers = Weathers.Clear
@ -767,8 +769,10 @@ endsub:
End If
Dim cameraPosition As Vector3 = Screen.Camera.Position
If Screen.Camera.Name = "Overworld" Then
If Core.CurrentScreen.Identification = Screen.Identifications.OverworldScreen Then
cameraPosition = CType(Screen.Camera, OverworldCamera).CPosition
ElseIf Core.CurrentScreen.Identification = Screen.Identifications.BattleScreen Then
cameraPosition = CType(Screen.Camera, BattleCamera).CPosition
End If
If Core.Random.Next(0, chance) = 0 Then