insertar

' Gambas class file

Inherits Comando

Private p1 As New Point

Private torigen As Tablero

Public Sub _new(t As Tablero, x0 As Integer, y0 As Integer)

  torigen = t

  p1.x = x0
  p1.y = y0

End

Public Sub ejecutar()

  torigen.insertarValla(p1.x, p1.y)

  torigen.dibujalista()

End

Public Sub deshacer()
  'cambio movimiento

  torigen.quitarValla(p1.X, p1.y)
  torigen.dibujalista()

End