game.c

#include "game.h"
#include <SDL2/SDL_ttf.h>
#define terminate 0
#define still 1


//function to create the world
//return the world pointer if the world created correctly
int **create(){
    int x;
    int **cells;
    int a=0;
    
    while(a==0){
    printf("Please choose the way of initialization\n1)input\n2)click\nChoice:");
    x=optionChoice();
    if(x==1){
        getsize();
       cells = input_create();
       a=1;
    }
    else if(x==2){
        getsize();
        cells=click_create();
        a=1;
    }
    else{
        printf("Please input 1 or 2\n");
    }
    }
    return cells;

}



//game evolve to the terminal
//return 1 if the world is not end when exit
//return 0 when the world is end
int run_terminal(int**cells){
    int button=0;
     int q=0;
    int d=-100;
    int way=0;
    int **last=NULL;
    bool quit=true;
    int**my=NULL;
    int x=0;
   int swidth=30;
    int sheight=30;
   
    if(High>20||Width>20){
        swidth=10;
        sheight=10;
    }
    if(High<10&&Width<10){
        swidth=50;
        sheight=50;
    }

    if (SDL_Init(SDL_INIT_EVERYTHING) == -1) { return -1; }

      TTF_Init();
   int phigh=0;
    if(Width>=40&&High>=40){
        phigh=50;
    }

	// 创建窗口
	SDL_Window *sdlWindow = SDL_CreateWindow("Game of life",  SDL_WINDOWPOS_CENTERED,  SDL_WINDOWPOS_CENTERED, Width*swidth,High*sheight+phigh, SDL_WINDOW_SHOWN);
	if (!sdlWindow) { return -1; }

	// 创建渲染器
	SDL_Renderer *sdlRenderer = SDL_CreateRenderer(sdlWindow, -1, 0);
	if (!sdlRenderer) { return -1; }

	// 创建纹理
	SDL_Texture *sdlTexture = SDL_CreateTexture(sdlRenderer, SDL_PIXELFORMAT_RGBA8888, SDL_TEXTUREACCESS_TARGET, Width*swidth, High*sheight+phigh);
	if (!sdlTexture) { return -1; }

   printf("press enter to start or stop\n");

    TTF_Font *ttffont=TTF_OpenFont("lazy.ttf",20);
    SDL_Surface * sdlsurface=NULL;
    SDL_Texture * texture=NULL;
    SDL_Rect dstrect;
    SDL_Color color={52,203,120,255};/*字体颜色RGBA*/
      
     
	 char *word=NULL;
   
   if(High>=40&&Width>=40){
       way=1;
        ttffont=TTF_OpenFont("lazy.ttf",50);
    }
    
    
   
    
    SDL_Event event;

         while(quit){
             while (SDL_PollEvent(&event)){
            switch (event.type) {
                case SDL_QUIT:{
                    quit=false;
                    break;
                }
                 case SDL_KEYDOWN:{
                    switch(event.key.keysym.sym)
                    {
                          case SDLK_UP:{
                           if(delaytime==10){
                                printf("\nFastest speed already\n");
                             }
                             else{
                            printf("\nspeed up\n");
                             }
                            if(delaytime<=10){
                                delaytime = 10;
                            }
                            else{
                            delaytime = delaytime-10;
                            }
                           
                            break;
                        }  
                         case SDLK_DOWN:{
                             if(delaytime==500){
                                printf("\nLowest speed already\n");
                             }
                             else{
                            printf("\nspeed down\n");
                             }
                            if(delaytime>=500){
                                delaytime = 500;
                            }
                            else{
                            delaytime = delaytime+10;
                            }
                           
                            break;
                        }   
                        case SDLK_RETURN:{
                     if(button==0){
                           button=1;
                     }
                     else{button=0;}
                            break;
                        }   
                         case SDLK_SPACE:{
                            quit=false;
                    break;
                        }
                       
                      
                    }
                }
                

               
            }
        }

        if(last!=NULL){
        d=judge(cells,last);
        }
        if(d==0&&x==0){
            x=1;
            printf("It is terminate\n");
            printf("Close the window to continue\n");
        }
        
        if(q==0&&button==1&&d!=0){
               printf("The origin world:\n");
        }
        if(q!=0&&d!=0&&button==1){
        printf("step %d:\n",q);
        }

        if(way==0){
            show(sdlRenderer,sdlWindow,sdlTexture, cells);
           }
           else{
              
               int number=q;
              if(d==0||button==0){
                  number=number-1;
                  if(number<0){
                      number=0;
                  }
              }
          char str[25];
            char a[20]="Generations:";
	      sprintf(str, "%d" ,number);
	      word=strcat(a,str);
          sdlsurface=TTF_RenderUTF8_Blended(ttffont,word,color);
         memset(word, 0, 100*sizeof(char));
	      texture=SDL_CreateTextureFromSurface(sdlRenderer,sdlsurface);
        dstrect.x=Width*swidth/2-sdlsurface->w/2;/*显示的起始位置*/
	     dstrect.y=0;/*显示的起始位置*/
	    dstrect.w=sdlsurface->w;/*显示的宽度*/
	     dstrect.h=sdlsurface->h;/*显示的高度*/
            showlabel(sdlRenderer,sdlWindow, sdlTexture,cells,sdlsurface,texture,dstrect);
           }
        SDL_Delay(delaytime);
        
        if(d!=0&&button==1){
        free(last);
        last=copy(cells);
        updateWithoutInput(cells);
         printf("\n");
         q+=1;  
    }
    
         }
              last=copy(cells);
               my=copy(cells);
               updateWithoutInput(my);
               d=judge(my,last);
               if(d==0){
                   freecell(my);
                   freecell(last);
                    close(sdlWindow,sdlTexture,sdlRenderer);
                   return terminate;
               }
               else{
                  freecell(my);
                   freecell(last);
                    close(sdlWindow,sdlTexture,sdlRenderer);
                   return still;
               }
         
}

