claseintervalorValoracion

' Gambas class file

Inherits Intervalo

Public malisimo As String = "malisimo"
Public malo As String = "malo"
Public normal As String = "normal"
Public bueno As String = "bueno"
Public galactico As String = "galactico"


Public Sub _new()

'creo los datos de los intervalos
Super.add(malisimo, -9999, 0)
Super.add(malo, 0, 10)
Super.add(normal, 10, 20)
Super.add(bueno, 20, 40)
Super.add(galactico, 40, 9999)



End

Public Function valorar(puntos As Integer) As String

  Return Super.responder(puntos)

End