snake.cpp

#include<iostream.h>
#include<conio.h>
#include<graphics.h>
#include<dos.h>
#include<stdlib.h>
#include<stdio.h>
#include<time.h>
#include<string.h>

class Snake {
  int p1, p2, v1, v2, v3, e1, e2, prev, now, n, colr, dsp, cnt, dly, m;
  int stp, egGen;
  int xr, yr;
  void caught();
  public:
    long scr;
  int strtX, strtY, endX, endY;
  int pos[100][2];
  void show();
  void init();
  void egg();
  void transpose();
  void gnrtCond();
  void gnrtUnCond();
  void check();
  void checkEgg();
  void move();
  void chngDir();
  void sndEt();
  void sndCgt();
  int test();
  void score();
  Snake();
  Snake(Snake * );
  ~Snake();
};
Snake::Snake() {}
Snake::~Snake() {}
void Snake::checkEgg() {
  if ((e1 == p1) && (e2 == p2)) {
    sndEt();
    egg();
    dly--;
    score();
    n++;
  }
}
void Snake::sndEt() {
  nosound();
  sound(2500);
  delay(2);
  nosound();
}
void Snake::sndCgt() {
  nosound();
  for (int x = 1000; x > 0; x--) {
    sound(x);
    delay(1);
  }
  nosound();
}
void Snake::score() {
  char * p;
  ltoa(scr, p, 10);
  settextstyle(8, 0, 1);
  setcolor(0);
  outtextxy(585, 40, p);
  if (egGen != 1) {
    scr = scr + dly / 10;
  }
  ltoa(scr, p, 10);
  setcolor(10);
  outtextxy(585, 40, p);
}
void Snake::gnrtCond() {
  if (n < 367) {
    if (now == 8 && (prev != 8 && prev != 2)) {
      pos[0][0] = p1;
      pos[0][1] = p2 - dsp;
      prev = now;
    }
    if (now == 4 && (prev != 4 && prev != 1)) {
      pos[0][0] = p1 + dsp;
      pos[0][1] = p2;
      prev = now;
    }
    if (now == 2 && (prev != 8 && prev != 2)) {
      pos[0][0] = p1;
      pos[0][1] = p2 + dsp;
      prev = now;
    }
    if (now == 1 && (prev != 1 && prev != 4)) {
      pos[0][0] = p1 - dsp;
      pos[0][1] = p2;
      prev = now;
    }
  }
}
void Snake::gnrtUnCond() {
  if (prev == 8) {
    pos[0][0] = p1;
    pos[0][1] = p2 - dsp;
  }
  if (prev == 4) {
    pos[0][0] = p1 + dsp;
    pos[0][1] = p2;
  }
  if (prev == 2) {
    pos[0][0] = p1;
    pos[0][1] = p2 + dsp;
  }
  if (prev == 1) {
    pos[0][0] = p1 - dsp;
    pos[0][1] = p2;
  }
  p1 = pos[0][0];
  p2 = pos[0][1];
}
void Snake::check() {
  if (p1 > endX) {
    p1 = strtX;
  } else if (p1 < strtX) {
    p1 = endX;
  }
  if (p2 > endY) {
    p2 = strtY;
  } else if (p2 < strtY) {
    p2 = endY;
  }
  pos[0][0] = p1;
  pos[0][1] = p2;
  for (int i = 1; i < n; i++) {
    if (p1 == pos[i][0] && p2 == pos[i][1]) {
      caught();
      break;
    }
  }
}
void Snake::show() {
  int x = getcolor();
  if (egGen != 1) {
    setcolor(getbkcolor());
    setfillstyle(1, getbkcolor());
    fillellipse(v1, v2, yr, yr);
  } else
    egGen = 0;
  if (egGen == 2)
    egGen--;
  setcolor(colr);
  setfillstyle(1, 9);
  if (now == 8 || now == 2)
    fillellipse(pos[0][0], pos[0][1], xr, yr);
  else if (now == 4 || now == 1)
    fillellipse(pos[0][0], pos[0][1], yr, xr);
  setcolor(x);
}
void Snake::transpose() {
  int i, j, x, y;
  p1 = pos[0][0];
  p2 = pos[0][1];
  if (!egGen) {
    v1 = pos[n - 1][0];
    v2 = pos[n - 1][1];
  } else
    egGen = 0;
  for (i = n - 1; i >= 1; i--) {
    pos[i][0] = pos[i - 1][0];
    pos[i][1] = pos[i - 1][1];
  }
}
void Snake::move() {
  int st = 0;
  do {
    if (!kbhit()) {
      checkEgg();
      if (!st)
        show();
      else
        st = 0;
      delay(dly / 4);
      transpose();
      delay(dly / 4);
      gnrtUnCond();
      delay(dly / 4);
      check();
      delay(dly / 4);
    } else if (stp) {
      chngDir();
      gnrtCond();
      check();
      show();
      st = 1;
    }
  } while (stp);
}
void Snake::init() {
  time_t tm;
  srand(time( & tm));
  dsp = 20;
  n = 5;
  prev = 4;
  for (int i = 4; i >= 0; i--) {
    pos[i][0] = 201 + (n - i - 1) * dsp;
    pos[i][1] = 301;
  }
  strtX = 21;
  strtY = 21;
  endX = 481;
  endY = 361;
  colr = 14;
  now = prev;
  dsp = 20;
  stp = 111;
  cnt = -1;
  scr = 0;
  dly = 150;
  xr = 3;
  yr = 9;
  egg();
  egGen = 1;
  score();
  int x = getcolor();
  setlinestyle(0, 1, 3);
  setcolor(15);
  rectangle(strtX - 15, strtY - 15, endX + 15, endY + 15);
  rectangle(endX + 25, strtY - 15, getmaxx() - 15, endY + 15);
  rectangle(strtX - 15, endY + 25, getmaxx() - 15, getmaxy() - 5);
  line(endX + 25, strtY + 75, getmaxx() - 15, strtY + 75);
  line(endX + 25, strtY + 200, getmaxx() - 15, strtY + 200);
  line(endX + 25, strtY + 275, getmaxx() - 15, strtY + 275);
  setlinestyle(0, 1, 1);
  settextstyle(8, 0, 1);
  setcolor(11);
  outtextxy(514, 40, "SCORE");
  setcolor(14);
  settextstyle(11, 0, 5);
  outtextxy(524, 110, " CONTROLS ");
  outtextxy(522, 135, "p = PAUSE");
  outtextxy(522, 155, "g = RESUME");
  outtextxy(522, 175, "e = EXIT");
  outtextxy(513, 195, "ARROWS");
  outtextxy(512, 205, "    -MOVEMENT");
  setcolor(14);
  settextstyle(4, 0, 9);
  outtextxy(getmaxx() - 500, getmaxy() - 110, "SNAKE");
  settextstyle(8, 0, 1);
  setcolor(x);
}
void Snake::caught() {
  stp = 0;
  sndCgt();
  for (int i = 0; i <= 7; i++) {
    if (i % 2) {
      setcolor(10);
      outtextxy(512, 250, "GAME OVER");
      delay(900);
    } else {
      setcolor(0);
      outtextxy(512, 250, "GAME OVER");
      delay(500);
    }
  }
  sleep(1);
}
void Snake::chngDir() {
  int clr;
  fillsettingstype * p;
  char x = getch();
  if (x == 72)
    now = 8;
  else if (x == 77)
    now = 4;
  else if (x == 80)
    now = 2;
  else if (x == 75)
    now = 1;
  else if (x == 'e')
    caught();
  else if (x == 'p') { //int y = getcolor();  
    int twnkl = 1;
    settextstyle(11, 0, 9);
    while (1) {
      if (kbhit()) {
        int c = getch();
        if (c == 'g') {
          clr = getcolor();
          setcolor(0);
          rectangle(endX + 40, endY - 10, getmaxx() - 35, getmaxy() - 160);
          outtextxy(endX + 60, endY - 29, "PAUSE");
          break;
        }
      } else {
        if (twnkl % 2) {
          clr = getcolor();
          setcolor(10);
          rectangle(endX + 40, endY - 10, getmaxx() - 35, getmaxy() - 160);
          outtextxy(endX + 60, endY - 29, "PAUSE");
          setcolor(clr);
          delay(1000);
        } else {
          clr = getcolor();
          setcolor(0);
          rectangle(endX + 40, endY - 10, getmaxx() - 35, getmaxy() - 160);
          outtextxy(endX + 60, endY - 29, "PAUSE");
          delay(1000);
        }
      }
      twnkl++;
    }
    settextstyle(8, 0, 1);
  }
}
Snake::Snake(Snake * p) {
  * p = NULL;
}
void Snake::egg() {
  do {
    e1 = (rand() % 100) * dsp + strtX;
    e2 = (rand() % 100) * dsp + strtY;
  } while (test());
  int x = getcolor();
  setcolor(7);
  setfillstyle(1, random(15) + 1);
  fillellipse(e1, e2, xr + 2, xr + 2);
  setcolor(x);
  egGen = 2;
}
int Snake::test() {
  for (int i = 0; i < n; i++) {
    if (e1 == pos[i][0] && e2 == pos[i][1])
      break;
    if (v1 == e1 && v2 == e2)
      break;
    if ((e1 >= endX + 1) || (e2 >= endY + 1))
      break;
  }
  if (i != n)
    return 1;
  else
    return 0;
}
void main() {
  Snake snk;
  int gd = DETECT, gm, i, j, k, x, y;
  clrscr();
  initgraph( & gd, & gm, "C:\\Turboc3\\bgi");
  snk.init();
  snk.move();
  closegraph();
  restorecrtmode();
}