Нужны исходники игры (например, змейки)

@Juventini · Регистрация: 12.12.2013

Author24 — интернет-сервис помощи студентам

Друзья, выручайте. Короче задали написать простенькую игру для игры с компьютером на языке С. В я в этом не силён. Может кто сможет помочь, ну или хотя бы кинуть ссылку на исходники.

KOPOJI · 28.05.2014, 15:35

Сообщение от Juventini

простенькую игру

насколько простенькую?

C

#include <stdio.h>
#include <time.h>
#include <stdlib.h>
 
int main(int argc, char *argv[])
{
    int num, rnd, attempts = 0;
    srand(time(NULL));
 
    rnd = rand() % 10 + 1;
 
    puts("Guess the number!\n");
    
    do
    {
        puts("Enter your number..");
        scanf ("%d", &num);
        if(num != rnd)
            printf("Wrong! Number is %s!\n", (num > rnd ? "higher" : "lower"));
        ++attempts;
    }
    while (rnd != num);
 
    printf("Congratulations, you are win! Attempts: %d", attempts);
 
    return 0;
}

@Juventini · 28.05.2014, 15:54 **[ТС]**

нет, очень простая. нужно например Змейку, или что то тому подобное, строк на 500. У меня есть исходник змейки, но там надо исправить ошибки

KOPOJI · 28.05.2014, 16:11

А, ну я так и думал. "на 500 строк" писать сам навряд ли кто захочет.
И, боюсь, вам мало кто поможет - даже найденный пример змейки всего лишь на 181 строчку.
З.Ы. я его не запускал

C

#include <stdio.h>;
#include <conio.h>;
#include <dos.h>;
#include <stdlib.h>;
char pos (char zmx,char zmy);
char sl (int max);
void ubrsim ();
main ()
{
 char name [15][11];
 auto unsigned z;
 int rezult[15];
 register int x,y;           /*Служебная переменная*/
 auto unsigned lives=0;      /*Жизни*/
 auto unsigned bax=0;        /*Количество очков*/
 auto char zmx3;
 auto char zmy3;
 auto char zmx;              /*Координата x*/
 auto char zmy;              /*Координата y*/
 register char zmx2;         /*Координата хвоста x*/
 register char zmy2;         /*Координата хвоста y*/
 auto char flag;             /*Флаг вывода символа*/
 char mas[78][19];           /*Массив исхода*/
 register char sim;          /*Символ текущий*/
 auto char sim2;             /*Символ введенный*/
 auto char sim3;
 FILE *tab;
 
  /*      Чтение таблицы рекордов     */
 if ((tab=fopen ("zm.tab","r"))!=NULL) {
  for (x=0;x<15;x++) fscanf (tab,"%10s%4d",&name[x],&rezult[x]);
  fclose (tab);
 }
 else
  for (x=0;x<15;x++) {
   for (y=0;y<10;y++) name [x][y]='.';
   name [x][10]='\0';
   rezult[x]=0;
  }
 
/**************************Вывод страницы экрана****************************/
 do
 {
  bax=0;
  textmode (C80);
  clrscr ();
  gotoxy (30,1);
  textcolor (15);  
  cprintf ("Gai software present");
  gotoxy (34,2);
  cprintf ("'ЗМЕЙКА'");
  gotoxy (24,3);
  cprintf ("Врезания - %4u     очки - %4u",lives,bax);
  textcolor (BLUE);
  gotoxy (1,4);
  for (x=0;x<80;x++) putch ('*');
  for (x=5;x<24;x++) 
  {
   putch ('*');
   gotoxy (80,x);
   putch ('*');
  }
  for (x=0;x<80;x++) putch ('*');
  printf ("Для выхода нажми 'e'");
  ubrsim ();
  sim=getch ();
  if (sim!='e')
  {
 
/**********************************Сама игра*********************************/
  
   for (x=0;x<78;x++) for (y=0;y<19;y++) mas [x][y]=0;
   zmx=40;
   zmx2=zmx;
   zmy=12;
   zmy2=zmy;
   flag=0;
   sim='6';
   sim2='6';
   bax=0;
   do
   { 
    gotoxy (zmx,zmy);
    putch ('$');
    if (flag)
    {
     gotoxy (zmx2,zmy2);
     putch (' ');
     switch (mas [zmx2-2][zmy2-5])
     { 
      case '8': zmy2--;break;
      case '4': zmx2--;break;
      case '6': zmx2++;break;
      default: zmy2++;break;
     }
    }  
    else
    {
     do 
     {
      zmx3=sl(78)+2;
      zmy3=sl(19)+5;
      gotoxy (zmx3,zmy3);
     }
     while ((pos(zmx3,zmy3)=='$')||(pos(zmx3,zmy3)=='~'));
     putch ('~');
     flag=1;
    }
    switch (sim=mas [zmx-2][zmy-5]=((kbhit())?(sim2=getch()):sim2))
    { 
     case '8': zmy--;break;
     case '4': zmx--;break;
     case '6': zmx++;break;
     default: zmy++;break;
    }    
    delay (50);
    sim3=pos(zmx,zmy);
    if (sim3=='~')
    {
     flag=0;
     bax++;
    }   
    gotoxy (24,3);
    cprintf ("Врезания - %4u     очки - %4u",lives,bax);
   }
   while ((sim!='e')&&(sim3!='*')&&(sim3!='$'));
  }
  lives++;
  clrscr ();
  y=377;
  for (x=0;x<15;x++) if ((bax>rezult[x])&&(y==377)) y=x;
  if (y!=377) {
   for (x=14;x>=y;x--) {
    for (z=0;z<10;z++) name [x+1][z]=name [x][z];
    rezult [x+1]=rezult[x];
   }
   for (z=0;z<10;z++) name[y][z]='.';
   name [y][10]='\0';
   rezult[y]=bax;
  }
  printf ("!----------!----!\n");
  for (x=0;x<15;x++) printf ("!%10s!%4d!\n",name[x],rezult[x]);
  printf ("!----------!----!\n");
  ubrsim ();
  if (y!=377)  {
   gotoxy (2,y+2);
   textcolor (15);
   cgets (name[y]);
  }
  getch ();
 }
 while ((sim!='e')&&(lives<100));
 clrscr ();
 if ((tab=fopen ("zm.tab","w"))!=NULL) {
  for (x=0;x<15;x++) fprintf (tab,"%10s%4d",name[x],rezult[x]); 
  fclose (tab);
 }
 printf ("Программа zm написана в 'TurboC', (c) RSC, 1996");
 ubrsim ();
 getch ();
}
 
