10ff.c

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

#define BOX_HEIGHT 4
#define CTRL_BACKSPACE 0x08
#define ENTER 0x0a
#define SPACE ' '
#define LSIZ 32
#define RSIZ 300


int getlastindex(char (*words)[LSIZ], int box_len, int first_index){
    int ch_count = 0;
    while(ch_count < box_len){
        ch_count += strlen(words[first_index]) + 1;
        first_index++;
    }
    return --first_index;
}

int printwords(char (*words)[LSIZ], WINDOW *words_win, int first_index, int typedwidx, int colorpair){
    int col = COLS/2-4;
    int last_index = getlastindex(words, col, first_index);

    wmove(words_win, 1, 2);
    for(;first_index < last_index; first_index++){
        if(first_index == typedwidx){
            wattron(words_win, COLOR_PAIR(colorpair));
            wprintw(words_win,"%s", words[first_index]);
            wattroff(words_win, COLOR_PAIR(colorpair));
            wprintw(words_win," ");
        }else{
            wprintw(words_win,"%s ", words[first_index]);
        }
    }

    int x_pos = getcurx(words_win);
    for(int i = 0; i < col - x_pos; i++){
        waddch(words_win, ' ');
    }

    int return_index = first_index;

    wmove(words_win, 2, 2);
    last_index = getlastindex(words, col, last_index);
    for(;first_index < last_index; first_index++){
        wprintw(words_win,"%s ", words[first_index]);
    }

    x_pos = getcurx(words_win);
    for(int i = 0; i < col - x_pos; i++){
        waddch(words_win, ' ');
    }

    wrefresh(words_win);

    return return_index;
}

_Bool typedcorrect(char (*words)[LSIZ], char typedWord[], int typedwidx, int typedchidx){
    for(int i = 0; i <= typedchidx; i++){
        if(words[typedwidx][i] != typedWord[i]){
            return 0;
        }
    }
    return 1;
}

void showstats(){
    wclear(stdscr);
    WINDOW *stats_win;

    char tmp[LSIZ];
    int ch;
    int highestwpm = 0;
    int lowestwpm = 420;
    FILE *fpstats = fopen("stats.txt", "r");
    // count lines
    int linescount = 0;
    while((ch = fgetc(fpstats))!= EOF){
        if(ch == '\n')
            linescount++;
    }
    fseek(fpstats, 0, SEEK_SET);
    // create array with the size of lines in stats file
    int *stats = (int *)malloc(linescount*sizeof(int));
    int i = 0;
    // put each string line as int into stats array
    while(fgets(tmp, LSIZ, fpstats)){
        tmp[strlen(tmp) - 1] = '\0';
        *(stats+i) = atoi(tmp);
        //wprintw(stats_win,"%d ", *(stats+i));
        if(*(stats+i) > highestwpm)
            highestwpm = *(stats+i);
        if(*(stats+i) < lowestwpm)
            lowestwpm = *(stats+i);
        i++;
    }

    //assume there is room enough
    int statsheight = highestwpm - lowestwpm+2;
    int statswidth = COLS-1;
    int starty_stats = LINES/2-statsheight/2;
    int startx_stats = 1;
    int numpoints = linescount;

    stats_win = newwin(statsheight, statswidth, starty_stats, startx_stats);
    wborder(stats_win, ACS_VLINE, ACS_VLINE, ACS_HLINE, ACS_HLINE, ACS_ULCORNER, ACS_URCORNER, ACS_LLCORNER, ACS_LRCORNER);

    int idx = numpoints - statswidth - 1;

    for(int i = 0; i < statswidth-2; i++){
        mvwprintw(stats_win, statsheight-(stats[idx+i]-lowestwpm)-2, i+1, "%c", '*');
    }

        //mvwprintw(stats_win, starty_stats, 0, "%d", 0);
    for (int i = 0; i < highestwpm; i+=5) {
        mvwprintw(stats_win, statsheight-i, 0, "%d", lowestwpm+i);
    }


    wrefresh(stats_win);
    wgetch(stats_win);
    fclose(fpstats);
    free(stats);
}

