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

Make fishing rods usable while riding/surfing

This commit is contained in:
JappaWakka 2023-12-27 20:49:08 +01:00
parent 85bcb52780
commit e8da25f6bd
3 changed files with 3 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
P3D/Pokemon/Items/KeyItems/GoodRod.vb
View File

@ -13,7 +13,7 @@ Namespace Items.KeyItems
End Sub End Sub
Public Overrides Sub Use() Public Overrides Sub Use()
If OldRod.IsInfrontOfWater() = True And Screen.Level.Surfing = False And Screen.Level.Riding = False Then If OldRod.IsInfrontOfWater() = True Then
Dim s As String = "version=2" Dim s As String = "version=2"
While Core.CurrentScreen.Identification <> Screen.Identifications.OverworldScreen While Core.CurrentScreen.Identification <> Screen.Identifications.OverworldScreen

2
P3D/Pokemon/Items/KeyItems/OldRod.vb
View File

@ -13,7 +13,7 @@ Namespace Items.KeyItems
End Sub End Sub
Public Overrides Sub Use() Public Overrides Sub Use()
If IsInfrontOfWater() = True And Screen.Level.Surfing = False And Screen.Level.Riding = False Then If IsInfrontOfWater() = True Then
Dim s As String = "version=2" Dim s As String = "version=2"
While Core.CurrentScreen.Identification <> Screen.Identifications.OverworldScreen While Core.CurrentScreen.Identification <> Screen.Identifications.OverworldScreen

2
P3D/Pokemon/Items/KeyItems/SuperRod.vb
View File

@ -13,7 +13,7 @@ Namespace Items.KeyItems
End Sub End Sub
Public Overrides Sub Use() Public Overrides Sub Use()
If OldRod.IsInfrontOfWater() = True And Screen.Level.Surfing = False And Screen.Level.Riding = False Then If OldRod.IsInfrontOfWater() = True Then
Dim s As String = "version=2" Dim s As String = "version=2"
While Core.CurrentScreen.Identification <> Screen.Identifications.OverworldScreen While Core.CurrentScreen.Identification <> Screen.Identifications.OverworldScreen