морской бой

#include "stdafx.h"
 
#include <stdio.h>//стандартная библеотека ввода вывода
#include <stdlib.h>
//#include "stdafx.h"
/* 1-стоит корабль, 2-убит корабль,0-пустая клетка,3-промах мимо корабля,4-корабль пк,5-корабль пк.
*/
 
 
int a[10][10],b[10][10],komp=0,igrok=0,konec=1,treh=2,chetireh=1,odno=4,dvuh=3,rrr=4; /* объевляются
глобальные переменные которые необходимы во всех функциях программы
a[10][10]-поле с кораблями пользователя, b[10][10]-поле с кораблями противника */
 
void rastavit_korabli();//функция для расставления кораблей пользователем
 
void ris_pole();//функция для рисования  поля
 
void rastavit_komp();//функция для расставления кораблей компьютером
 
void hod_vash();//функция для вашего хода хода
 
void hod_pk();//функция для ходов компьютера
 
void podschet_hodov_pk();//подъсчет ходов компьютера
 
void finish();// проверка конца игры и кто выйграл
 
int main()
{
    int i,j;//объявление 2 целочисленных переменных необходимых для циклов
    for( i=0;i<10;i++)//заполнение массива
    for( j=0;j<10;j++)//a[10][10] нулями
    a[i][j]=0;        //
       for( i=0;i<10;i++)//
    for( j=0;j<10;j++)   //
    b[i][j]=0;           // аналогично для массива 2
    ris_pole();          // отрисовывается 2 пустых поля
 
    while(rrr!=0)     //запускается цикл, который будет работать пока пользователь не расставит все корабли
    rastavit_korabli();  //вызывается функция для расстановки кораблей
    ris_pole();          // после расстановки кораблей отрисовывается поле с вашими кораблями
    rastavit_komp();     //компьютер расставляет корабли
    ris_pole();
    while(konec!=0)      //пока игра не закончится продолжать выполнять этот блок
    {
        hod_vash();      // вы ходите
        finish();        // проверяется конец игры или нет, если да то эта функция выведет кто выйграл
        if(konec==0){break;}//если конец то выйти из цикла
        hod_pk();           //ходит компьютер
        podschet_hodov_pk();//считаем сколько клеток поражено
        finish();           // проверяется на конец игры и выводит соответсвующий текст если игра завершена
    }
    return 0;
}
 
void podschet_hodov_pk()
{
    int i,j,k=0;// i и j необходимы для циклов k-счетчик заполнения поля противника пораженными клетками
    for(i=0;i<10;i++)
    for(j=0;j<10;j++)
    {
        if(a[i][j]==2){k++;}//находит все клетки противника равные 2
    }
    if(k/10==2){komp=10;}//всего может быть заполнено двойками 20 клеток, значит если k/10 будет равно  2 то убиты все корабли, и переменной komp присваевается значение 10 убитых кораблей
}
 
void finish()
{
    if(igrok==10){printf("\nvi vigrali!");konec=0;}//если игрок убил 10 короблей то он выйграл и игра закончена
    if(komp==10){printf("\n vi proigrali");konec=0;}// если комп убил 10 ваших кораблей то он выйграл и игра закончена
}
 