int main()
{
    WINDOW *words_win;
    srand(time(0));
    initscr();
    start_color();
    cbreak();
    noecho();
    keypad(stdscr, TRUE);
    refresh();
    init_pair(1, COLOR_BLACK, COLOR_RED);
    init_pair(2, COLOR_BLACK, COLOR_GREEN);

    _Bool running = 1;
    char line[RSIZ][LSIZ];
    int ch;
    FILE *fpwords = fopen("words.txt", "r");
    if(fpwords == NULL){
        printf("ERROR: No \"words.txt\"\n");
        return 1;
    }
    int i = 0;
    int total = 0;
    char words[RSIZ][LSIZ];
    char typedWord[LSIZ];
    int starty_win = (LINES - BOX_HEIGHT) / 2;
    int startx_win = (COLS - COLS/2) / 2;
    int starty_type = LINES/2+BOX_HEIGHT/2;
    int startx_type = COLS/2;
    int current_row;
    int current_col;
    words_win = newwin(BOX_HEIGHT, COLS/2, starty_win, startx_win);
    while(fgets(line[i], LSIZ, fpwords)){
        line[i][strlen(line[i]) - 1] = '\0';
        i++;
    }
    total = i;

    // restart here
    while(running){
        _Bool typing = 1;
        _Bool restart = 0;
        for (i = 0; i < RSIZ; ++i){
            strncpy(words[i], line[rand() % (total)], LSIZ);
        }
        int correctwords[RSIZ] = {0};
        int cwidx = 0;
        int typedwidx = 0;
        int typedchidx = 0;
        int prntwidxtmp = 0;
        int prntwidx = printwords(words, words_win, 0, typedwidx, 2);
        _Bool firstflag = 1;
        int totalch = 0;
        time_t start_t;
        wborder(words_win, ACS_VLINE, ACS_VLINE, ACS_HLINE, ACS_HLINE, ACS_ULCORNER, ACS_URCORNER, ACS_LLCORNER, ACS_LRCORNER);
        wrefresh(words_win);
        move(starty_type, startx_type);

        while(typing){
            switch ((ch = getch())) {
                case KEY_BACKSPACE:
                    getyx(stdscr, current_row, current_col);
                    if(current_col == startx_type){
                        move(starty_type, startx_type);
                        break;
                    }
                    mvdelch(current_row, --current_col);
                    typedchidx--;
                    break;
                case ENTER:
                    typing = 0;
                    restart = 1;
                    break;
                case SPACE:
                    if(typedwidx == RSIZ-30)
                        return 1;
                    if(getcurx(stdscr) == startx_type){
                        move(starty_type, startx_type);
                        break;
                    }
                    move(starty_type, startx_type);
                    clrtoeol();
                    typedWord[typedchidx] = '\0';
                    if(typedcorrect(words, typedWord, typedwidx, typedchidx-1)){
                        correctwords[cwidx++] = typedwidx;
                    }
                    typedwidx++;
                    typedchidx = 0;
                    if(prntwidx == typedwidx){
                        prntwidxtmp = prntwidx;
                        prntwidx = printwords(words, words_win, prntwidx, typedwidx, 2);
                    }
                    break;
                case CTRL_BACKSPACE:
                    move(starty_type, startx_type);
                    clrtoeol();
                    typedchidx = 0;
                    break;
                default:
                    if(typedchidx == 31)
                        continue;
                    if(firstflag){
                        time(&start_t);
                        firstflag = 0;
                    }
                    typedWord[typedchidx] = ch;
                    addch(ch);
                    typedchidx++;
            }
            if(!typedcorrect(words, typedWord, typedwidx, typedchidx-1))
                printwords(words, words_win, prntwidxtmp, typedwidx, 1);
            else
                printwords(words, words_win, prntwidxtmp, typedwidx, 2);
            if(time(NULL) - start_t > 60 && !firstflag)
                typing = 0;

        }
        for(i = 0; i < cwidx; i++){
            totalch += strlen(words[correctwords[i]]) + 1;
        }

        if(!restart){
            mvprintw(starty_type+2,startx_type-10,"Typed %d words correct", cwidx);
            mvprintw(starty_type+3,startx_type-10,"Typed %d words wrong", typedwidx - cwidx);
            mvprintw(starty_type+4,startx_type-10,"WPM: %d ", totalch/5);
            mvprintw(starty_type+5,startx_type-10,"Enter to play again");
            mvprintw(starty_type+6,startx_type-10,"F1 to show stats");

            // append wpm to stats.txt
            if(totalch/5 > 80){
                FILE *fpstats = fopen("stats.txt", "a");
                fprintf(fpstats, "%d%c", totalch/5, '\n');
                fclose(fpstats);
            }

            while((ch = getch())){
                if(ch == ENTER)
                    break;
                if(ch == KEY_F(1)){
                    showstats();
                    break;
                }
            }
            move(starty_type+5,0);
            clrtobot();


        }
    }
    fclose(fpwords);
    endwin();
    return 0;
}