Fixed sec. effect values (normal)

This commit is contained in:
Capt_Segis 2016-09-14 19:42:47 -05:00 committed by GitHub
parent 11b17c6849
commit f4342cdc0b
13 changed files with 1081 additions and 1081 deletions

View File

@ -1,4 +1,4 @@
Namespace BattleSystem.Moves.Normal
Namespace BattleSystem.Moves.Normal
Public Class Bind

View File

@ -1,4 +1,4 @@
Namespace BattleSystem.Moves.Normal
Namespace BattleSystem.Moves.Normal
Public Class Block

View File

@ -1,4 +1,4 @@
Namespace BattleSystem.Moves.Normal
Namespace BattleSystem.Moves.Normal
Public Class Charm
@ -36,7 +36,7 @@
Me.DisabledWhileGravity = False
Me.UseEffectiveness = False
Me.ImmunityAffected = False
Me.HasSecondaryEffect = True
Me.HasSecondaryEffect = False
Me.RemovesFrozen = False
Me.IsHealingMove = False

View File

@ -1,4 +1,4 @@
Namespace BattleSystem.Moves.Normal
Namespace BattleSystem.Moves.Normal
Public Class Covet
@ -36,7 +36,7 @@
Me.DisabledWhileGravity = False
Me.UseEffectiveness = True
Me.ImmunityAffected = True
Me.HasSecondaryEffect = True
Me.HasSecondaryEffect = False
Me.RemovesFrozen = False
Me.IsHealingMove = False

View File

@ -1,4 +1,4 @@
Namespace BattleSystem.Moves.Normal
Namespace BattleSystem.Moves.Normal
Public Class DoubleEdge

View File

@ -1,4 +1,4 @@
Namespace BattleSystem.Moves.Normal
Namespace BattleSystem.Moves.Normal
Public Class Facade
@ -53,12 +53,12 @@
End Sub
Public Overrides Function GetBasePower(own As Boolean, BattleScreen As BattleScreen) As Integer
Dim op As Pokemon = BattleScreen.OppPokemon
Dim p As Pokemon = BattleScreen.OwnPokemon
If own = False Then
op = BattleScreen.OwnPokemon
p = BattleScreen.OppPokemon
End If
If op.Status <> Pokemon.StatusProblems.None And op.Status <> Pokemon.StatusProblems.Fainted Then
If p.Status <> Pokemon.StatusProblems.None And p.Status <> Pokemon.StatusProblems.Fainted Then
Return Me.Power * 2
Else
Return Me.Power

View File

@ -1,4 +1,4 @@
Namespace BattleSystem.Moves.Normal
Namespace BattleSystem.Moves.Normal
Public Class Feint
@ -36,7 +36,7 @@
Me.DisabledWhileGravity = False
Me.UseEffectiveness = True
Me.ImmunityAffected = True
Me.HasSecondaryEffect = True
Me.HasSecondaryEffect = False
Me.RemovesFrozen = False
Me.IsHealingMove = False

View File

@ -1,4 +1,4 @@
Namespace BattleSystem.Moves.Normal
Namespace BattleSystem.Moves.Normal
Public Class Foresight
@ -36,7 +36,7 @@
Me.DisabledWhileGravity = False
Me.UseEffectiveness = False
Me.ImmunityAffected = False
Me.HasSecondaryEffect = True
Me.HasSecondaryEffect = False
Me.RemovesFrozen = False
Me.IsHealingMove = False

View File

@ -1,4 +1,4 @@
Namespace BattleSystem.Moves.Normal
Namespace BattleSystem.Moves.Normal
Public Class MeanLook
@ -36,7 +36,7 @@
Me.DisabledWhileGravity = False
Me.UseEffectiveness = False
Me.ImmunityAffected = True
Me.HasSecondaryEffect = True
Me.HasSecondaryEffect = False
Me.RemovesFrozen = False
Me.IsHealingMove = False

View File

@ -36,7 +36,7 @@ Namespace BattleSystem.Moves.Normal
Me.DisabledWhileGravity = False
Me.UseEffectiveness = True
Me.ImmunityAffected = True
Me.HasSecondaryEffect = True
Me.HasSecondaryEffect = False
Me.RemovesFrozen = False
Me.IsHealingMove = False

View File

@ -1,4 +1,4 @@
Namespace BattleSystem.Moves.Normal
Namespace BattleSystem.Moves.Normal
Public Class OdorSleuth
@ -36,7 +36,7 @@
Me.DisabledWhileGravity = False
Me.UseEffectiveness = False
Me.ImmunityAffected = False
Me.HasSecondaryEffect = True
Me.HasSecondaryEffect = False
Me.RemovesFrozen = False
Me.IsHealingMove = False

View File

@ -1,4 +1,4 @@
Namespace BattleSystem.Moves.Normal
Namespace BattleSystem.Moves.Normal
Public Class PayDay
@ -37,7 +37,7 @@
Me.UseEffectiveness = True
Me.ImmunityAffected = True
Me.RemovesFrozen = False
Me.HasSecondaryEffect = True
Me.HasSecondaryEffect = False
Me.IsHealingMove = False
Me.IsRecoilMove = False

View File

@ -1,4 +1,4 @@
Namespace BattleSystem.Moves.Normal
Namespace BattleSystem.Moves.Normal
Public Class RapidSpin
@ -36,7 +36,7 @@
Me.DisabledWhileGravity = False
Me.UseEffectiveness = True
Me.ImmunityAffected = True
Me.HasSecondaryEffect = True
Me.HasSecondaryEffect = False
Me.RemovesFrozen = False
Me.IsHealingMove = False