void rastavit_korabli()
{
    int d,v,vv,d1,i,d2,x;//d1,v-первые координаты,d2,vv-координаты второй клетки,d-переменная использующаяся для оператора множественного выбора
    printf("kakoi korable vi hotite postavit? ");
    printf("\n 1- odnopalobnii\n 2-dvupalubnii\n 3-trehpalubnii\n 4-chetirehpalubnii\n 0-pravila i format vvoda");
    scanf(" %d",&d);//в переменную d записывается значение введенное с клавиатуры, от 0 до 4
    switch(d)//сюда передается переменная d для выбора какой из блоков выполнять
    case 1://если ввели 1 то выполнится этот блок
      {   x=4;
      printf("\nvvedi 4 razlichnie korobley \n");
      if(odno!=0){
      while(x!=0){
          printf("\nvvedi korable \n");
         // for(i=0;i<4;i++){
          scanf("%d %d",&d1,&v); //ввод координат клетки
            d1--;
            v--;
            if(d1<10 &&  d1>=0 && v<10 && v>=0){
          a[d1][v]=1;//заполнение этой клетки значением 1
          ris_pole();//отрисовка поля
          x--;
            }
            else{ris_pole();printf("\n neccorectnii vvod\n");}
          //}
           }
           odno=0;
           rrr--;
      }else{ris_pole();printf("\ndanniy tip korablei vi uze vvodili\n");}
        break;//выход из операторы множественного выбора
 
    case 2://если ввели 2  то выполнится этот блок
      {     x=3;
          if(dvuh!=0){
 
         while(x!=0)
          {
          printf("vvedi 3 razlichnie koordinati 3 korobley \n (vvedte koordinati nachala i konca korabli )");
          scanf("%d %d",&d1,&v);//получение координат начала корабля
          scanf("%d %d",&d2,&vv);//получение координат конца корабля
             d1--;
             d2--;
             v--;
             vv--;
             if((d1-d2)==0 && (v>vv || v<vv)){a[d1][v]=1;a[d2][vv]=1;x--;ris_pole();}//если лежит на одной горизонтали построить
             else{if((d1>d2 || d1<d2) && (v-vv)==0){a[d1][v]=1;a[d2][vv]=1;ris_pole();x--;}//если лежит на одной горизонтали, то построить
             else{ris_pole();printf("\n neccorectnii vvod\n");}}
           //  ris_pole();//отрисовать поле
 
          }
          dvuh=0;
          rrr--;
          }else{ris_pole();printf("\ndannii tip korably vi uze vvodili\n");}
        break;
      }
    case 3://если ввели 3, то выполница этот блок
      {   x=2;
           if(treh!=0){
          while(x!=0)
          {
          printf("vvedi razlichnie koordinati trehpalubnogo korobly  \n (vvedte koordinati nachala i konca korabli )");
          scanf("%d %d",&d1,&v);// получение начала корабля
          scanf("%d %d",&d2,&vv);//получение координат конца коробля
             d1--;
             d2--;
             v--;
             vv--;
             if((d1-d2)==0 && (v>vv || v<vv) && ((v-vv)==2 || (v-vv)==-2))// если лежит на одной горизонтали  то расставить корабли
             {
                 a[d1][v]=1;
                 a[d2][vv]=1;
                 if(v<vv){a[d1][v+1]=1;}
                 else{a[d1][v-1]=1;}
                 ris_pole();
                 x--;
             }else{
             if((d1>d2 || d1<d2) && (v-vv)==0 && ((d1-d2)==2 || (d1-d2)==-2))//если лежат на одной вертикали
             {
                 a[d1][v]=1;
                 a[d2][vv]=1;
                 if(d1<d2){a[d1+1][v]=1;}
                 else{a[d1-1][v]=1;}
                 ris_pole();
                 x--;
             }else{ris_pole();printf("\n neccorectnii vvod\n");}
             }
           //  ris_pole();//после ввода отрисовать поле
 
          }
          treh=0;
            rrr--;
           }
           else{ris_pole();printf("\ndanniy tip korably vi uze vvodili\n");}
        break;
      }
    case 4://если ввели 4 то выполняется вот этот блок
      { x=1;
      if(chetireh!=0){
          while(x!=0){
          printf("vvedi koordinati korobley \n (vvedte koordinati nachala i konca korabli )");
 
          scanf("%d %d",&d1,&v);//ввод начала коробля
          scanf("%d %d",&d2,&vv);//ввод конца коробля
           d1--;
             d2--;
             v--;
             vv--;
             if((d1-d2)==0 && (v>vv || v<vv))//если лежат на одной горизонтали то заполнить
             {
                 a[d1][v]=1;
                 a[d2][vv]=1;
                 if(v>vv){a[d1][v]=1;
                 a[d2][vv]=1;a[d1][vv+1]=1;a[d1][vv+2]=1;x--;ris_pole();}
                 if(vv>v){a[d1][v]=1;
                 a[d2][vv]=1;a[d1][v+1]=1;a[d1][v+2]=1;x--;ris_pole();}
             }else{
             if((d1>d2 || d1<d2) && (v-vv)==0)//если лежат на одной вертикали то заполнить
             {
                 a[d1][v]=1;
                 a[d2][vv]=1;
                 if(d1>d2){a[d2+1][v]=1;a[d2+2][v]=1;x--;ris_pole();}
                 if(d2>d1){a[d1+1][vv]=1;a[d1+2][vv]=1;x--;ris_pole();}
             }else{ris_pole;printf("\n neccorectnii vvod\n");}}
             //ris_pole();// после ввода отрисовать поле
          }
          chetireh=0;
          rrr--;
      }else{ris_pole();printf("\ndanniy tip korobly vi uze vvodili\n");}
        break;//выход из этого блока
      }
    case 0://если ввели 0 то выполняется этот блок
      {   ris_pole();
          printf("\n vi dolzhni rasstavit na igrovom pole 10x10 1-chetirehpalubnii,2-trehpalubnih,3-dvuhalubnih, 4-odnopalubnii\n korabli ne mogut bit postroeni po diagonalam\n");
          break;
      }
      default:{ris_pole();printf("\n neccorectnii vvod \n");}//если ввод неккоректен то выпоница этот блок
}}
 
