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
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
|
#include <stdio.h>
#include "board.h"
void print_board(char* board) {
for (int row = 0; row < BOARD_ROW_BYTES; row++) {
for (int i = 0; i < BOARD_ROW_BYTES; i++) {
int index = BOARD_ROW_BYTES * row + i;
if (board[index] == EMPTY && is_center_index(index)) printf("*");
else printf("%c", board[index]);
}
printf("\n");
}
}
void initialize_board(char* board) {
for (int i = 0; i < BOARD_BYTES; i++) {
board[i] = EMPTY;
}
}
int is_center_index(int index) {
return ((index / BOARD_ROW_BYTES) % 2 == 1) && ((index % BOARD_ROW_BYTES) % 2 == 1);
}
int is_allowed_placement(char* tile, int index, char* board) {
if (board[index] != EMPTY) return 0;
for (int i = 0; i < 4; i++) {
char neighbor = board[index + neighbor_increments[i]];
if (neighbor != EMPTY && neighbor != tile[i + 1]) return 0;
}
return 1;
}
int place_tile(char* tile, int index, char* board) {
if (!is_center_index(index)) {
printf("Not a valid tile index: %i\n", index);
return 0;
}
if (!is_allowed_placement(tile, index, board)) {
printf("Can not place tile %s\n", tile);
return 0;
}
board[index] = tile[0];
for (int i = 0; i < 4; i++) {
board[index + neighbor_increments[i]] = tile[i + 1];
}
return 1;
}
void traverse_structure(char id, int index, char* board, char* structures) {
structures[index] = id;
for (int i = 0; i < 4; i++) {
int new_byte = index + neighbor_increments[i];
if (board[new_byte] == board[index] && structures[new_byte] == EMPTY) {
traverse_structure(id, new_byte, board, structures);
}
}
}
void create_structure_mask(char* board, char* structures) {
char structure_id = '1';
for (int i = 0; i < BOARD_BYTES; i++) {
if (structures[i] == EMPTY && board[i] != EMPTY && board[i] != 'F') {
traverse_structure(structure_id, i, board, structures);
structure_id += 1;
}
}
}
int translate_coordinate(int center_index) {
return (2 * (center_index / BOARD_WIDTH) + 1) *
(2 * BOARD_WIDTH + 1) +
(2 * (center_index % BOARD_WIDTH) + 1);
}
int evaluate_structure(int index, char* board, char* structures) {
int value = 0;
char structure = board[index];
char structure_id = structures[index];
printf("Evaluating group %c (%c)\n", structure_id, structure);
for (int i = 0; i < BOARD_WIDTH; i++) {
for (int j = 0; j < BOARD_WIDTH; j++) {
int index = translate_coordinate(i * BOARD_WIDTH + j);
if (board[index] != EMPTY) { // Empty tiles doesn't count
for (int k = 0; k < 4; k++) {
if (structures[index + neighbor_increments[k]] == structure_id) {
printf("Found at tile %i\n", i * BOARD_WIDTH + j);
value++;
break;
}
}
}
}
}
printf("Value: %i\n", value);
return value;
}
void write_board(char* board, char* filename) {
FILE* file = fopen(filename, "w");
fprintf(file, "%s\n", board);
fclose(file);
}
void read_board(char* board, char* filename) {
FILE* file = fopen(filename, "r");
fgets(board, BOARD_BYTES, file);
fclose(file);
}
int main() {
char board[BOARD_BYTES];
char structures[BOARD_BYTES];
initialize_board(board);
place_tile("RFRCR", translate_coordinate(24), board);
write_board(board, "board.txt");
initialize_board(structures);
create_structure_mask(board, structures);
print_board(board);
printf("\n\n");
print_board(structures);
evaluate_structure(translate_coordinate(24), board, structures);
return 0;
}
|
