tyler.durden/P3D-Legacy
1
0
Fork 0
mirror of https://github.com/P3D-Legacy/P3D-Legacy.git synced 2025-07-22 05:14:51 +02:00
Code Issues Packages Projects Releases Wiki Activity

Fix repels not being removed from bag

Browse Source
This commit is contained in:
JappaWakka 2023-01-23 11:15:54 +01:00
parent 2b0531ed8a
commit 72fceebcb0
1 changed files with 4 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

7
P3D/Pokemon/Items/Repels/RepelItem.vb
View File

@ -10,13 +10,14 @@
Public Overrides Sub Use() Public Overrides Sub Use()
If Core.Player.RepelSteps <= 0 Then If Core.Player.RepelSteps <= 0 Then
Me.RemoveItem()
Player.Temp.LastUsedRepel = ID Player.Temp.LastUsedRepel = ID
SoundManager.PlaySound("Use_Repel", False) SoundManager.PlaySound("Use_Repel", False)
Screen.TextBox.Show(Core.Player.Name & " used a~" & Name & ".", {}, True, True)
Core.Player.RepelSteps = RepelSteps Core.Player.RepelSteps = RepelSteps
PlayerStatistics.Track("[42]Repels used", 1) PlayerStatistics.Track("[42]Repels used", 1)
Dim t As String = Core.Player.Name & " used a~" & Name & "."
t &= RemoveItem()
Screen.TextBox.Show(t, {}, True, True)
CType(CurrentScreen, NewInventoryScreen).LoadItems()
Else Else
Screen.TextBox.Show("The Repel is still~in effect.", {}, True, True) Screen.TextBox.Show("The Repel is still~in effect.", {}, True, True)
End If End If