Photonics-Helfer/src/pipes_test.c

#include <stdio.h>
#include <stdlib.h>
#include <time.h>

#ifdef __linux__
    #include <sys/ioctl.h>
    #include <unistd.h>
    #include <termio.h>
#endif

#define DEBUGGER_PIPES_TO_NUMBERS 0
#define DEBUGGER_RANDOM 0
#define AUTOMATISCH 0

#define INFILL_PLAIN_PAPER 0
#define INFILL_X_PIPE 1
#define INFILL_Y_PIPE 2
#define FILLER " "                      // ░

//#define GRID_GROESSE_X 200              // x:y -> 2:1 for a square looking grid
//#define GRID_GROESSE_Y 60
#define MIN_LAENGE_PIPE 6
#define MAX_LAENGE_PIPE 6
#define SLEEP_TIMER 5000              // in nano seconds
#define COLOR_CHANGING_PROBABILITY 5   // format: "(1 : your_number)", for every direction change

#define RESET_COLOR "\033[0m"
#define RED "\033[31m"
#define GREEN "\033[32m"
#define YELLOW "\033[33m"
#define BLUE "\033[34m"
#define MAGENTA "\033[35m"
#define CYAN "\033[36m"
#define WHITE "\033[37m"

const char* color;
const char *colors[] = {RED, GREEN, YELLOW, BLUE, MAGENTA, CYAN, WHITE};

void random_color() {
    color = colors[rand() % (sizeof(colors) / sizeof(colors[0]))];
}

int getch_pipes(){ 
    int ch;
    struct termios oldattr, newattr;

    tcgetattr(STDIN_FILENO, &oldattr);
    newattr = oldattr;
    newattr.c_lflag &= ~ICANON;
    newattr.c_lflag &= ~ECHO;
    newattr.c_cc[VMIN] = 1;
    newattr.c_cc[VTIME] = 0;
    tcsetattr(STDIN_FILENO, TCSANOW, &newattr);
    ch = getchar();
    tcsetattr(STDIN_FILENO, TCSANOW, &oldattr);

    return ch; 
}

