escucharUsuario

Public Sub DrawingAreaTablero_MouseDown()

  Dim largo As Integer

  If main.pensando = True Then Return
  'Print Int((Mouse.x) / d + 0.7)

  col[0] = Int((Mouse.x) / d + 0.7)
  If col[0] > -1 Then
    ProducidoClick[0] = True
  Endif

End