project 1 2019 c2 finished

#include <stdio.h>
#include <stdlib.h>
#include <math.h>
#include <time.h>
#include <ctype.h>
#define MIN 3
#define MAX 24

int getCoords(char str[20], int arg);
void bomb(int a, int b, char** level,int N,int M, int *score);
void hammer(int a, int b, char** level, char c,int N,int M, int *score);
void gravity(char **level, int type,int N,int M);

int main()
{
    int i,j, k, N, M, flag, x, y, exit, c=0, levelcomplete, pista=1, temp;
    int *score;
    char str[20];
    char **level;

    do{
        printf("Dwse arithmo diastasewn.\n");
        scanf("%d%d",&N,&M);
        if(N<MIN||N>MAX||M<MIN||M>MAX)
            printf("\n[!] Oi dunates distaseis einai megaluteres tou %d kai mikroteres tou %d.\n\n",MIN,MAX);
    }while(N<MIN||N>MAX||M<MIN||M>MAX);
    level = (char**) malloc(N * sizeof(char*));
    score = (int*)malloc(sizeof(int));
    exit = 0;
    str[8] = 0;
    srand(time(NULL));
    for(i=0;i<N;i++){
        level[i] = (char*) malloc(M * sizeof(char));
        for(j=0;j<M;j++){
            level[i][j] = rand()%9 + 49;
        }
    }
    if(level==NULL||score==NULL){
        exit = 1;
        printf("H KATAXWRHSH MNHMHS APETYXE\n");
    }
    *score = 0;
    do{
        if(exit==1)
            continue;
        levelcomplete = 0;
        printf("    ");
        for(i=0;i<M;i++){
            printf("%d ",i+1); // sthles
        }
        printf("\n");
        printf(" --");
        if(M>9)
            printf("-");
        for(i=0;i<M;i++){
            if(i>9){
                printf("-");
            }
            printf("--");
        }
        printf("\n");
        for(i=0;i<N;i++) // grammes
        {
            if(i<9){
                printf(" ");
            }
            printf("%d|", i+1);
            for(j=0;j<M;j++)
            {
                if(j<9){
                     printf(" %c",level[i][j]);
                }else
                     printf("  %c",level[i][j]);
            }


            printf("\n");
        }

        flag = 0;
        do{
            if(flag==1)
            {
                printf("\n[!]Kati phge strava, prospathise pali!\n");
            }

            printf("\n\nPista #%d, Score: %d\nDialekse thn epomenh kinhsh sou.\n", pista, *score);
            if(c==0)
                while ((c = getchar()) != '\n' && c != EOF);
            c=1;
            fgets(str, 20, stdin);
            printf("\n\n");
            for(i=0;i<20;i++){
                if(str[i]=='\n')
                    str[i]='\0';
            }

            /*
            Typoi Entolwn:

            h A,B
            b A,B
            pr
            pl
            a A,B C(1-9)
            x

            */
            flag = 0;
            if((str[0]=='h'||str[0]=='b'||str[0]=='a')&&str[1]==' '){
                i = 1;
                do{
                    i++;
                    if(str[i]<48||str[i]>57){
                       flag = 1;
                    }

                }while(flag==0);
                if(str[i]==','){
                    flag = 0;
                }
                if(flag==0){
                    do{
                        i++;
                        if(str[i]<48||str[i]>57){
                           flag = 1;
                        }

                    }while(flag==0);
                }
                if(str[i]=='\0'&&(str[0]=='h'||str[0]=='b')){
                    flag = 0; // entolh typou h/b A,B
                    x = getCoords(str, 1);
                    y = getCoords(str, 2);
                    if(x > 0 && x <= N && y > 0 && y <= M ){
                        if(str[0]=='b')
                        {
                            bomb(x-1,y-1,level, N, M, score);
                            gravity(level,0,N,M);
                        }else if(str[0]=='h'){
                            hammer(x-1,y-1,level,level[x-1][y-1], N, M, score);
                            gravity(level,0,N,M);

                        }

                    }else{
                        flag = 1;
                    }
                }
                else if(str[i]=' '&&(str[i+1]>=49&&str[i+1]<=57)){
                    flag = 0; //entolh typou a A,B C(1-9)
                    x = getCoords(str, 1);
                    y = getCoords(str, 2);
                    if(x > 0 && x <= N && y > 0 && y <= M ){
                        k=0;
                        while(str[k]!='\0'){
                            k++;
                        }
                        if(level[x-1][y-1]=='.'){
                            level[x-1][y-1]=str[k-1];
                            gravity(level,0,N,M);
                        }
                        else{
                            printf("\n[!]To plakidio prepei na einai keno.\n");
                            flag=1;
                        }
                    }
                    else
                        flag = 1;
                }
            }
            else if(str[0]=='p'){
                if(str[1]=='r'&&str[2]=='\0')
                {
                    flag = 0; // entolh pr
                    gravity(level,1,N,M);
                }

                else if(str[1]=='l'&&str[2]=='\0')
                {
                    flag = 0; // entolh pr
                    gravity(level,2,N,M);
                }
            }
            else if((str[0]=='x'||str[0]=='X')&&str[1]=='\0')
            {
                flag = 0;
                exit = 1;
                printf("\n\nHello darkness, my old friend\nIve come to talk with you again\nBecause a vision softly creeping\nLeft its seeds while I was sleeping\nAnd the vision that was planted in my brain\nStill remains\nWithin the sound of silence\n\nIn restless dreams I walked alone\nNarrow streets of cobblestone\nNeath the halo of a street lamp\nI turned my collar to the cold and damp\nWhen my eyes were stabbed by the flash of a neon light\nThat split the night\nAnd touched the sound of silence\n\nAnd in the naked light I saw\nTen thousand people, maybe more\nPeople talking without speaking\nPeople hearing without listening\nPeople writing songs that voices never share\nNo one dared\nDisturb the sound of silence\n\nFools said I, You do not know\nSilence like a cancer grows\nHear my words that I might teach you\nTake my arms that I might reach you\nBut my words like silent raindrops fell\nAnd echoed in the wells of silence\n\nAnd the people bowed and prayed\nTo the neon god they made\nAnd the sign flashed out its warning\nIn the words that it was forming\n\nAnd the sign said, The words of the prophets\nAre written on the subway walls\nAnd tenement halls\nAnd whispered in the sounds of silence\n\n");
            }
            else
                flag = 1;

        }while(flag == 1);
        levelcomplete = 1;
        i=0;
        do{
            j=0;
            do{
                if(level[i][j]!='.')
                    levelcomplete = 0;
                j++;
            }while(j<M&&levelcomplete==1);
            i++;
        }while(i<N&&levelcomplete==1);
        if(levelcomplete==1){
            free(level);
            printf("\n\nNikhses thn pista megethous: %d X %d!!!\n",N,M);
            if(N<MAX&&M<MAX){
                N++;
                M++;
                printf("As anevasoume ligo thn duskolia me mia pista megethous: %d X %d\n\n",N,M);
                level = (char**) malloc(N * sizeof(char*));
                for(i=0;i<N;i++){
                    level[i] = (char*) malloc(M * sizeof(char));
                    for(j=0;j<M;j++){
                        level[i][j] = rand()%9 + 49;
                    }
                }
            }
            else{
                printf("Termatises to paixnidi sthn megaluterh pista WOW EISAI TOSO KALOOOOOS!!!!!\n");
                exit=1;
            }
            pista++;
        }

    }while(exit == 0);
    printf("\n\nPerasmenes Pistes: %d\n\nScore: %d\n\n", pista-1, *score);
    free(level);
    free(score);


    return 0;
}



