create @pokemon.removeattackid(int,int)

P3D/World/ActionScript/V2/ScriptCommands/DoPokemon.vb

@@ -169,6 +169,20 @@
                             p.Attacks.RemoveAt(attackIndex)
                         End If
                     End If
+                Case "removeattackid"
+                    Dim Index As Integer = int(argument.GetSplit(0, ","))
+                    Dim attackId As Integer = int(argument.GetSplit(1, ","))
+
+                    If Core.Player.Pokemons.Count - 1 >= Index Then
+                        Dim p As Pokemon = Core.Player.Pokemons(Index)
+
+                        For a = 0 To (p.Attacks.Count - 1)
+                            If p.Attacks(a).ID = attackId Then
+                                p.Attacks.RemoveAt(a)
+                                Exit For
+                            End If
+                        Next
+                    End If
                 Case "clearattacks"
                     Dim Index As Integer = int(argument)