document.write('
Data hosted with ♥ by Pastebin.com - Download Raw - See Original
  1. Public Sub _new(Optional t As ClassTablero)
  2.   Dim a, b As Integer
  3.   If t = Null Then
  4.     For a = 0 To 6
  5.       For b = 0 To 6
  6.         hcasillas[a, b] = 0
  7.       Next
  8.     Next
  9.   Else
  10.     For a = 0 To 6
  11.       For b = 0 To 6
  12.         hcasillas[a, b] = t.casillas[a, b]
  13.       Next
  14.     Next
  15.  Endif
  16. End
');