//input world to evolve for input steps
//return 1 if the world is not end when exit
//return 0 when the world is end
int run_step(int **cells,int y)

{
    
    int button=0;
    int mm=0;
    int x=0;
    int d=-100;
    int **last=NULL;
    int way=0;
    int **my=NULL;
    bool quit=true;
 
    int swidth=30;
    int sheight=30;

    if(High>20||Width>20){
        swidth=10;
        sheight=10;
    }
    if(High<10&&Width<10){
        swidth=50;
        sheight=50;
    }
    if (SDL_Init(SDL_INIT_EVERYTHING) == -1) { return -1; }
      TTF_Init();
   int phigh=0;
    if(Width>=40&&High>=40){
        phigh=50;
    }
   
	// 创建窗口
	SDL_Window *sdlWindow = SDL_CreateWindow("Game of life",  SDL_WINDOWPOS_CENTERED,  SDL_WINDOWPOS_CENTERED, Width*swidth,High* sheight+phigh, SDL_WINDOW_SHOWN);
	if (!sdlWindow) { return -1; }

	// 创建渲染器
	
    SDL_Renderer *sdlRenderer=SDL_CreateRenderer(sdlWindow,-1,SDL_RENDERER_ACCELERATED);
	if (!sdlRenderer) { return -1; }

	// 创建纹理
	SDL_Texture *sdlTexture = SDL_CreateTexture(sdlRenderer, SDL_PIXELFORMAT_RGBA8888, SDL_TEXTUREACCESS_TARGET, Width*swidth,High* sheight+phigh);
	if (!sdlTexture) { return -1; }

    SDL_SetRenderDrawColor(sdlRenderer, 255, 255, 255, 255);
	/*清空渲染器*/
	SDL_RenderClear(sdlRenderer);

   
   TTF_Font *ttffont=TTF_OpenFont("lazy.ttf",20);
    SDL_Surface * sdlsurface=NULL;
    SDL_Texture * texture=NULL;
    SDL_Rect dstrect;
    SDL_Color color={52,203,120,255};/*字体颜色RGBA*/
      
     
	 char *word=NULL;
   
   if(High>=40&&Width>=40){
       way=1;
        ttffont=TTF_OpenFont("lazy.ttf",50);
    }
    
    
   
    SDL_Event event;
    printf("press enter to start or stop\n");
    //certain step	
        int z=0;
        while(quit){
      
             while (SDL_PollEvent(&event)){
            switch (event.type) {
                case SDL_QUIT:{
                    quit=false;
                    break;
                    
                }
                 case SDL_KEYDOWN:{
                    switch(event.key.keysym.sym)
                    {
                          case SDLK_UP:{
                           if(delaytime==10){
                                printf("\nFastest speed already\n");
                             }
                             else{
                            printf("\nspeed up\n");
                             }
                            if(delaytime<=10){
                                delaytime = 10;
                            }
                            else{
                            delaytime = delaytime-10;
                            }
                           
                            break;
                        }  
                         case SDLK_DOWN:{
                             if(delaytime==500){
                                printf("\nLowest speed already\n");
                             }
                             else{
                            printf("\nspeed down\n");
                             }
                            if(delaytime>=500){
                                delaytime = 500;
                            }
                            else{
                            delaytime = delaytime+10;
                            }
                           
                            break;
                        }   
                        case SDLK_RETURN:{
                     if(button==0){
                           button=1;
                     }
                     else{button=0;}
                            break;
                        }   
                        case SDLK_SPACE:{
                            quit=false;
                    break;
                        }
                       
                       
                      
                    }
                }
                

               
            }
        }

        if(last!=NULL){
           d=judge(cells,last);
        } 
           if(d==0&&x==0){
               x=1;
            printf("It is terminate\n");
             printf("Close the window to continue\n");
   
           }
           if(d!=0&&z<=y&&button==1){
               if(z==0){
                printf("The origin world:\n");
               }
            else{
                printf("step %d:\n",z);
            }
           }
           if(way==0){
            show(sdlRenderer,sdlWindow,sdlTexture, cells);
           }
           else{
               int number=z;
               
               if(z>y){
                   number=y;
               }
               if(d==0||button==0){
                   number=number-1;
                    if(number<0){
                      number=0;
                  }
               }
          char str[25];
            char a[20]="Generations:";
	      sprintf(str, "%d" ,number);
	      word=strcat(a,str);
          
          sdlsurface=TTF_RenderUTF8_Blended(ttffont,word,color);
         memset(word, 0, 100*sizeof(char));
	      texture=SDL_CreateTextureFromSurface(sdlRenderer,sdlsurface);
        dstrect.x=Width*swidth/2-sdlsurface->w/2;/*显示的起始位置*/
	     dstrect.y=0;/*显示的起始位置*/
	    dstrect.w=sdlsurface->w;/*显示的宽度*/
	     dstrect.h=sdlsurface->h;/*显示的高度*/
            showlabel(sdlRenderer,sdlWindow, sdlTexture,cells,sdlsurface,texture,dstrect);
           }
            SDL_Delay(delaytime);
           if(d!=0&&z<=y&&button==1){         
           free(last);
           last=copy(cells);
            updateWithoutInput(cells);
            z++;
           }
          
           if(d!=0&&z>y&&mm==0){ 
               mm=1;
                 printf("The step is up\n");
                 printf("Please close the window to continue\n");  
           }
          
        }
         last=copy(cells);
        my=copy(cells);
                updateWithoutInput(my);
               d=judge(my,last);
                
               if(d==0){
                   freecell(my);
                   freecell(last);
                      close(sdlWindow,sdlTexture,sdlRenderer);
                   return terminate;
               }
               else{
                  freecell(my);
                   freecell(last);
                      close(sdlWindow,sdlTexture,sdlRenderer);
                   return still;
               }
        

}