void print_grid(int x, int y, char **grid) {
    for (int i = 0; i < y; i++) {
        printf("\n");
        for (int j = 0; j < x; j++) {
            if (!DEBUGGER_PIPES_TO_NUMBERS){
                if(grid[i][j] == 0){
                    printf(FILLER);
                } else if(grid[i][j] != 0 && grid[i][j] != 1 && grid[i][j] != 2){
                    return;

                } else if(grid[i - 1][j] == 0 && grid[i + 1][j] == 0 && grid[i][j - 1] != 0 && grid[i][j + 1] != 0 && grid[i][j] == 1  ){
                    printf("%s━", color);

                } else if(grid[i - 1][j] != 0 && grid[i + 1][j] != 0 && grid[i][j - 1] == 0 && grid[i][j + 1] == 0 && grid[i][j] == 2  ){
                    printf("%s┃", color);

                } else if(grid[i - 1][j] == 2 && grid[i + 1][j] == 2 && grid[i][j - 1] == 1 && grid[i][j + 1] == 1 && grid[i][j] != 0  ){
                    printf("%s╋", color);

                } else if(grid[i - 1][j] == 0 && grid[i + 1][j] == 2 && grid[i][j - 1] == 1 && grid[i][j + 1] == 0 && grid[i][j] != 0  ){
                    printf("%s┓", color);

                } else if(grid[i - 1][j] == 2 && grid[i + 1][j] == 0 && grid[i][j - 1] == 0 && grid[i][j + 1] == 1 && grid[i][j] != 0  ){
                    printf("%s┗", color);

                } else if(grid[i - 1][j] == 0 && grid[i + 1][j] == 2 && grid[i][j - 1] == 0 && grid[i][j + 1] == 1 && grid[i][j] != 0  ){
                    printf("%s┏", color);

                } else if(grid[i - 1][j] == 2 && grid[i + 1][j] == 0 && grid[i][j - 1] == 1 && grid[i][j + 1] == 0 && grid[i][j] != 0  ){
                    printf("%s┛", color);

                } else if(grid[i - 1][j] == 2 && grid[i + 1][j] == 2 && grid[i][j - 1] == 0 && grid[i][j + 1] == 1 && grid[i][j] != 0  ){
                    printf("%s┣", color);

                } else if(grid[i - 1][j] == 2 && grid[i + 1][j] == 2 && grid[i][j - 1] == 1 && grid[i][j + 1] == 0 && grid[i][j] != 0  ){
                    printf("%s┫", color);

                } else if(grid[i - 1][j] == 0 && grid[i + 1][j] == 2 && grid[i][j - 1] == 1 && grid[i][j + 1] == 1 && grid[i][j] != 0  ){
                    printf("%s┳", color);

                } else if(grid[i - 1][j] == 2 && grid[i + 1][j] == 0 && grid[i][j - 1] == 1 && grid[i][j + 1] == 1 && grid[i][j] != 0  ){
                    printf("%s┻", color);

                } else if(grid[i - 1][j] == 0 && grid[i + 1][j] == 0 && grid[i][j - 1] != 0 && grid[i][j + 1] == 0 && grid[i][j] == 1  ){
                    printf("%s━", color);

                } else if(grid[i - 1][j] == 0 && grid[i + 1][j] == 0 && grid[i][j - 1] == 0 && grid[i][j + 1] != 0 && grid[i][j] == 1  ){
                    printf("%s━", color);

                } else if(grid[i - 1][j] != 0 && grid[i + 1][j] == 0 && grid[i][j - 1] == 0 && grid[i][j + 1] == 0 && grid[i][j] == 2  ){
                    printf("%s┃", color);

                } else if(grid[i - 1][j] == 0 && grid[i + 1][j] != 0 && grid[i][j - 1] == 0 && grid[i][j + 1] == 0 && grid[i][j] == 2  ){
                    printf("%s┃", color);

                } else if(grid[i - 1][j] == 1 && grid[i + 1][j] == 0 && grid[i][j - 1] == 1 && grid[i][j + 1] == 1 && grid[i][j] == 1  ){
                    printf("%s━", color);

                } else if(grid[i - 1][j] == 0 && grid[i + 1][j] == 1 && grid[i][j - 1] == 1 && grid[i][j + 1] == 1 && grid[i][j] == 1  ){
                    printf("%s━", color);

                } else if(grid[i - 1][j] == 1 && grid[i + 1][j] == 1 && grid[i][j - 1] == 1 && grid[i][j + 1] == 1 && grid[i][j] == 1  ){
                    printf("%s━", color);

                } else if(grid[i - 1][j] == 2 && grid[i + 1][j] == 2 && grid[i][j - 1] == 0 && grid[i][j + 1] == 2 && grid[i][j] == 2  ){
                    printf("%s┃", color);

                } else if(grid[i - 1][j] == 2 && grid[i + 1][j] == 2 && grid[i][j - 1] == 2 && grid[i][j + 1] == 0 && grid[i][j] == 2  ){
                    printf("%s┃", color);

                } else if(grid[i - 1][j] == 2 && grid[i + 1][j] == 2 && grid[i][j - 1] == 2 && grid[i][j + 1] == 2 && grid[i][j] == 2  ){
                    printf("%s┃", color);

                    

                } else if(grid[i - 1][j] != 0 && grid[i + 1][j] != 0 && grid[i][j - 1] != 0 && grid[i][j + 1] != 0 && grid[i][j] == 0  ){
                    printf("%s┃", color);

                } else if(grid[i - 1][j] != 0 && grid[i + 1][j] != 0 && grid[i][j - 1] != 0 && grid[i][j + 1] == 0 && grid[i][j] != 0  ){
                    printf("%s┃", color);

                } else if(grid[i - 1][j] != 0 && grid[i + 1][j] == 0 && grid[i][j - 1] != 0 && grid[i][j + 1] != 0 && grid[i][j] != 0  ){
                    printf("%s┻", color);

                } else if(grid[i - 1][j] == 0 && grid[i + 1][j] != 0 && grid[i][j - 1] != 0 && grid[i][j + 1] != 0 && grid[i][j] != 0  ){
                    printf("%s┳", color);

                } else if(grid[i - 1][j + 1] == 0 && grid[i - 1][j] != 0 && grid[i + 1][j] != 0 && grid[i][j - 1] != 0 && grid[i][j + 1] != 0 && grid[i][j] != 0  ){
                    printf("%s┗", color);

                } else if(grid[i][j] == 2  ){
                    printf("%s┃", color);

                } else if(grid[i][j] == 1  ){
                    printf("%s━", color);
                } else{printf("x");}
                    printf(RESET_COLOR); // Setzt die Farbe zurück
            }else{
                printf("%i", grid[i][j]);
            }
        }
    }
}

