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

// Define constants for the maximum number of words and tries
#define MAX_WORDS 14
#define MAX_TRIES 6

// Array of words used in the game
const char *words[MAX_WORDS] = {
    "programmation", 
    "ordinateur", 
    "langage", 
    "jeu", 
    "algorithmique", 
    "fontainebleau", 
    "koala", 
    "anticonstitutionnellement", 
    "code", 
    "canard", 
    "gyroscope", 
    "periclitation", 
    "susurrer", 
    "eclesiastique"
};

// Function to display the hangman figure based on the number of tries
void display_hangman(int tries) {
    switch (tries) {
        case 0: printf("  ----\n  |  |\n  |\n  |\n  |\n  |\n--------\n"); break;
        case 1: printf("  ----\n  |  |\n  |  O\n  |\n  |\n  |\n--------\n"); break;
        case 2: printf("  ----\n  |  |\n  |  O\n  |  |\n  |\n  |\n--------\n"); break;
        case 3: printf("  ----\n  |  |\n  |  O\n  | /|\n  |\n  |\n--------\n"); break;
        case 4: printf("  ----\n  |  |\n  |  O\n  | /|\\\n  |\n  |\n--------\n"); break;
        case 5: printf("  ----\n  |  |\n  |  O\n  | /|\\\n  | /\n  |\n--------\n"); break;
        case 6: printf("  ----\n  |  |\n  |  O\n  | /|\\\n  | / \\\n  |\n--------\n"); break;
    }
}

// Function to randomly choose words and concatenate them to create a puzzle word
void choose_words(char *chosen_word, int max_length) {
    int total_length = 0, used[MAX_WORDS] = {0}, word_index;
    chosen_word[0] = '\0';

    // Select words until the maximum word length is reached or exceeded
    while (total_length < max_length) {
        word_index = rand() % MAX_WORDS;

        if (!used[word_index] && total_length + strlen(words[word_index]) + (total_length > 0 ? 1 : 0) <= max_length) {
            if (total_length > 0) { strcat(chosen_word, " "); 
                total_length++; 
            }

            strcat(chosen_word, words[word_index]);
            total_length += strlen(words[word_index]);
            used[word_index] = 1;
            if (total_length == max_length) 
                break;
        }

        // Check if all words that could fit are used
        int all_used = 1;
        for (int i = 0; i < MAX_WORDS; i++) {
            if (!used[i] && total_length + strlen(words[i]) + 1 <= max_length) { all_used = 0; 
                break; }
        }
        if (all_used) 
            break;
    }
}

// Function to play the hangman game
void play_game(const char *chosen_word, int word_length, int letters_to_guess) {
    char guessed[word_length + 1];
    int tries = 0, guessed_correctly = 0;

    // Initialize guessed word display with underscores
    for (int i = 0; i < word_length; i++) 
        guessed[i] = (chosen_word[i] == ' ') ? ' ' : '_';
    guessed[word_length] = '\0';

    // Main game loop, stops if max tries are reached or the word is guessed
    while (tries < MAX_TRIES && guessed_correctly < letters_to_guess) {
        printf("\nMot à deviner : %s\n", guessed);
        display_hangman(tries);
        
        // Get a letter guess from the player
        char guess;
        printf("Entrez une lettre : ");
        scanf(" %c", &guess);
        
        int found = 0, already_revealed = 0;

        // Check if the letter is in the word and update guessed word display
        for (int i = 0; i < word_length; i++) {
            if (chosen_word[i] == guess) {
                if (guessed[i] == '_') {
                    guessed[i] = guess;
                    guessed_correctly++;
                    found = 1;
                } else {
                    already_revealed = 1;
                }
            }
        }

        // Increment tries if the letter was not found and not already revealed
        if (!found && !already_revealed) 
            tries++;
    }

    // Display win or lose message based on game outcome
    if (guessed_correctly == letters_to_guess)
        printf("Félicitations ! Vous avez deviné le mot : %s\n", chosen_word);
    else {
        printf("Désolé, vous avez perdu. Le mot était : %s\n", chosen_word);
        display_hangman(MAX_TRIES);
    }
}

// Main function to start the game
int main() {
    srand(time(NULL));
    int max_word_length;

    // Prompt user for maximum word length for the puzzle
    printf("Choisissez la taille maximum du mot à deviner : ");
    scanf("%d", &max_word_length);

    // Select a word within the specified length
    char chosen_word[max_word_length];
    choose_words(chosen_word, max_word_length);

    // Calculate total letters to guess (excluding spaces)
    int word_length = strlen(chosen_word), letters_to_guess = 0;
    for (int i = 0; i < word_length; i++)
        if (chosen_word[i] != ' ') letters_to_guess++;

    // Start the game with the chosen word
    play_game(chosen_word, word_length, letters_to_guess);
    return 0;
}