void ris_pole()
{
    /* в отрисовке плей используется условие если неравно 10 и для 10 отдельный вывод,
    это необходимо ждля того чтобы вывод 10 строки кажлого поля выглядел корректно
    */
  int i,j;//переменные для циклов
  printf("\n     vashe pole                         pole protivnika\n");
  printf(" ");//вывод пробела
  for(i=1;i<=10;i++)                         //
  { if(i!=10)                                //
     {                                      //
    printf("  %d",i);}else{printf(" %d",i);}//вывод строки с цифрами над вашим полем
     }
     printf("     ");
  for(i=1;i<=10;i++)
    { if(i!=10){
    printf("  %d",i);}else{printf(" %d",i);}//вывод строки с цифрами над полем вашего противника
}  printf("\n");//перевод строки
  for(i=1;i<11;i++)//вывод строк обоих полей
  {   if(i!=10){//пока не равно 10
      printf(" %d ",i);//выводится номер строки
      for(j=1;j<11;j++)//цикл для вывода строки вашего поля
      {
              printf("%d  ",a[i-1][j-1]); //
 
    }
    printf(" %d ",i);//выводится ВТОРОЙ номер строки
    printf("  ");     for(j=1;j<11;j++)//тоже самое что и на верху, но для поля противника
     if(b[i-1][j-1]==1 || b[i-1][j-1]==4 || b[i-1][j-1]==5 || b[i-1][j-1]==6){//проверяет если есть корабль в данной точке то он выводит 0
      printf("0  ");}else{
          printf("%d  ",b[i-1][j-1]);
        }
      printf("\n");}
      else
      {
           //если равно 10 то выполняется этот блок, здесь все идентично, только
      printf("%d ",i);//здесь при выводе нет отступа от левого края экрана
      for(j=1;j<11;j++)
      printf("%d  ",a[i-1][j-1]);
      printf("%d ",i);//сдесь выводися ВТОРОЙ номер строки
      printf("  ");
      for(j=1;j<11;j++)
      if(b[i-1][j-1]==1 || b[i-1][j-1]==4 || b[i-1][j-1]==5 || b[i-1][j-1]==6){
     printf("0  ");}else{
      printf("%d  ",b[i-1][j-1]);}
      printf("\n");
      }
  }
 
}
 
