Game of Life

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

#include <stdio.h>
#include "MyConIO.h"

void clear_field(char field[79][25])
{
	int x,y;
	for(x=0;x<79;x++)
		for(y=0;y<25;y++)
			field[x][y]=' ';
}

void sow_field(char field[79][25])
{
	int x,y;
	char Dateiname[12],zeile[79];
	FILE *vorgabe;
	printf("Dateiname: ");
	scanf("%s",&Dateiname);
	vorgabe = fopen(Dateiname,"r");
	for(y=0;y<25;y++)
	{		
		fscanf(vorgabe,"%s",&zeile);
		for(x=0;x<79;x++)
		{
			field[x][y]=zeile[x];
		}
	}
}

void display_field(char field[79][25])
{
	int x,y;
	mc_gotoxy(1,1);
	for(x=0;x<79;x++)
		for(y=0;y<25;y++)
		{
			mc_gotoxy(x,y);
			putchar(field[x][y]);
		}
}

	char get_field(int x,int y,char field[79][25])
	{
		if (x==-1) x=78;
		if (y==-1) y=24;
		if (x==79) x=0;
		if (y==25) y=0;
		return field[x][y];
	}

void advance_generation(char field[79][25])
{
	int x,y;
	char status[79][25];
	for(x=0;x<79;x++)
		for(y=0;y<25;y++)
		{
			status[x][y]=0;
			if (get_field(x-1,y-1,field)=='#') status[x][y]=status[x][y]+1;
			if (get_field(x  ,y-1,field)=='#') status[x][y]=status[x][y]+1;
			if (get_field(x+1,y-1,field)=='#') status[x][y]=status[x][y]+1;
			if (get_field(x-1,y  ,field)=='#') status[x][y]=status[x][y]+1;
			if (get_field(x+1,y  ,field)=='#') status[x][y]=status[x][y]+1;
			if (get_field(x-1,y+1,field)=='#') status[x][y]=status[x][y]+1;
			if (get_field(x  ,y+1,field)=='#') status[x][y]=status[x][y]+1;
			if (get_field(x+1,y+1,field)=='#') status[x][y]=status[x][y]+1;
		}	
	for(x=0;x<79;x++)
		for(y=0;y<25;y++)
		{
			if ((status[x][y]==2) || (status[x][y]==3))
			{
				if (status[x][y]==3) field[x][y]='#';
			}
			else
			{
				field[x][y]=' ';
			}

		}
}

int main(void)
{
	char spielfeld[79][25];
	clear_field(spielfeld);
	sow_field(spielfeld);
	mc_init();
	mc_clrscr();
	do
	{
		advance_generation(spielfeld);
		display_field(spielfeld);
		mc_delay(100);
	}
	while (!mc_keypressed());

	mc_exit();
	return 0;
}