gamefunction.c

gehe zur Dokumentation dieser Datei

#pragma once
#include <stdio.h>
#include <stdlib.h>
#include <string.h>
#include <conio.h>

// global variables
char player1[20];
char player2[20];

struct board gameField;
int gameFieldWidth = 7;
int gameFieldHeigth = 6;
int gameFieldCreated = 0;
int coinPosition = 1; //where the coin is actually placed
int playersTurn;
char playersCoin; //contains X or O
char victor;
int moves;
int end = 0;

void gameFunction(){
    moves = 0;
    playersTurn = irand(0,1);
    char keyStrokeName[2];
    keyStrokeName[1] = '\0';
    player1[0] = '\0';
    player2[0] = '\0';
    /*
        player1 name
        loop as long player did not press enter
    */
    do {
        //check length
        if (strlen(player1)>=19)
            break;
        //buffer
        startBuffer(50);
        output("Please enter a name for Player 1: \n");
        output("> %s_\n", player1);
        //flush buffer
        flushBuffer();
        //wait for a new char and give it to var
        keyStrokeName[0] = getch();
        //check for special inputs
        if ((keyStrokeName[0] == '\b') && (strlen(player1)) > 0) {
            //if backspace was entered
            player1[strlen(player1)-1] = '\0'; //set nilbyte to pointer-1
        }
        else if (keyStrokeName[0] == '\r') {} //if enter do nothing
        else if ((keyStrokeName[0] == '\b') && (strlen(player1)) == 0) {} //if string empty and backspace entered do nothing
        else {
            keyStrokeName[0] = lower_to_upper(keyStrokeName[0]);
            strcat(player1, keyStrokeName);
        }
    } while(((keyStrokeName[0] != '\r') && (player1[0] != '\0') && !(strlen(player1)>15)) || (strlen(player1)<3));
    /*
        player2 name
        loop as long player did not press enter
    */
    do {
        //check length
        if (strlen(player1)>=19)
            break;
        //buffer
        startBuffer(55);
        output("Please enter a name for Player 1: \n");
        output("%s\n\n", player1);
        output("Please enter a name for Player 2: \n");
        output("> %s_\n", player2);
        //flush buffer
        flushBuffer();
        //wait for a new char and give it to var
        keyStrokeName[0] = getch();
        //check for special inputs
        if ((keyStrokeName[0] == '\b') && (strlen(player2)) > 0) {
            //if backspace was entered
            player2[strlen(player2)-1] = '\0'; //set nilbyte to pointer-1
        }
        else if (keyStrokeName[0] == '\r') {} //if enter do nothing
        else if ((keyStrokeName[0] == '\b') && (strlen(player2)) == 0) {} //if string empty and backspace entered do nothing
        else {
            keyStrokeName[0] = lower_to_upper(keyStrokeName[0]);
            strcat(player2, keyStrokeName);
        }
    } while(((keyStrokeName[0] != '\r') && (player2[0] != '\0') && !(strlen(player2)>15)) || (strlen(player2)<3));
    //check that player1 and player2 names are not the same
    if (strcmp(player1, player2)==0) {
        player2[(strlen(player2))] = '1'; // add a symbolic 1 to the end of the name ;-)
        player2[(strlen(player2))+1] = '\0';
    }
    //start buffer for completion
    startBuffer(55);
    output("Thank you %s and %s! The game will start now.\n\nPlease press enter to continue...", player1, player2);
    flushBuffer();
    //wait for a key
    getch();
    //Loop till the game is done
    int winnerLine =NO_HIGHLIGHT;
    while(end == 0){
        // start the game flow
        startGame();
        //check for winners or draw
        if( victor == FIELD_PLAYER1){
            end = 1;
            moves =  (moves/2)+(moves%2);
            consoleClear();
            startBuffer(50);
            drawBoard(&gameField);
            winnerLine = updateSaveHoS(player1,player2,moves);
            //output victor
            output("%s has won!\n\n", player1);
            output("Press any key to continue to Hall of Shame...\n");
            //show all
            flushBuffer();
            //wait for any keystroke
            getch();
            //continue to hall of shame
            showHallOfShame(winnerLine,winnerLine-4);
        }
        else if( victor == FIELD_PLAYER2){
            end = 1;
            moves = (moves/2)+(moves%2);
            consoleClear();
            startBuffer(50);
            drawBoard(&gameField);
            winnerLine = updateSaveHoS(player2,player1,moves);
            //output victor
            output("%s has won!\n\n", player2);
            output("Press any key to continue to Hall of Shame...\n");
            //show all
            flushBuffer();
            //wait for any keystroke
            getch();
            //continue to hall of shame
            showHallOfShame(winnerLine, winnerLine-4);
        }
        if(checkDraw() == 0){
            end = 1;
            consoleClear();
            startBuffer(50);
            drawBoard(&gameField);
            //output draw
            output("Game ended with a draw...\n\n");
            output("Press any key to continue to Hall of Shame...\n");
            //show all
            flushBuffer();
            //wait for any keystroke
            getch();
            //continue to hall of shame
            showHallOfShame(NO_HIGHLIGHT,0);
        }
    }

    //free our game-board
    clearAll();
    return;
}