char pos (char zmx,char zmy)
{
 gotoxy (zmx,zmy);
 _AH=8;
 _BH=0;
 geninterrupt (0x10);
 return ((char)_AL);
}
char sl (int max)
{
char adr;
adr=(char)(((unsigned)rand())%(unsigned)max);
return (adr);
}
 
void ubrsim ()
{
 while (kbhit ()) getch ();
}

Добавлено через 1 минуту
А вот еще одна оттуда же(rsc-team) - ColorLines. Здесь уже почти на 100 строчек больше..
Также не запускал.

C

#include <stdio.h>;
#include <conio.h>;
#include <string.h>;
#include <stdlib.h>;
#define pospole 30
#define type 7;
zast ();
game ();
zastc ();
initgame (); /* Инициализация работы с игрой */
readhod (); /* Работа с вводом хода */
setpos ();  /* Стандартное изменение позиции */
char getsit ();   /* Чтение ситуации */
delpos ();   /* Удаление лишних вещей */
readhod2 (char *a,char *b);
unsigned ochki;
char perehod (char x,char y,char x2,char y2);
textc (unsigned char posy,char *str);
textg (unsigned char posx,unsigned char posy,char *str);
char situation [9][9]; /* Параметры в массиве */
char situation2 [9][9];
wyd (char x,char y);
perehod2 (char x,char y,char x2,char y2,int *flag);
wyd2 (char x,char y);
wyd3 (char x,char y);
writec (char x,char y);
 
main () /* Игра color lines */
{
 do {
  zast (); /* вывод заставки */
  game (); /* Сама игра */
  textc (21,"Нажми esc для выхода");
 }
 while (getch()!=27);
 zastc (); /* Конечная заставка */
}
 
zast () /* Заставка для color lines */
{
 register int x;
 textmode (C80);
 clrscr ();
 textcolor (15);
 textc (1,"RSC");
 textc (2,"present");
 textc (3,"C O L O R   L I N E S");
 textcolor (BLUE);
 textg (pospole,5,"!==================!");
 for (x=6;x<15;x++) {
  textg (pospole,x,"!");
  textg (pospole+19,x,"!");
 }
 textg (pospole,15,"!==================!");
}
 