void generate_pipe_x(int GRID_GROESSE_X, int GRID_GROESSE_Y, char **grid, int *x_start, int *y_start, int laenge) {
    if(laenge < 0){
        for (int i = *x_start; i > *x_start + laenge; i--) {
            if (i <= -laenge/2 -1) {
                *x_start = GRID_GROESSE_X + laenge/2;
                return;
            }
            grid[*y_start][i] = INFILL_X_PIPE;
            printf("\33[H\033[J");
            print_grid(GRID_GROESSE_X, GRID_GROESSE_Y, grid);
            usleep(SLEEP_TIMER);
        }
    } else{
        for (int i = *x_start; i < *x_start + laenge; i++) {
            if (i >= GRID_GROESSE_X - laenge/2+1) {
                *x_start = laenge/2;
                return;
            }
            grid[*y_start][i] = INFILL_X_PIPE;
            printf("\33[H\033[J");
            print_grid(GRID_GROESSE_X, GRID_GROESSE_Y, grid);
            usleep(SLEEP_TIMER);
        }
    }

    *x_start += laenge;
}

void generate_pipe_y(int GRID_GROESSE_X, int GRID_GROESSE_Y, char **grid, int *x_start, int *y_start, int laenge) {
    if(laenge < 0){
        for (int i = *y_start; i > *y_start + laenge/2; i--) {
            if (i <= -laenge/2) {
                *y_start = GRID_GROESSE_Y + laenge/2;
                return;
            }
            grid[i][*x_start] = INFILL_Y_PIPE;
            printf("\33[H\033[J");
            print_grid(GRID_GROESSE_X, GRID_GROESSE_Y, grid);
            usleep(SLEEP_TIMER);
        }
    } else{
        for (int i = *y_start; i < *y_start + laenge/2; i++) {
            if (i >= (GRID_GROESSE_Y / 2)*2 - 1) {
                *y_start = laenge/2;
                return;
            }
            grid[i][*x_start] = INFILL_Y_PIPE;
            printf("\33[H\033[J");
            print_grid(GRID_GROESSE_X, GRID_GROESSE_Y, grid);
            usleep(SLEEP_TIMER);
        }
    }
    
    *y_start += laenge/2;
}