void clearAll() {
    //clear board
    clearBoard(&gameField);
    freeBoard(&gameField);
    end = 0;
    //reset some variables
    victor = '\0';
    gameFieldCreated = 0; //set to 0, because board was deleted
    playersTurn = 0; //player1 starts the game
    coinPosition = 1; //where the coin is actually placed
    return;
}

void playerAction() {
    char *spaceBetweenNames;
    spaceBetweenNames = malloc((gameFieldWidth * 3) * sizeof(char));
    //if alloc failed return
    if (spaceBetweenNames==NULL) {
        exit(EXITCODE_OUTOFMEMORY);
    }
    //check which players turn it is and sets the coin
    playersCoin = '\0';
    //output buffer
    startBuffer(50);
    if (playersTurn == 0) {
        setLineAlign(-1);
        output("%s's turn\n\n", player1);
        playersCoin = FIELD_PLAYER1;
    }else{
        setLineAlign(+1);
        output("%s's turn\n\n", player2);
        playersCoin = FIELD_PLAYER2;
    }
    setLineAlign(0);
    //draw the coin
    drawCoin(coinPosition, playersCoin);
    //draw the board
    drawBoard(&gameField);
    //end buffer
    flushBuffer();
    userInput = getch();
    switch(userInput){
        //dummy for key left
        case 75: //left
            if (coinPosition > 1)
                coinPosition--;
            break;
        //dummy for key right
        case 77: //right
            if (coinPosition < gameFieldWidth)
                coinPosition++;
            break;
        case 27: //escape
            //go back to menu
            end = 1;
            break;
        //let coin fall
        case 13: //enter key
            throwCoin(coinPosition, playersCoin);
            moves++;
            break;
    }
    free(spaceBetweenNames);
}

void throwCoin(int pos, char player) {
    int lowestCoin = 0, i;
    //get the lowest field
    // LOOP DOWN if found, set lowestCoin
    for(i = 0; i <= gameFieldHeigth-1; i++) {
        // if we found an empty field, leave this loop and set lowest coin
        // to the found field, so that game flow can set the next coin here
        if (getField(&gameField,pos-1,i) == FIELD_EMPTY){
            lowestCoin = i;
            break;
        }
    }
    //check if most upper field is filled with coin
    if (getField(&gameField,pos-1,gameFieldHeigth-1)==FIELD_PLAYER2 || getField(&gameField,pos-1,gameFieldHeigth-1)==FIELD_PLAYER1) {
        return;
    }else{
        //set the coin for player 1 or 2 to the lowest possible column
        if(player == FIELD_PLAYER1){
            setField(&gameField,pos-1,lowestCoin,FIELD_PLAYER1);
            //added looking for winner here
            victor = checkForWinner(pos-1, lowestCoin,FIELD_PLAYER1);
        }else if(player == FIELD_PLAYER2){ //if player 2
            setField(&gameField,pos-1,lowestCoin,FIELD_PLAYER2);
            victor = checkForWinner(pos-1, lowestCoin,FIELD_PLAYER2);
        }
    }
    //switch to player 2 or back to 1
    if (playersTurn == 1)
        playersTurn = 0;
    else playersTurn = 1;
    return;
}

