mirror of
https://github.com/P3D-Legacy/P3D-Legacy.git
synced 2025-04-08 18:35:09 +02:00
23 lines
599 B
VB.net
23 lines
599 B
VB.net
Namespace Abilities
|
|
|
|
Public Class StanceChange
|
|
|
|
Inherits Ability
|
|
|
|
Public Sub New()
|
|
MyBase.New(176, "Stance Change", "The Pokémon changes form depending on how it battles.")
|
|
End Sub
|
|
|
|
Public Overrides Sub SwitchOut(parentPokemon As Pokemon)
|
|
parentPokemon.AdditionalData = ""
|
|
parentPokemon.ReloadDefinitions()
|
|
End Sub
|
|
|
|
Public Overrides Sub EndBattle(parentPokemon As Pokemon)
|
|
parentPokemon.AdditionalData = ""
|
|
parentPokemon.ReloadDefinitions()
|
|
End Sub
|
|
|
|
End Class
|
|
|
|
End Namespace |