game () /* Игра */
{
 unsigned char sit; /* Ситуация */
 initgame ();
 do {
  readhod ();
  sit=getsit ();
  switch (sit) {
   case 0: setpos ();
   case 1: delpos ();
  }
  textg (36,22,"Очки: ");
  printf ("%u",ochki);
 }
 while (getsit()!=2);
}
 
zastc () /* Заставка в конце игры */
{
 clrscr ();
 textcolor (15);
 textc (1,"Программа написана в TurboC");
 scanf ("%c");
}
 
textc (unsigned char posy,char *str) /* Печать текста в середине строки */
{
 gotoxy (40-strlen(str)/2,posy);
 cputs (str);
}
 
textg (unsigned char posx,unsigned char posy,char *str)
{
 gotoxy (posx,posy);
 cputs (str);
}
 
initgame ()
{
 char x,y;
 ochki=0;
 for (x=0;x<9;x++) for (y=0;y<9;y++) situation [x][y]=0;
 setpos ();
 setpos ();
}
 
readhod ()
{
 char x,y;
 char x2,y2;
 do {
  readhod2 (&x2,&y2);
 }
 while (situation [x2][y2]==0);
 do {
  textcolor (15);
  writec (x2,y2);
  textcolor (1);
  readhod2 (&x,&y);
  writec (x2,y2);
  if (situation [x][y]) { x2=x;
                 y2=y; }
 }
 while ((situation [x][y])||(!perehod(x2,y2,x,y)));
}
 
readhod2 (char *a,char *b) /* Ввод хода */
{
 static char x=0,y=0;
 static char x1,y1;
 char sim;
 wyd (x,y);
 do {
  x1=x;y1=y;
  sim=getch ();
  switch (sim)
  {
   case '8': if (y!=0) y--;break;
   case '2': if (y!=8) y++;break;
   case '4': if (x!=0) x--;break;
   case '6': if (x!=8) x++;break;
  }
  if ((x1!=x)||(y1!=y)) {
   wyd2 (x1,y1);
   wyd (x,y);
  }
 }
 while (sim!=13);
 wyd2 (x1,y1);
 *a=x;
 *b=y;
}
 
wyd (char x,char y)
{
 gotoxy (pospole+2+2*x,y+6);
 cputs ("+");
}
 
wyd2 (char x,char y)
{
 gotoxy (pospole+2+2*x,y+6);
 cputs (" ");
}
 
wyd3 (char x,char y)
{
 gotoxy (pospole+2+2*x,y+6);
 cputs ("*");
}
 
writec (char x,char y)
{
 gotoxy (pospole+1+2*x,y+6);
 if (situation [x][y]) cprintf ("%1u",situation [x][y]);
        else   cputs   (" ");
}
 
delpos ()
{
 char x,y,a,b;
 for (x=0;x<9;x++) for (y=0;y<9;y++) situation2 [x][y]=0;
 for (x=0;x<9;x++) {
  a=0;
  for (y=0;y<8;y++) {
   if ((situation[x][y])&&(situation [x][y]==situation [x][y+1]))
                    a++;
                    else {
                        ochki+=(a<4)?0:(a-2);
                        a=0;
                         }
   if (a==4) for (b=y-3;b<=y+1;b++) situation2 [x][b]=1;
   if (a>4) situation2 [x][y+1]=1;
  }
  ochki+=(a<4)?0:(a-2);
 }
 for (y=0;y<9;y++) {
  a=0;
  for (x=0;x<8;x++) {
   if ((situation[x][y])&&(situation [x][y]==situation [x+1][y]))
                    a++;
                    else {
                        ochki+=(a<4)?0:(a-2);
                        a=0;
                    }
   if (a==4) for (b=x-3;b<=x+1;b++) situation2 [b][y]=1;
   if (a>4) situation2 [x+1][y]=1;
  }
  ochki+=(a<4)?0:(a-2);
 }
 for (x=0;x<9;x++) for (y=0;y<9;y++)
      if (situation2[x][y]) {
       situation [x][y]=0;
       writec (x,y);
      }
}
 