int pipes(int GRID_GROESSE_X, int GRID_GROESSE_Y) {
//int main() {
//    system("chcp 65001 >null"); 
//    int GRID_GROESSE_X = 120;              // x:y -> 2:1 for a square looking grid
//    int GRID_GROESSE_Y = 60;

    int x_start = GRID_GROESSE_X / 2;
    int y_start = GRID_GROESSE_Y / 2;
    int laenge = 20;
    int max_l = MAX_LAENGE_PIPE + 1 - MIN_LAENGE_PIPE;
    int min_l = MIN_LAENGE_PIPE - 1;
    int color_c_p = COLOR_CHANGING_PROBABILITY + 1;
    srand(time(NULL));

    random_color();

    char **grid = malloc(GRID_GROESSE_Y * sizeof(char *));
    for (int i = 0; i < GRID_GROESSE_Y; i++) {
        grid[i] = malloc(GRID_GROESSE_X * sizeof(char));
    }

    for (int i = 0; i < GRID_GROESSE_Y; i++) {
        for (int j = 0; j < GRID_GROESSE_X; j++) {
            grid[i][j] = INFILL_PLAIN_PAPER;
        }
    }
    
    int richtungswechsler = 1;

    while (!DEBUGGER_RANDOM) {

        while (!AUTOMATISCH) {
            if ((rand() %color_c_p) <= 1) {
                random_color();
            }

            laenge = ((rand() %max_l)+min_l);

            char key_input = (char)getch_pipes();

            switch (key_input) {
                case 'h': generate_pipe_x(GRID_GROESSE_X, GRID_GROESSE_Y, grid, &x_start, &y_start, laenge * -1); break;
                case 'a': generate_pipe_x(GRID_GROESSE_X, GRID_GROESSE_Y, grid, &x_start, &y_start, laenge * -1); break;
                case 'l': generate_pipe_x(GRID_GROESSE_X, GRID_GROESSE_Y, grid, &x_start, &y_start, laenge); break;
                case 'd': generate_pipe_x(GRID_GROESSE_X, GRID_GROESSE_Y, grid, &x_start, &y_start, laenge); break;
                case 'j': generate_pipe_y(GRID_GROESSE_X, GRID_GROESSE_Y, grid, &x_start, &y_start, laenge); break;
                case 's': generate_pipe_y(GRID_GROESSE_X, GRID_GROESSE_Y, grid, &x_start, &y_start, laenge); break;
                case 'k': generate_pipe_y(GRID_GROESSE_X, GRID_GROESSE_Y, grid, &x_start, &y_start, laenge * -1); break;
                case 'w': generate_pipe_y(GRID_GROESSE_X, GRID_GROESSE_Y, grid, &x_start, &y_start, laenge * -1); break;
                case 'q': return 0;
                default: continue;
            }
        }


        while (AUTOMATISCH) {
            if ((rand() %color_c_p) <= 1) {
                random_color();
            }
            if ((rand() %2)-1) {
                laenge = ((rand() %max_l)+min_l);
            } else {
                laenge = ((rand() %max_l)+min_l)*-1;
            }

            if (richtungswechsler == 1) {
                generate_pipe_x(GRID_GROESSE_X, GRID_GROESSE_Y, grid, &x_start, &y_start, laenge);
                richtungswechsler *= -1;
            } else {
                generate_pipe_y(GRID_GROESSE_X, GRID_GROESSE_Y, grid, &x_start, &y_start, laenge);
                richtungswechsler *= -1;
            }
        }
    }

    if (DEBUGGER_RANDOM) {
        generate_pipe_x(GRID_GROESSE_X, GRID_GROESSE_Y, grid, &x_start, &y_start, laenge);
        generate_pipe_y(GRID_GROESSE_X, GRID_GROESSE_Y, grid, &x_start, &y_start, laenge);
        generate_pipe_x(GRID_GROESSE_X, GRID_GROESSE_Y, grid, &x_start, &y_start, laenge);
        generate_pipe_y(GRID_GROESSE_X, GRID_GROESSE_Y, grid, &x_start, &y_start, laenge * -0.1);
        generate_pipe_x(GRID_GROESSE_X, GRID_GROESSE_Y, grid, &x_start, &y_start, laenge * -1.05);
        generate_pipe_y(GRID_GROESSE_X, GRID_GROESSE_Y, grid, &x_start, &y_start, laenge * -1);
        generate_pipe_x(GRID_GROESSE_X, GRID_GROESSE_Y, grid, &x_start, &y_start, laenge * 0.1);
        generate_pipe_y(GRID_GROESSE_X, GRID_GROESSE_Y, grid, &x_start, &y_start, laenge * 0.9);
        generate_pipe_x(GRID_GROESSE_X, GRID_GROESSE_Y, grid, &x_start, &y_start, laenge);
    }



    for (int i = 0; i < GRID_GROESSE_Y; i++) {
        free(grid[i]);
        }
        free(grid);

    return 0;
}