//function of  whole process of a world's evolution
//return 1 if the world is not end when exit
//return 0 when the world is end
int  game(int ** cell){
    int result;
     int x;
     int a=0;
     int b=0;
     while(a==0){
     printf("Please choose the mode\n");
     printf("1-Set certain number of step\n");
     printf("2-Keep envolving\n");
     printf("Choice:");
      x=optionChoice();
   if(x==-1){
       printf("\nYou should input a digit \n");
            continue;
   }
   else if(x!=1&&x!=2){
       printf("\nYou should input a 1 or 2 \n");
            continue;
   }
   else{
       a=1;
   }
     }
     if(x==2){
      result= run_terminal(cell);
      if(result==terminate){
          return terminate;
      }
      else{
          return still;
      }
     }
     
     else{
        while(b==0){
         printf("Please input the number of evolution:");
          x=optionChoice();
          if(x==-1){
       printf("\nYou should input an integer larger than 0 \n\n");
            continue;
          }
          else if(x<=0){
               printf("\nThe number should over 0 \n\n");
               continue;
          }
          else{
              b=1;
          }
   }
   result=run_step(cell,x);
    if(result==terminate){
       
          return terminate;
      }
      else{
       
          return still;
      }
        
     }
   return 1;
}



//The whole game system
void  whole_game(char * filename){
    FILE *file=fopen(filename,"r+");

    if (file==NULL){
        printf("File not found");
        return;
    }
   
    int **cell=load(file);
    fclose(file);
    FILE *close=fopen("my.txt","w");
    int result;
    int x;
    int a;
     while(1){
         a=0;
        result=game(cell);
        if(result==terminate){
            while(a==0){
            printf("This world is terminated\n");
            printf("Do you want to play a new game?(0 for quit and 1 for yes)\n");
            printf("Choice:");
             x=optionChoice();
          if(x==-1){
            printf("\nplease input 0 or 1\n\n");
                  continue;
             }
             else if(x!=0&&x!=1){
                 printf("\nplease input 0 or 1\n\n");
                 continue;
             }
            else{
                 a=1;
             }
        }
        if(x==0){
             
             printf("\nGame closed,Bye Bye\n");
             store(close,cell);
             freecell(cell);
             fclose(close);
             return;
        }
        if(x==1){
             
            free(cell);
           cell = create();
           continue;
        }
        }
        if(result==still){
            while(a==0){
             printf("This world is not terminated\n");           
             printf("Please choose an option\n1)Quit the game\n2)Still use it for another game\n3)Create a new world\n");
             printf("Choice:");
             x=optionChoice();
             if(x==-1){
            printf("\n\nPlease input 1 or 2 or 3\n\n");
                  continue;
             }
             else if(x==1){
                 
                printf("\nGame closed,Bye Bye\n");
                
                 store(close,cell);
               
                 freecell(cell);
                
                 fclose(close);
                  return;
             }
             else if(x==2){  
                
                 a=1;
             }
             else if(x==3){
                 
                freecell(cell);
                cell=create();   
                a=1;
             }
             else{
                 printf("\n\nPlease input 1 or 2 or 3\n\n"); 
                 continue;
             }
             

            }
        }
     }
    
}