void bomb(int a, int b, char** level,int N,int M, int *score){
    if(level[a][b] != '.'){
        level[a][b] = '.';
        *score+=1;
    }
    if((a-1>=0)&&b-1>=0){
        level[a-1][b-1] = '.';
        *score+=1;
    }
    if((a+1<=N-1)&&(b+1<=M-1)){
        level[a+1][b+1] = '.';
        *score+=1;
    }
    if((a-1>=0)&&b+1<=M-1){
        level[a-1][b+1] = '.';
        *score+=1;
    }
    if((a+1<=N-1)&&b-1>=0){
        level[a+1][b-1] = '.';
        *score+=1;
    }
    if(b-1>=0){
        level[a][b-1] = '.';
        *score+=1;
    }
    if(b+1<=M-1){
        level[a][b+1] = '.';
        *score+=1;
    }
    if(a-1>=0){
        level[a-1][b] = '.';
        *score+=1;
    }
    if(a+1<=N-1){
        level[a+1][b] = '.';
        *score+=1;
    }
}

void hammer(int a, int b, char** level,char c,int N,int M,int *score){

    if(level[a][b] != '.'){
        level[a][b] = '.';
        *score+=3;
        if(a-1>=0)
            if(level[a-1][b] == c)
            {
                hammer(a-1,b,level,c,N,M,score);
            }
        if(a+1<=N-1)
            if(level[a+1][b] == c)
            {
                hammer(a+1,b,level,c,N,M,score);
            }
        if(b-1>=0)
            if(level[a][b-1] == c)
            {
                hammer(a,b-1,level,c,N,M,score);
            }
        if(b+1<=M-1)
            if(level[a][b+1] == c)
            {
                hammer(a,b+1,level,c,N,M,score);
            }
    }

}


void gravity(char **level, int type,int N,int M)
{
    int i,j,k,max;
    if(N>M)
        max = N;
    else
        max = M;
    for(k=0;k<max+1;k++){
        for(i=0;i<N;i++)
        {
            for(j=0;j<M;j++)
            {
                if(type==0&&i+1<=N-1)
                {

                    if(level[i+1][j] =='.')
                    {
                        level[i+1][j] = level[i][j];
                        level[i][j] = '.';
                    }
                }
                else if(type==1&&j+1<=M-1)
                {

                    if(level[i][j+1] =='.')
                    {
                        level[i][j+1] = level[i][j];
                        level[i][j] = '.';
                    }
                }
                else if(type==2&&j-1>=0)
                {

                    if(level[i][j-1] =='.')
                    {
                        level[i][j-1] = level[i][j];
                        level[i][j] = '.';
                    }
                }
            }
        }

    }

}

int getCoords(char str[20], int arg){
    int i,m,j, coord;
    char stop='\0';
    i = -1;
    m = 0;
    coord = 0;
    if(str[0]=='a')
        stop=' ';
    if(arg == 1){
        do{
            i++;
        }while(str[i]!=',');
        do{
            i--;
            if(m==0)
                coord +=(str[i]-48);
            else if(m==1)
                coord += (str[i]-48)*10;
            m++;
        }while(str[i-1]!=' ');
    }
    else{
        do{
            i++;
        }while(str[i]!=stop); //stop: '\0' or ' '
        if(stop ==' '){
            do{
                i++;
            }while(str[i]!=1); //stop: ' '

        }
        do{
            i--;
            if(m==0)
                coord +=(str[i]-48);
            else if(m==1)
                coord += (str[i]-48)*10;
            m++;
        }while(str[i-1]!=',');
    }

    return coord;
}