tyler.durden/P3D-Legacy
1
0
Fork 0
mirror of https://github.com/P3D-Legacy/P3D-Legacy.git synced 2025-07-27 15:54:25 +02:00
Code Issues Packages Projects Releases Wiki Activity

Prevent usage of berries that can't be used

Browse Source
This commit is contained in:
JappaWakka 2023-10-01 14:28:32 +02:00
parent d08b472b35
commit f55f910f3b
14 changed files with 28 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

3
P3D/Pokemon/Items/Berries/BelueBerry.vb
View File

@ -4,7 +4,8 @@ Namespace Items.Berries
Public Class BelueBerry
Inherits Berry
Public Overrides ReadOnly Property CanBeUsed As Boolean = False
Public Overrides ReadOnly Property CanBeUsedInBattle As Boolean = False
Public Sub New()
MyBase.New(64800, "Pokéblock ingredient. Plant in loamy soil to grow Belue.", "11.8cm", "Very Soft", 1, 2)

2
P3D/Pokemon/Items/Berries/BlukBerry.vb
View File

@ -5,6 +5,8 @@ Namespace Items.Berries
Inherits Berry
Public Overrides ReadOnly Property CanBeUsed As Boolean = False
Public Overrides ReadOnly Property CanBeUsedInBattle As Boolean = False
Public Sub New()
MyBase.New(3600, "Pokéblock ingredient. Plant in loamy soil to grow Bluk.", "10.8cm", "Soft", 3, 6)

2
P3D/Pokemon/Items/Berries/CornnBerry.vb
View File

@ -5,6 +5,8 @@ Namespace Items.Berries
Inherits Berry
Public Overrides ReadOnly Property CanBeUsed As Boolean = False
Public Overrides ReadOnly Property CanBeUsedInBattle As Boolean = False
Public Sub New()
MyBase.New(21600, "Pokéblock ingredient. Plant in loamy soil to grow Cornn.", "7.5cm", "Hard", 2, 4)

2
P3D/Pokemon/Items/Berries/DurinBerry.vb
View File

@ -5,6 +5,8 @@ Namespace Items.Berries
Inherits Berry
Public Overrides ReadOnly Property CanBeUsed As Boolean = False
Public Overrides ReadOnly Property CanBeUsedInBattle As Boolean = False
Public Sub New()
MyBase.New(64800, "Pokéblock ingredient. Plant in loamy soil to grow Durin.", "28.0m", "Hard", 1, 2)

2
P3D/Pokemon/Items/Berries/MagostBerry.vb
View File

@ -5,6 +5,8 @@ Namespace Items.Berries
Inherits Berry
Public Overrides ReadOnly Property CanBeUsed As Boolean = False
Public Overrides ReadOnly Property CanBeUsedInBattle As Boolean = False
Public Sub New()
MyBase.New(21600, "Pokéblock ingredient. Plant in loamy soil to grow Magost.", "14.0cm", "Hard", 2, 4)

2
P3D/Pokemon/Items/Berries/NanabBerry.vb
View File

@ -5,6 +5,8 @@ Namespace Items.Berries
Inherits Berry
Public Overrides ReadOnly Property CanBeUsed As Boolean = False
Public Overrides ReadOnly Property CanBeUsedInBattle As Boolean = False
Public Sub New()
MyBase.New(3600, "Pokéblock ingredient. Plant in loamy soil to grow Nanab.", "7.7cm", "Very Hard", 2, 3)

2
P3D/Pokemon/Items/Berries/NomelBerry.vb
View File

@ -5,6 +5,8 @@ Namespace Items.Berries
Inherits Berry
Public Overrides ReadOnly Property CanBeUsed As Boolean = False
Public Overrides ReadOnly Property CanBeUsedInBattle As Boolean = False
Public Sub New()
MyBase.New(21600, "Pokéblock ingredient. Plant in loamy soil to grow Nomel.", "28.5cm", "Soft", 2, 4)

2
P3D/Pokemon/Items/Berries/PamtreBerry.vb
View File

@ -5,6 +5,8 @@ Namespace Items.Berries
Inherits Berry
Public Overrides ReadOnly Property CanBeUsed As Boolean = False
Public Overrides ReadOnly Property CanBeUsedInBattle As Boolean = False
Public Sub New()
MyBase.New(64800, "Pokéblock ingredient. Plant in loamy soil to grow Pamtre.", "24.4cm", "Very Soft", 1, 2)

2
P3D/Pokemon/Items/Berries/PinapBerry.vb
View File

@ -5,6 +5,8 @@ Namespace Items.Berries
Inherits Berry
Public Overrides ReadOnly Property CanBeUsed As Boolean = False
Public Overrides ReadOnly Property CanBeUsedInBattle As Boolean = False
Public Sub New()
MyBase.New(3600, "Pokéblock ingredient. Plant in loamy soil to grow Pinap.", "8.0cm", "Hard", 3, 6)

2
P3D/Pokemon/Items/Berries/RabutaBerry.vb
View File

@ -5,6 +5,8 @@ Namespace Items.Berries
Inherits Berry
Public Overrides ReadOnly Property CanBeUsed As Boolean = False
Public Overrides ReadOnly Property CanBeUsedInBattle As Boolean = False
Public Sub New()
MyBase.New(21600, "Pokéblock ingredient. Plant in loamy soil to grow Rabuta.", "22.6cm", "Soft", 2, 4)

2
P3D/Pokemon/Items/Berries/RazzBerry.vb
View File

@ -5,6 +5,8 @@ Namespace Items.Berries
Inherits Berry
Public Overrides ReadOnly Property CanBeUsed As Boolean = False
Public Overrides ReadOnly Property CanBeUsedInBattle As Boolean = False
Public Sub New()
MyBase.New(3600, "Pokéblock ingredient. Plant in loamy soil to grow Razz.", "12.0cm", "Very Hard", 2, 3)

2
P3D/Pokemon/Items/Berries/SpelonBerry.vb
View File

@ -5,6 +5,8 @@ Namespace Items.Berries
Inherits Berry
Public Overrides ReadOnly Property CanBeUsed As Boolean = False
Public Overrides ReadOnly Property CanBeUsedInBattle As Boolean = False
Public Sub New()
MyBase.New(64800, "Pokéblock ingredient." & Environment.NewLine & "Plant in loamy soil to grow Spelon.", "13.2cm", "Soft", 1, 2)

2
P3D/Pokemon/Items/Berries/WatmelBerry.vb
View File

@ -5,6 +5,8 @@ Public Class WatmelBerry
Inherits Berry
Public Overrides ReadOnly Property CanBeUsed As Boolean = False
Public Overrides ReadOnly Property CanBeUsedInBattle As Boolean = False
Public Sub New()
MyBase.New(64800, "Pokéblock ingredient. Plant in loamy soil to grow Watmel.", "25.0cm", "Soft", 1, 2)

2
P3D/Pokemon/Items/Berries/WepearBerry.vb
View File

@ -5,6 +5,8 @@ Namespace Items.Berries
Inherits Berry
Public Overrides ReadOnly Property CanBeUsed As Boolean = False
Public Overrides ReadOnly Property CanBeUsedInBattle As Boolean = False
Public Sub New()
MyBase.New(3600, "Pokéblock ingredient. Plant in loamy soil to grow Wepear.", "7.4cm", "Super Hard", 3, 6)