delantero

' Gambas class file

Inherits Jugador

Private hgolesmarcados As Integer


Public Sub _new(nombre As String, minutosjugados As Integer, salario As Integer, golesmarcados As Integer)

  Super.New(nombre, minutosjugados, salario)
  hgolesmarcados = golesmarcados

End


Public Sub calculaPuntosPorObjetivos() As Single

  Return 30 * (hgolesmarcados / Super.getPartidosJugados())

End

Public Sub getPuntosPenalizacionPorSalarioAlto() As Single

  Return Super.hsalario * 0.1

End