diff options
Diffstat (limited to 'keyboards/clueboard/keymaps/tetris/tetris_text.c')
| -rw-r--r-- | keyboards/clueboard/keymaps/tetris/tetris_text.c | 505 |
1 files changed, 0 insertions, 505 deletions
diff --git a/keyboards/clueboard/keymaps/tetris/tetris_text.c b/keyboards/clueboard/keymaps/tetris/tetris_text.c deleted file mode 100644 index 1376ead005..0000000000 --- a/keyboards/clueboard/keymaps/tetris/tetris_text.c +++ /dev/null @@ -1,505 +0,0 @@ -/* Copyright 2017 Dan Amlund Thomsen - * - * This program is free software: you can redistribute it and/or modify - * it under the terms of the GNU General Public License as published by - * the Free Software Foundation, either version 2 of the License, or - * (at your option) any later version. - * - * This program is distributed in the hope that it will be useful, - * but WITHOUT ANY WARRANTY; without even the implied warranty of - * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the - * GNU General Public License for more details. - * - * You should have received a copy of the GNU General Public License - * along with this program. If not, see <http://www.gnu.org/licenses/>. - */ -#include <stdio.h> -#include <stdlib.h> -#include <stdarg.h> -#include <stdint.h> - -#include "tetris_text.h" - -static char empty_piece[7][7] = { { 0, 0, 0, 0, 0, 0, 0 }, - { 0, 0, 0, 0, 0, 0, 0 }, - { 0, 0, 0, 0, 0, 0, 0 }, - { 0, 0, 0, 0, 0, 0, 0 }, - { 0, 0, 0, 0, 0, 0, 0 }, - { 0, 0, 0, 0, 0, 0, 0 }, - { 0, 0, 0, 0, 0, 0, 0 } }; - -static char temp_piece[7][7]; - -static int curx = 0; -static int cury = 0; - -static void clear_piece(char piece[7][7]) { - for (int y = 0; y < 7; y++) { - for (int x = 0; x < 7; x++) { - piece[x][y] = 0; - } - } -} - -static void copy_piece_from_to(char from[7][7], char to[7][7]) { - for (int y = 0; y < 7; y++) { - for (int x = 0; x < 7; x++) { - to[x][y] = from[x][y]; - } - } -} - -static void rotate_piece(char piece[7][7]) { - // transpose - for (int y = 0; y < 7; y++) { - for (int x = y + 1; x < 7; x++) { - char tmp = piece[y][x]; - piece[y][x] = piece[x][y]; - piece[x][y] = tmp; - } - } - - // reverse rows - for (int y = 0; y < 7; y++) { - for (int x = 0; x < 3; x++) { - char tmp = piece[y][6 - x]; - piece[y][6 - x] = piece[y][x]; - piece[y][x] = tmp; - } - } -} - -static char get_shape_char(int shape) { - switch (shape) { - case 0: return 'I'; - case 1: return 'J'; - case 2: return 'L'; - case 3: return 'O'; - case 4: return 'S'; - case 5: return 'T'; - case 6: return 'Z'; - } - return 'Q'; -} - -static void set_piece(char piece[7][7], int shape, int rotation) { - clear_piece(piece); - switch (shape) { - case 0: - if (rotation % 2 == 0) { - // xxXx - piece[3][1] = 1; - piece[3][2] = 1; - piece[3][3] = 1; - piece[3][4] = 1; - } else { - // x - // x - // X - // x - piece[1][3] = 1; - piece[2][3] = 1; - piece[3][3] = 1; - piece[4][3] = 1; - } - break; - case 1: - // xXx - // x - piece[3][2] = 1; - piece[3][3] = 1; - piece[3][4] = 1; - piece[4][4] = 1; - for (int i = 0; i < rotation; i++) { - rotate_piece(piece); - } - break; - case 2: - // xXx - // x - piece[3][2] = 1; - piece[3][3] = 1; - piece[3][4] = 1; - piece[4][2] = 1; - for (int i = 0; i < rotation; i++) { - rotate_piece(piece); - } - break; - case 3: - // xX - // xx - piece[3][2] = 1; - piece[3][3] = 1; - piece[4][2] = 1; - piece[4][3] = 1; - break; - case 4: - if (rotation % 2 == 0) { - // xX - // xx - piece[3][2] = 1; - piece[3][3] = 1; - piece[4][3] = 1; - piece[4][4] = 1; - } else { - // x - // xX - // x - piece[2][3] = 1; - piece[3][2] = 1; - piece[3][3] = 1; - piece[4][2] = 1; - } - break; - case 5: - // xXx - // x - piece[3][2] = 1; - piece[3][3] = 1; - piece[3][4] = 1; - piece[4][3] = 1; - for (int i = 0; i < rotation; i++) { - rotate_piece(piece); - } - break; - case 6: - if (rotation % 2 == 0) { - // Xx - // xx - piece[3][3] = 1; - piece[3][4] = 1; - piece[4][2] = 1; - piece[4][3] = 1; - } else { - // x - // Xx - // x - piece[2][3] = 1; - piece[3][3] = 1; - piece[3][4] = 1; - piece[4][4] = 1; - } - break; - } -} - -static void send_deletes(int deletes) { - for (int i = 0; i < deletes; i++) { - tetris_send_delete(); - } -} - -static void send_backspaces(int backspaces) { - for (int i = 0; i < backspaces; i++) { - tetris_send_backspace(); - curx--; - } -} - -static void send_goto_xy(int x, int y) { - while (curx < x) { - tetris_send_right(); - curx++; - } - while (curx > x) { - tetris_send_left(); - curx--; - } - while (cury < y) { - tetris_send_down(); - cury++; - } - while (cury > y) { - tetris_send_up(); - cury--; - } -} - -static void draw_row(char c, const char oldrow[7], const char newrow[7], int x, int y) { - char str[2] = { c, 0 }; - char row_is_del[7] = { 0 }; - int first = -1; - int last = -1; - for (int px = 0; px < 7; px++) { - if (oldrow[px] && !newrow[px]) { - row_is_del[px] = 1; - } - if (newrow[px] || oldrow[px]) { - if (first == -1) first = px; - last = px; - } - } - - if (first >= 0) { - if (curx > x + last + 1) { - send_goto_xy(x + last + 1, cury); - } - if (curx < x + first) { - send_goto_xy(x + first, cury); - } - send_goto_xy(curx, y); - send_deletes((x + last + 1) - curx); - send_backspaces(curx - (x + first)); - for (int i = first; i <= last; i++) { - if (row_is_del[i]) { - tetris_send_string("."); - } else { - tetris_send_string(str); - } - curx++; - } - } -} - -static void move_piece_from_to(char from[7][7], char to[7][7], int xadd, int yadd) { - for (int y = 0; y < 7; y++) { - for (int x = 0; x < 7; x++) { - if (x + xadd >= 0 && x + xadd < 7 && y + yadd >= 0 && y + yadd < 7) { - to[y][x] = from[y + yadd][x + xadd]; - } else { - to[y][x] = 0; - } - } - } -} - -static void draw_piece(char c, int x, int y, char oldpiece[7][7], char piece[7][7]) { - for (int py = 0; py < 7; py++) { - draw_row(c, oldpiece[py], piece[py], x, y + py); - } -} - -static void draw_piece_moved(char c, int x, int y, char piece[7][7], int oldxadd, int oldyadd) { - move_piece_from_to(piece, temp_piece, oldxadd, oldyadd); - draw_piece(c, x, y, temp_piece, piece); -} - -static int is_piece_hitting(char board[20][10], char piece[7][7], int x, int y) { - for (int py = 0; py < 7; py++) { - for (int px = 0; px < 7; px++) { - if (piece[py][px] && - (px + x >= 10 || px + x < 0 - || py + y >= 20 || py + y < 0 - || board[py + y][px + x])) { - return 1; - } - } - } - return 0; -} - -static void add_piece_to_board(char piece[7][7], char board[20][10], int x, int y) { - for (int py = 0; py < 7; py++) { - for (int px = 0; px < 7; px++) { - if (piece[py][px]) { - board[py + y][px + x] = piece[py][px]; - } - } - } -} - -static void draw_board_line(void) { - //send_string("l l"); - tetris_send_string("l..........l"); - tetris_send_newline(); -} -static void init(void) { - for (int i = 0; i < 20; i++) { - draw_board_line(); - } - tetris_send_string("doooooooooob"); - curx = 12; - cury = 20; -} - -static int get_piece_min_y(char piece[7][7]) { - for (int y = 0; y < 7; y++) { - for (int x = 0; x < 7; x++) { - if (piece[y][x]) - return y; - } - } - return 0; -} - -static int clear_lines(char board[20][10]) { - int cleared_lines = 0; - for (int y = 19; y >= 0; y--) { - char isfull = 1; - for (int x = 0; x < 10; x++) { - if (!board[y][x]) { - isfull = 0; - } - } - if (isfull) { - // delete clear line - send_goto_xy(12, y); - send_backspaces(12); // delete line contents - // delete newline - tetris_send_backspace(); - cury--; - curx = 12; - cleared_lines++; - } else { - if (cleared_lines > 0) { - // move cleared lines down on board - for (int x = 0; x < 10; x++) { - board[y + cleared_lines][x] = board[y][x]; - } - } - } - } - // clear cleared top lines - for (int y = 0; y < cleared_lines; y++) { - for (int x = 0; x < 10; x++) { - board[y][x] = 0; - } - } - if (cleared_lines > 0) { - send_goto_xy(0, 0); - for (int i = 0; i < cleared_lines; i++) { - draw_board_line(); - curx = 0; - cury++; - } - } - return cleared_lines; -} - -static uint8_t myrandom(uint8_t seed) { - uint8_t out = seed >> 1; - if (seed & 1) { - out = out ^ 0xB8; - } - return out; -} - -static char piece[7][7]; -static char board[20][10]; -static uint8_t r; -static int score; -static int x; -static int y; -static int shape; -static int rotation; -static int time; -static int next_down; -static int down_delay; -static int first_run; -static int game_over; - -void tetris_start(uint8_t seed) { - for (int y = 0; y < 20; y++) { - for (int x = 0; x < 10; x++) { - board[y][x] = 0; - } - } - - clear_piece(piece); - - init(); - - game_over = 0; - - r = seed; - score = 0; - - copy_piece_from_to(empty_piece, piece); - x = 0; - y = 0; - shape = 0; - rotation = 0; - time = 0; - next_down = 0; - down_delay = -1; - first_run = 1; -} - -int tetris_tick(int ms_since_previous_tick) { - if (game_over) { - return 0; - } - - time += ms_since_previous_tick; - - if (first_run || time > next_down) { - if (first_run || is_piece_hitting(board, piece, x, y + 1)) { - first_run = 0; - add_piece_to_board(piece, board, x, y); - - score += clear_lines(board); - - down_delay = 500 - score * 10; - if (down_delay < 100) { - down_delay = 100; - } - - rotation = 0; - shape = r % 7; - r = myrandom(r); - set_piece(piece, shape, rotation); - - x = 1; - y = - get_piece_min_y(piece); - draw_piece_moved(get_shape_char(shape), 1 + x, y, piece, 0, 0); - - if (is_piece_hitting(board, piece, x, y)) { - game_over = 1; - send_goto_xy(12, 10); - tetris_send_string(" game over"); - tetris_send_down(); - tetris_send_string(" score "); - char tmp[10]; - sprintf(tmp, "%d", score); - tetris_send_string(tmp); - return 0; - } - } else { - y++; - draw_piece_moved(get_shape_char(shape), 1 + x, y, piece, 0, +1); - } - next_down = time + down_delay; - } else { - - switch (tetris_get_keypress()) { - case 1: { // up - int oldrotation = rotation; - rotation = (rotation + 1) % 4; - copy_piece_from_to(piece, temp_piece); - set_piece(piece, shape, rotation); - if (is_piece_hitting(board, piece, x, y)) { - rotation = oldrotation; - set_piece(piece, shape, rotation); - } else { - draw_piece(get_shape_char(shape), 1 + x, y, temp_piece, piece); - } - break; - } - case 2: // left - if (!is_piece_hitting(board, piece, x - 1, y)) { - x--; - draw_piece_moved(get_shape_char(shape), 1 + x, y, piece, -1, 0); - } - break; - case 3: {// down - int starty = y; - while (!is_piece_hitting(board, piece, x, y + 1)) { - y++; - } - - draw_piece(get_shape_char(shape), x + 1, starty, piece, empty_piece); - draw_piece(get_shape_char(shape), x + 1, y, empty_piece, piece); - - next_down = time + down_delay; - break; - } - case 4: // right - if (!is_piece_hitting(board, piece, x + 1, y)) { - x++; - draw_piece_moved(get_shape_char(shape), 1 + x, y, piece, 1, 0); - } - break; - } - } - return 1; -} |