void rastavit_komp()
{
  FILE *fp;//объявляем указатель на файл
  int i,j,r;
  //ltime = time(NULL);
    // stime = (unsigned) ltime/2;
     //srand(stime);
     r=rand()%10;//генерируем случайное значение
     switch(r)//и по этому значению выбираем одну из заранее заготовленных карт
     case 0:
     {
         fp=fopen("maps0.dat","r");//открытие файла с режимом только для чтения
         for(i=0;i<10;i++)//считывается в массив
          for(j=0;j<10;j++)
         fscanf(fp,"%d",&b[i][j]);
        break;
     case 1:{
         fp=fopen("maps1.dat","r");
         for(i=0;i<10;i++)
          for(j=0;j<10;j++)
         fscanf(fp,"%d",&b[i][j]);
         break;
     }
     case 2:{
         fp=fopen("maps2.dat","r");
         for(i=0;i<10;i++)
          for(j=0;j<10;j++)
         fscanf(fp,"%d",&b[i][j]);
         break;
     }
     case 3:{
         fp=fopen("maps3.dat","r");
         for(i=0;i<10;i++)
          for(j=0;j<10;j++)
         fscanf(fp,"%d",&b[i][j]);
         break;
     }
     case 4:{
         fp=fopen("maps4.dat","r");
         for(i=0;i<10;i++)
          for(j=0;j<10;j++)
         fscanf(fp,"%d",&b[i][j]);
         break;
     }
    case 5: {
         fp=fopen("maps5.dat","r");
         for(i=0;i<10;i++)
          for(j=0;j<10;j++)
         fscanf(fp,"%d",&b[i][j]);
         break;
     }
     case 6:{
         fp=fopen("maps6.dat","r");
         for(i=0;i<10;i++)
          for(j=0;j<10;j++)
         fscanf(fp,"%d",&b[i][j]);
         break;
     }
     case 7:{
         fp=fopen("maps7.dat","r");
         for(i=0;i<10;i++)
          for(j=0;j<10;j++)
         fscanf(fp,"%d",&b[i][j]);
         break;
     }
     case 8:{
         fp=fopen("maps8.dat","r");
         for(i=0;i<10;i++)
          for(j=0;j<10;j++)
         fscanf(fp,"%d",&b[i][j]);
         break;
     }
    case 9:{
         fp=fopen("maps9.dat","r");
         for(i=0;i<10;i++)
          for(j=0;j<10;j++)
         fscanf(fp,"%d",&b[i][j]);
         break;
     }}
     fclose(fp);//заврывается файл
 
}
 
 
void hod_vash()
{   int x,y,z=0,i,j,k=0;//x,y-координаты клетки ввода,z-условие выхода из цикла
    printf("\n vvedi koordinati hoda: ");
    while(z!=1 && konec==1){
    scanf("%d %d",&x,&y);//ввод координат клетки
    x--;
    y--;
    if(b[x][y]==1){//если попал по кораблю
    b[x][y]=2;//этой клетке присваевается значение 2
    if(b[x][y-1]!=1 && b[x][y+1]!=1 && b[x-1][y]!=1 && b[x+1][y]!=1)//и проверяется нет ли вокруг нее клетки со значением 1
    {//если нет то выводится убит и переменная игрок увеличевается на 1
        ris_pole();printf("\n ubit\n");
        igrok++;}
 
    else{ris_pole();printf("\n ranen\n");}}//если есть вокруг 1 то выводится ранен
 
    else{if(b[x][y]!=4 && b[x][y]!=5 && b[x][y]!=6 ){if(b[x][y]==0){z=1;b[x][y]=3;ris_pole();printf("\nmimo\n");}else{ris_pole();printf("\nv dannuy kletku nelza udarit\n");}//если не попал выводится соответствующий текст и z присваевается значение 1 что является условием выхода из цикла
        }}
///////////////////////////////////////////////////////////////////////
if(b[x][y]==4)
{   k=0;
    b[x][y]=2;
    for(i=1;i<11;i++)
     for(j=1;j<11;j++)
      if(b[i][j]==4){k++;}
      if(k==0){ris_pole();printf("\nubit\n");igrok++;}
      else{ris_pole();printf("\nranen\n");}
}
/////////////////////////////
if(b[x][y]==5)
{   k=0;
    b[x][y]=2;
    for(i=1;i<11;i++)
     for(j=1;j<11;j++)
      if(b[i][j]==5){k++;}
      if(k==0){ris_pole();printf("\nubit\n");igrok++;}
      else{ris_pole();printf("\nranen\n");}
}
//////////////////////////////
if(b[x][y]==6)
{   k=0;
    b[x][y]=2;
    for(i=1;i<11;i++)
     for(j=1;j<11;j++)
      if(b[i][j]==6){k++;}
      if(k==0){ris_pole();printf("\nubit\n");igrok++;}
      else{ris_pole();printf("\nranen\n");}
}
////////////////////////////////
finish();
}}
/*
 
суть следующей функции, в том что компьютер генерируют 2 случайных значения и проверяет есть ли
там корабль, если  есть, то комп генерирует случайное значение направления, и бомбит пока не промахнется.
*/
 
void hod_pk()
{   int z=0,r,x,y,end=1;
     /*long ltime;
     ltime = time(NULL);
     stime = (unsigned) ltime/2;
     srand(stime);
     */
     while(z!=1){
    x=rand()%10;
     y=rand()%10;
     if(a[x][y]!=2 && a[x][y]!=3)
     {   if(a[x][y]==1){
         a[x][y]=2;
         r=rand()%10;
             switch(r)
             case 1:
             {
                 if(x+1<10)
                 while(end!=0)
                 {    x=x+1;
                     if(a[x][y]!=2 && a[x+1][y]!=3 && x<=10 && a[x][y]==1)
                     {
                         a[x][y]=2;
                     }else{a[x][y]=3;end=0;z=1;}
                 }
                 break;
             case 2:
             {
                 if(y+1<10)
                 while(end!=0)
                 {    y=y+1;
                     if(a[x][y]!=2 && a[x+1][y]!=3 && y<10 && a[x][y]==1)
                     {
                         a[x][y]=2;
                     }else{a[x][y]=3;end=0;z=1;}
                 }
                 break;}
              case 3:
              {
                  if(x-1>=0)
                 while(end!=0)
                 {    x=x-1;
                     if(a[x][y]!=2 && a[x+1][y]!=3 && x>=0 && a[x][y]==1)
                     {
                         a[x][y]=2;
                     }else{a[x][y]=3;end=0;z=1;}
                 }
                 break;}
         }
     }
     else{a[x][y]=3;z=1;}
     ris_pole();
 
     }
}}