Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- ' Gambas class file
- Property numero As Integer ' jugador primero ("Amarillo", "-1") y jugador segundo("Naranja", "1")
- Private hnumero As Integer
- Property profundidad As Integer
- Private hprofundidad As Integer
- Private Function numero_Read() As Integer
- Return hnumero
- End
- Private Sub numero_Write(Value As Integer)
- hnumero = value
- End
- Private Function profundidad_Read() As Integer
- Return hprofundidad
- End
- Private Sub profundidad_Write(Value As Integer)
- hprofundidad = value
- End
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement