aboutsummaryrefslogtreecommitdiff
path: root/src/main.c
blob: 5001ba6824ba7a10c59f80c4de57c0a80b9e10df (plain)
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
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
#include <stdio.h>
#include <stdlib.h>
#include <curses.h>
#include "board.h"

void draw_board(BoardUnit* board, WINDOW* win) {
  wmove(win, 0, 0);
  for (int row = 0; row < BOARD_ROW_UNITS; row++) {
    for (int i = 0; i < BOARD_ROW_UNITS; i++) {
      int index = BOARD_ROW_UNITS * row + i;
      if (board[index].feature == EMPTY && is_center_index(index)) waddch(win, '.');
      else waddch(win, board[index].feature | COLOR_PAIR(board[index].structure_group % 6));
    }
  }
  wrefresh(win);
}

int main() {
  /* initialize curses */
  initscr();
  cbreak();
  use_default_colors();

  /* colors */
  start_color();
  for (int i = 1; i < 6; i++) init_pair(i, COLOR_BLACK + i, COLOR_BLACK);

  /* create board window */
  WINDOW* board_box = newwin(BOARD_ROW_UNITS + 2, BOARD_ROW_UNITS + 2, 0, 0);
  WINDOW* board_win = derwin(board_box, BOARD_ROW_UNITS, BOARD_ROW_UNITS, 1, 1);
  box(board_box, 0, 0);
  mvwaddstr(board_box, 0, 1, "Board");
  wrefresh(board_box);

  /* create messages window */
  WINDOW* messages_box = newwin(BOARD_ROW_UNITS + 2, 60, 0, BOARD_ROW_UNITS + 3);
  WINDOW* messages_win = derwin(messages_box, BOARD_ROW_UNITS, 60 - 2, 1, 1);
  box(messages_box, 0, 0);
  mvwaddstr(messages_box, 0, 1, "Log");
  wrefresh(messages_box);


  BoardUnit board[BOARD_UNITS];
  initialize_board(board);

  Tile tile = { "FRCR", 'R', 0 };
  place_tile(tile, translate_coordinate(BOARD_WIDTH * BOARD_WIDTH / 2), board, 1);

  Tile tileset[5] = {
    { "RRRR", '+', 0 },
    { "FCCC", 'C', 0 },
    { "FFFC", 'C', 0 },
    { "CCRR", '*', 0 },
    { "RFRF", 'R', 0 }
  };

  /* main loop */
  char input_key;
  for (int move = 0; ; move++) {
    /* board */
    refresh_structure_groups(board);
    draw_board(board, board_win);

    /* tile placement */
    tile = tileset[rand() % 5];
    int position = 0;
    BoardUnit board_preview[BOARD_UNITS];

    while (1) {
      for (int i = 0; i < BOARD_UNITS; i++) {
        board_preview[i].feature = board[i].feature;
        board_preview[i].structure_group = board[i].structure_group;
      }
      place_tile(tile, translate_coordinate(position), board_preview, 1);

      int is_allowed = is_allowed_placement(tile, translate_coordinate(position), board);

      if (is_allowed) wattron(board_win, COLOR_PAIR(2));
      draw_board(board_preview, board_win);
      wattroff(board_win, COLOR_PAIR(2));

      input_key = wgetch(board_win);
      if (input_key == 10 && is_allowed) break; /* enter key */
      else if (input_key == 'l') position += 1;
      else if (input_key == 'h') position -= 1;
      else if (input_key == 'j') position += BOARD_WIDTH;
      else if (input_key == 'k') position -= BOARD_WIDTH;
      else if (input_key == 'r') rotate_tile(&tile, 3);
      else if (input_key == 'q') {
        endwin();
        return 0;
      }
    }

    int result = place_tile(tile, translate_coordinate(position), board, 0);
    if (result) wprintw(messages_win, "Placed tile %s (%c) at position %i\n", tile.edges, tile.center, position);
    else wprintw(messages_win, "Could not place tile %s (%c) at position %i\n", tile.edges, tile.center, position);


    /* meeple placement */
    input_key = wgetch(board_win);
    int meeple_index = translate_coordinate(position);

    if (input_key == 'l') meeple_index += 1;
    else if (input_key == 'h') meeple_index -= 1;
    else if (input_key == 'j') meeple_index += BOARD_ROW_UNITS;
    else if (input_key == 'k') meeple_index -= BOARD_ROW_UNITS;
    else if (input_key != 10) meeple_index = -1;

    if (meeple_index >= 0) {
      board[meeple_index].meeple = move % PLAYERS;
      wprintw(messages_win, "Placed meeple #%i at index %i\n", move % PLAYERS, meeple_index);
    }

    wrefresh(messages_win);
  }

  endwin();
  return 0;
}