mylife1.c

#include <stdio.h>
#include <stdlib.h>
#include <unistd.h> // sleep()関数を使う
//#include "gol.h"

#define height 40
#define width 70
#define cell_number height * width

void my_init_cells(int cell[height][width], FILE* fp) {
    //ファイルがない場合の初期配置
    if (fp == NULL){
        for (int i = 0; i < cell_number / 10; ++i) {
            int height_point = rand() % height;
            int width_point = rand() % width;
            cell[height_point][width_point] = 1;
        }
    }//ファイルがある場合の初期配置
    else {
        char s[11];
        int height_point, width_point;
        fgets(s, 10, fp);
        while (fscanf(fp, "%d %d", &width_point, &height_point) != EOF) {
            cell[height_point][width_point] = 1;
        }
        
    }
}

double cell_ratio(int cell[height][width]) {
    int num = 0;
    double ratio;
    for (int i = 0; i < height; ++i) {
        for (int j = 0; j < width; ++j) {
            if (cell[i][j] == 1) {
                num++;
            }
        }
    }
    ratio = (double)num / (height * width);
    return ratio;
}

void my_print_cells(FILE* fp, int gen, int cell[height][width]) {
    printf("generation = %d\n", gen);
    printf("living cell ratio = %f\n", cell_ratio(cell));
    //上の壁
    printf("+");
    for (int i = 0; i < width; ++i) {
        printf("-");
    }
    printf("+\n");
    //中身
    for (int i = 0; i < height; ++i) {
        printf("|");
        for (int j = 0; j < width; ++j) {
            if (cell[i][j]) {
                printf("\e[31m#\e[0m");
            }else {
                printf(" ");
            }
        }
        printf("|\n");
    }
    //下の壁
    printf("+");
    for (int i = 0; i < width; ++i) {
        printf("-");
    }
    printf("+\n");
}

//個別のセルの次状態を別の配列に書いておく
void my_update_individual(int k, int l, int cell[height][width], int copy_cell[height][width]) {
    if (cell[k][l] == 1) {
        int count = 0;
        for (int m = k - 1; m <= k + 1; ++m) {
            for (int n = l - 1; n <= l + 1; ++n) {
                if (m >= 0 && m < height && n >= 0 && n < width) {
                    if (cell[m][n] == 1) {
                        count++;
                    }
                }
            }
        }
        if (count != 3 && count != 4) {
            copy_cell[k][l] = 0;
        }else {
            copy_cell[k][l] = 1; 
        }
    }else if (cell[k][l] == 0) {
        int count = 0;
        for (int m = k - 1; m <= k + 1; ++m) {
            for (int n = l - 1; n <= l + 1; ++n) {
                if (m >= 0 && m < height && n >= 0 && n < width) {
                    if (cell[m][n] == 1) {
                        count++;
                    }
                }
            }
        }
        if (count == 3) {
            copy_cell[k][l] = 1;
        }else {
            copy_cell[k][l] = 0;
        }
    }
}

//すべてのセルの次状態がそろった時点で、もとのセルに次状態を書き込む
void my_update_cells(int cell[height][width]) {
    int copy_cell[height][width] = {0};
    for (int k = 0; k < height; ++k) {
        for (int l = 0; l < width; ++l) {
            my_update_individual(k, l, cell, copy_cell);
        }
    }
    for (int k = 0; k < height; ++k) {
        for (int l = 0; l < width; ++l) {
            cell[k][l] = copy_cell[k][l];
        }
    }
}


int main(int argc, char **argv) {
    FILE *fp = stdout;
    
    int cell[height][width];
    for(int y = 0 ; y < height ; y++){
        for(int x = 0 ; x < width ; x++){
            cell[y][x] = 0;
        }
    }
    
    /* ファイルを引数にとるか、ない場合はデフォルトの初期値を使う */
    if ( argc > 2 ) {
        fprintf(stderr, "usage: %s [filename for init]\n", argv[0]);
        return EXIT_FAILURE;
    }
    else if (argc == 2) {
        FILE *lgfile;
        if ( (lgfile = fopen(argv[1],"r")) != NULL ) {
            my_init_cells(cell,lgfile); // ファイルによる初期化
        }
        else{
            fprintf(stderr,"cannot open file %s\n",argv[1]);
            return EXIT_FAILURE;
        }
        fclose(lgfile);
    }
    else{
        my_init_cells(cell, NULL); // デフォルトの初期値を使う
    }
    
    my_print_cells(fp, 0, cell); // 表示する
    sleep(1); // 1秒休止
    fprintf(fp,"\e[%dA",height+4);//height+3 の分、カーソルを上に戻す(壁2、表示部1)
    
    /* 世代を進める*/
    for (int gen = 1 ;; gen++) {
        my_update_cells(cell); // セルを更新
        my_print_cells(fp, gen, cell);  // 表示する
        sleep(1); //1秒休止する
        fprintf(fp,"\e[%dA",height+4);//height+3 の分、カーソルを上に戻す(壁2、表示部1)
    }
    
    return EXIT_SUCCESS;
}