void drawCoin(int pos, char CoinType){
    int i;
    char *canvas;
    canvas = malloc((gameFieldWidth * 4) * sizeof(char));
    //if alloc failed return
    if (canvas==NULL) {
        exit(EXITCODE_OUTOFMEMORY);
    }
    //writing-to-canvas setup (clear string)
    canvas[0] = '\0';
    //keep boundaries
    if (pos < gameFieldWidth || pos > 1) {
        strcat(canvas,"(");
        for(i = 1; i <= gameFieldWidth; i++) {
            //if the coin should be placed draw it
            if (i == pos) {
                strcat(canvas," ");
                if(CoinType == FIELD_PLAYER1){
                    strcat(canvas,FONT_COIN_PLAYER1);
                }else{
                    strcat(canvas,FONT_COIN_PLAYER2);
                }

                strcat(canvas," ");
            }else{
                //draw empty
                strcat(canvas,"    ");
            }
        }
        strcat(canvas,")\n");
        //we're done, output the whole thing
        output("%s",canvas);
    }
    //free memory
    free(canvas);
    return;
}

void startGame(){
    //checks if field already exists
    if (gameFieldCreated == 0) {
        //create new game board (includes clear)
        if (newBoard(&gameField,gameFieldWidth,gameFieldHeigth)) {
            //set gameFieldCreated to 1
            gameFieldCreated = 1;
        }
    }
    //call playerAction to let game begin
    playerAction();
}


char checkForWinner(int x, int y, char player){
     // horizontal check first right then left summarized together
     int lineCount = 0;
     lineCount = 1 + neighbourRow(x+1,y,+1,0,player) + neighbourRow(x-1,y,-1,0,player);
     if(lineCount >= 4){
        return player;
     }
     else{
        lineCount=0;
     }

     // vertical check first up and then down summarized together
     lineCount = 1 + neighbourRow(x,y+1,0,1,player) + neighbourRow(x,y-1,0,-1,player);
     if(lineCount >= 4){
        return player;
     }
     else{
        lineCount=0;
     }

     // diagonal checks

     // first variant /
     lineCount = 1 + neighbourRow(x-1,y+1,-1,1,player) + neighbourRow(x+1,y-1,1,-1,player);
     if(lineCount >= 4){
        return player;
     }
     else{
        lineCount=0;
     }
     //second variant
     lineCount = 1 + neighbourRow(x+1,y+1,1,1,player) + neighbourRow(x-1,y-1,-1,-1,player);
     if(lineCount >= 4){
        return player;
     }
     else{
        lineCount=0;
     }
    return FIELD_EMPTY;

}
int neighbourRow(int x, int y ,int xMovement, int yMovement, char player){
    if (getField(&gameField,x,y) == player){
        return 1 + neighbourRow(x+xMovement,y+yMovement,xMovement,yMovement,player);
    }
    else{
        return 0;
    }
}

int checkDraw(){
    int i =0;
    for(i=0;i<gameFieldWidth;i++){
        if(getField(&gameField,i,gameFieldHeigth-1) == FIELD_EMPTY){
            return 1;
        }
    }
    return 0;
}
int irand( int a, int e){
    double r = e - a + 1;
    return a + (int)(r * rand()/(RAND_MAX+1.0));
}


void animateFalling(struct board* currBoard,unsigned int xPos,char CoinType){
    //determing which type of coin is going to fall
    char coin;
    if(CoinType == FIELD_PLAYER1){
        coin='X';
    }else{
        coin='O';
    }





    unsigned int currY=currBoard->height-1;
    char* old;
    //(getField(currBoard,xPos,currY)!=FIELD_EMPTY)&&
    while((currY!=0)){
        //no deletions possible at first run of loop
        if(currY!=currBoard->height-1){
            //delete coin one field above
            old=calcFieldAddress(currBoard,xPos,currY+1);
            old=&FIELD_EMPTY;
        }
        //setting coin one field lower
        char* curr=calcFieldAddress(currBoard,xPos,currY);
            curr=&coin;
        currY--;

        drawBoard(currBoard);
        //improvised wait Method
        int x=0;
        for(x=0;x<1000000;x++){
            //funny nothing will ever happen here :D
            x=x;
        };


    }
    old=calcFieldAddress(currBoard,xPos,currY);
//  &old=FIELD_EMPTY;
    old=FIELD_EMPTY;
    //return;

}