Takedown to MoveRecoil

This commit is contained in:
nilllzz 2016-09-15 18:30:10 +02:00
parent ccd8b6485a
commit 022d0a7464
1 changed files with 4 additions and 3 deletions

View File

@ -1594,8 +1594,9 @@
'DO NOTHING HERE (will do secondary effect if moves overrides it) 'DO NOTHING HERE (will do secondary effect if moves overrides it)
End If End If
End Sub End Sub
Public Overridable Sub MoveRecoil(ByVal own As Boolean, ByVal BattleScreen As BattleScreen) Public Overridable Sub MoveRecoil(ByVal own As Boolean, ByVal BattleScreen As BattleScreen)
'DO NOTHING HERE (will do recoil if moves overrides it) 'DO NOTHING HERE (will do recoil if moves overrides it)
End Sub End Sub
''' <summary> ''' <summary>
@ -1643,7 +1644,7 @@
If p.Ability.Name.ToLower() = "normalize" Then If p.Ability.Name.ToLower() = "normalize" Then
Return New Element(Element.Types.Normal) Return New Element(Element.Types.Normal)
End If End If
If Me.Type.Type = Element.Types.Normal Then If Me.Type.Type = Element.Types.Normal Then
If p.Ability.Name.ToLower() = "pixilate" Then If p.Ability.Name.ToLower() = "pixilate" Then
Return New Element(Element.Types.Fairy) Return New Element(Element.Types.Fairy)
@ -1654,7 +1655,7 @@
If p.Ability.Name.ToLower() = "aerilate" Then If p.Ability.Name.ToLower() = "aerilate" Then
Return New Element(Element.Types.Flying) Return New Element(Element.Types.Flying)
End If End If
End If End If
Return Me.Type Return Me.Type
End Function End Function