[zuibafParticipant]

I am creating the game, it is working, but I still have not finished
This is my game first.
All that remains is display of the next piece, punctuation, and phase.
The hard part has already been made.
The comment is an portuguese.
Sorry for English, but my native language is Portuguese from Brazil.

Attachments:

1. Tetris.monkey2

[zuibafParticipant]

I enter the values ​​in an string variable, this way it becomes more visibile what pieces were set in the game.

Monkey

Local strPieces: String = "" 'L' strPieces += "10" strPieces += "10" strPieces += "11" 'L INVERTIDO' strPieces += "01" strPieces += "01" strPieces += "11" '' strPieces += "10" strPieces += "11" strPieces += "01" pieces = New Int[3][,] Local indice_strPiece: Int = 0 Local line: Int = 0 Local column: Int = 0 pieces[0] = New Int[3,2] indice_strPiece = 0 For line = 0 Until 3 For column = 0 Until 2 pieces[0][line,column] = Cast<Int>(strPieces.Slice(indice_strPiece, indice_strPiece)) indice_strPiece += 1 Next Next

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32

Local strPieces: String = "" 'L' strPieces += "10" strPieces += "10" strPieces += "11"   'L INVERTIDO' strPieces += "01" strPieces += "01" strPieces += "11" '' strPieces += "10" strPieces += "11" strPieces += "01" pieces = New Int[3][,]   Local indice_strPiece: Int = 0 Local line: Int = 0 Local column: Int = 0 pieces[0] = New Int[3,2]   indice_strPiece = 0 For line = 0 Until 3 For column = 0 Until 2 pieces[0][line,column] = Cast<Int>(strPieces.Slice(indice_strPiece, indice_strPiece)) indice_strPiece += 1 Next Next

[zuibafParticipant]

It could have at least one more theme with the white background color in the documentation because this dark blue background would bother me to read the documentation.

[Author]

Posts