Added the remaining Incenses items.

Full, Lax, Luck, Pure, Rock and Rose incense added.
This commit is contained in:
FantaX1911 2016-09-23 15:32:59 +03:00
parent 1e7e2d0413
commit 3a92b89073
8 changed files with 127 additions and 1 deletions

View File

@ -1042,6 +1042,7 @@
<Compile Include="Pokemon\Items\KeyItems\CardKey.vb" />
<Compile Include="Pokemon\Items\KeyItems\CoinCase.vb" />
<Compile Include="Pokemon\Items\KeyItems\CrystalWing.vb" />
<Compile Include="Pokemon\Items\KeyItems\EmptySeaMap.vb" />
<Compile Include="Pokemon\Items\KeyItems\GoodRod.vb" />
<Compile Include="Pokemon\Items\KeyItems\GSBall.vb" />
<Compile Include="Pokemon\Items\KeyItems\ItemFinder.vb" />
@ -1051,7 +1052,6 @@
<Compile Include="Pokemon\Items\KeyItems\MysteryEgg.vb" />
<Compile Include="Pokemon\Items\KeyItems\OldRod.vb" />
<Compile Include="Pokemon\Items\KeyItems\OldSeaMap.vb" />
<Compile Include="Pokemon\Items\KeyItems\EmptySeaMap.vb" />
<Compile Include="Pokemon\Items\KeyItems\OvalCharm.vb" />
<Compile Include="Pokemon\Items\KeyItems\Pass.vb" />
<Compile Include="Pokemon\Items\KeyItems\RainbowPass.vb" />
@ -1410,6 +1410,7 @@
<Compile Include="Pokemon\Items\Standard\EscapeRope.vb" />
<Compile Include="Pokemon\Items\Standard\ExpShare.vb" />
<Compile Include="Pokemon\Items\Standard\FocusBand.vb" />
<Compile Include="Pokemon\Items\Standard\FullIncense.vb" />
<Compile Include="Pokemon\Items\Standard\GoldLeaf.vb" />
<Compile Include="Pokemon\Items\Standard\GripClaw.vb" />
<Compile Include="Pokemon\Items\Standard\HardStone.vb" />
@ -1417,9 +1418,11 @@
<Compile Include="Pokemon\Items\Standard\Honey.vb" />
<Compile Include="Pokemon\Items\Standard\KingsRock.vb" />
<Compile Include="Pokemon\Items\Standard\LaggingTail.vb" />
<Compile Include="Pokemon\Items\Standard\LaxIncense.vb" />
<Compile Include="Pokemon\Items\Standard\Leftovers.vb" />
<Compile Include="Pokemon\Items\Standard\LifeOrb.vb" />
<Compile Include="Pokemon\Items\Standard\LightBall.vb" />
<Compile Include="Pokemon\Items\Standard\LuckIncense.vb" />
<Compile Include="Pokemon\Items\Standard\LuckyEgg.vb" />
<Compile Include="Pokemon\Items\Standard\LuckyPunch.vb" />
<Compile Include="Pokemon\Items\Standard\Magmarizer.vb" />
@ -1440,12 +1443,15 @@
<Compile Include="Pokemon\Items\Standard\PolkadotBow.vb" />
<Compile Include="Pokemon\Items\Standard\PrismScale.vb" />
<Compile Include="Pokemon\Items\Standard\Protector.vb" />
<Compile Include="Pokemon\Items\Standard\PureIncense.vb" />
<Compile Include="Pokemon\Items\Standard\QuickClaw.vb" />
<Compile Include="Pokemon\Items\Standard\QuickPowder.vb" />
<Compile Include="Pokemon\Items\Standard\RareBone.vb" />
<Compile Include="Pokemon\Items\Standard\RazorClaw.vb" />
<Compile Include="Pokemon\Items\Standard\RazorFang.vb" />
<Compile Include="Pokemon\Items\Standard\ReaperCloth.vb" />
<Compile Include="Pokemon\Items\Standard\RockIncense.vb" />
<Compile Include="Pokemon\Items\Standard\RoseIncense.vb" />
<Compile Include="Pokemon\Items\Standard\Sachet.vb" />
<Compile Include="Pokemon\Items\Standard\ScopeLens.vb" />
<Compile Include="Pokemon\Items\Standard\SeaIncense.vb" />

View File