char getsit ()
{
 char a,x,y;
 a=0;
 for (x=0;x<9;x++) for (y=0;y<8;y++)
      if ((situation [x][y])&&(situation [x][y]==situation [x][y+1]))
                                      a++;
                            else if (a<4) a=0;
 for (y=0;y<9;y++) for (x=0;x<8;x++)
      if ((situation [x][y])&&(situation [x][y]==situation [x+1][y]))
                                      a++;
                            else if (a<4) a=0;
 if (a<4) a=0;
 if (a!=0) return (1);
 a=0;
 for (x=0;x<9;x++) for (y=0;y<9;y++) if (situation [x][y]==0) a=1;
 if (a==0) return (2);
 return (0);
}
 
setpos ()
{
 char x;
 unsigned int a;
 unsigned int b;
 for (x=1;x<=3;x++) {
  if (getsit()!=2)
  {
   do {
    a=rand ()%9;
    b=rand ()%9;
   }
   while (situation [a][b]);
   situation [a][b]=rand ()%type+1;
   writec (a,b);
  }
 }
}
 
char perehod (char x,char y,char x2,char y2)
{
 char a,b;
 int flag;
 flag=0;
 for (a=0;a<9;a++) for (b=0;b<9;b++) situation2 [a][b]=situation [a][b];
 perehod2 (x,y,x2,y2,&flag);
 if (flag==0) return (0);
 situation [x2][y2]=situation [x][y];
 situation [x][y]=0;
 writec (x,y);
 writec (x2,y2);
 return (1);
}
 
perehod2 (char x,char y,char x2,char y2,int *flag)
{
 situation2 [x][y]=10;
 if ((x2!=x)||(y2!=y)) {
  if ((x!=0)&&(situation2 [x-1][y]==0)) perehod2 (x-1,y,x2,y2,flag);
  if ((y!=0)&&(situation2 [x][y-1]==0)) perehod2 (x,y-1,x2,y2,flag);
  if ((x!=8)&&(situation2 [x+1][y]==0)) perehod2 (x+1,y,x2,y2,flag);
  if ((y!=8)&&(situation2 [x][y+1]==0)) perehod2 (x,y+1,x2,y2,flag);
 }
 else *flag=1;
}

В общем, ищите..

@Sid1057 · 28.05.2014, 18:22

Juventini, 500 строк... объяви 500 лишних переменных

@Juventini · 28.05.2014, 18:24 **[ТС]**

спасибо больше, но у меня стоит visual studio и показывает многовато ошибок(

@Sid1057 · 28.05.2014, 18:27

нет, стало стыдно выкладывать свою...
но подумай над идей сборника, изначально дается простое меню, для выбора одной из нескольких игр, а затем идет переход в нужную часть кода, так и 500 строк наберется и запар будет меньше

@Juventini 1 / 1 / 0 Регистрация: 12.12.2013 Сообщений: 60
		1
	Нужны исходники игры (например, змейки) 28.05.2014, 15:21. Показов 1600. Ответов 6 Метки нет (Все метки) Друзья, выручайте. Короче задали написать простенькую игру для игры с компьютером на языке С. В я в этом не силён. Может кто сможет помочь, ну или хотя бы кинуть ссылку на исходники. 0

@Juventini 1 / 1 / 0 Регистрация: 12.12.2013 Сообщений: 60
	28.05.2014, 15:54 [ТС]	3
	нет, очень простая. нужно например Змейку, или что то тому подобное, строк на 500. У меня есть исходник змейки, но там надо исправить ошибки 0

@Sid1057 5 / 5 / 7 Регистрация: 22.02.2013 Сообщений: 174
	28.05.2014, 18:22	5
	Juventini, 500 строк... объяви 500 лишних переменных 0

@Juventini 1 / 1 / 0 Регистрация: 12.12.2013 Сообщений: 60
	28.05.2014, 18:24 [ТС]	6
	спасибо больше, но у меня стоит visual studio и показывает многовато ошибок( 0

@Sid1057 5 / 5 / 7 Регистрация: 22.02.2013 Сообщений: 174
	28.05.2014, 18:27	7
	нет, стало стыдно выкладывать свою... но подумай над идей сборника, изначально дается простое меню, для выбора одной из нескольких игр, а затем идет переход в нужную часть кода, так и 500 строк наберется и запар будет меньше 0

Нужны исходники игры (например, змейки)

Решение