@ -0,0 +1,20 @@
Namespace Items.Standard
<Item(288, "Full Incense")>
Public Class FullIncense
Inherits Item
Public Overrides ReadOnly Property Description As String = "An item to be held by a Pokémon. This exotic-smelling incense makes the holder bloated and slow moving."
Public Overrides ReadOnly Property BattlePointsPrice As Integer = 9600
Public Overrides ReadOnly Property FlingDamage As Integer = 10
Public Overrides ReadOnly Property CanBeUsedInBattle As Boolean = False
Public Overrides ReadOnly Property CanBeUsed As Boolean = False
Public Sub New()
_textureRectangle = New Rectangle(216, 264, 24, 24)
End Sub
End Class
End Namespace

View File

@ -0,0 +1,20 @@
Namespace Items.Standard
<Item(289, "Lax Incense")>
Public Class LaxIncense
Inherits Item
Public Overrides ReadOnly Property Description As String = "An item to be held by a Pokémon. The beguiling aroma of this incense may cause attacks to miss its holder."
Public Overrides ReadOnly Property BattlePointsPrice As Integer = 9600
Public Overrides ReadOnly Property FlingDamage As Integer = 10
Public Overrides ReadOnly Property CanBeUsedInBattle As Boolean = False
Public Overrides ReadOnly Property CanBeUsed As Boolean = False
Public Sub New()
_textureRectangle = New Rectangle(240, 264, 24, 24)
End Sub
End Class
End Namespace

View File

@ -0,0 +1,20 @@
Namespace Items.Standard
<Item(290, "Luck Incense")>
Public Class LuckIncense
Inherits Item
Public Overrides ReadOnly Property Description As String = "An item to be held by a Pokémon. The beguiling aroma of this incense may cause attacks to miss its holder."
Public Overrides ReadOnly Property BattlePointsPrice As Integer = 9600
Public Overrides ReadOnly Property FlingDamage As Integer = 10
Public Overrides ReadOnly Property CanBeUsedInBattle As Boolean = False
Public Overrides ReadOnly Property CanBeUsed As Boolean = False
Public Sub New()
_textureRectangle = New Rectangle(264, 264, 24, 24)
End Sub
End Class
End Namespace

View File

@ -0,0 +1,20 @@
Namespace Items.Standard
<Item(291, "Pure Incense")>
Public Class PureIncense
Inherits Item
Public Overrides ReadOnly Property Description As String = "An item to be held by a Pokémon. It helps keep wild Pokémon away if the holder is the head of the party."
Public Overrides ReadOnly Property BattlePointsPrice As Integer = 9600
Public Overrides ReadOnly Property FlingDamage As Integer = 10
Public Overrides ReadOnly Property CanBeUsedInBattle As Boolean = False
Public Overrides ReadOnly Property CanBeUsed As Boolean = False
Public Sub New()
_textureRectangle = New Rectangle(288, 264, 24, 24)
End Sub
End Class
End Namespace

View File

@ -0,0 +1,20 @@
Namespace Items.Standard
<Item(286, "Rock Incense")>
Public Class RockIncense
Inherits Item
Public Overrides ReadOnly Property Description As String = "An item to be held by a Pokémon. This exotic-smelling incense boosts the power of Rock-type moves."
Public Overrides ReadOnly Property BattlePointsPrice As Integer = 9600
Public Overrides ReadOnly Property FlingDamage As Integer = 10
Public Overrides ReadOnly Property CanBeUsedInBattle As Boolean = False
Public Overrides ReadOnly Property CanBeUsed As Boolean = False
Public Sub New()
_textureRectangle = New Rectangle(312, 264, 24, 24)
End Sub
End Class
End Namespace

View File

@ -0,0 +1,20 @@
Namespace Items.Standard
<Item(287, "Rose Incense")>
Public Class RoseIncense
Inherits Item
Public Overrides ReadOnly Property Description As String = "An item to be held by a Pokémon. This exotic-smelling incense boosts the power of Grass-type moves."
Public Overrides ReadOnly Property BattlePointsPrice As Integer = 9600
Public Overrides ReadOnly Property FlingDamage As Integer = 10
Public Overrides ReadOnly Property CanBeUsedInBattle As Boolean = False
Public Overrides ReadOnly Property CanBeUsed As Boolean = False
Public Sub New()
_textureRectangle = New Rectangle(336, 264, 24, 24)
End Sub
End Class
End Namespace

Binary file not shown.

Before

Width:  |  Height:  |  Size: 61 KiB

After

Width:  |  Height:  |  Size: 62 KiB