#include<dos.h>
#include<conio.h>
#include<graphics.h>
#include<stdio.h>
#include<stdlib.h>
#define UP 72
#define LEFT 75
#define RIGHT 77
#define DOWN 80
#define ESC 1
#ifdef __cplusplus
#define __CPPARGS ...
#else
#define __CPPARGS
#endif
struct SnakeParts{
int x;
int y;
}box[50],target;
void snake(int ,int );
void initialize(int,int);
void interrupt (*prev)(__CPPARGS);
void interrupt our(__CPPARGS);
void snakeb();
int check();
void Rectangle(int ,int,int,int);
int
stop=0,blocks=4,direction=2,size=10,hit=1,snake_color=14,bk=7,target_color
=4;
int stage=1,speed=100,point=0;
void main(){
int gd=DETECT,gm,x=100,y=100,i=0,j=0;
char msg[50];
initgraph(&gd,&gm,"");
/*animation*/
prev=getvect(9);
/* setcolor(bk);
rectangle(0,0,639,479);
setfillstyle(SOLID_FILL,bk);
floodfill(250,250,bk);*/
initialize(x,y);
//getch();
while (1){
/*setcolor(bk);
sprintf(msg,"POINT = %3d",point);
settextstyle(0,HORIZ_DIR,1);
outtextxy(550,100,msg); */
switch(direction){
case 0: j-=size;break;
case 1: j+=size;break;
case 2: i+=size;break;
case 3: i-=size;break;
}
setcolor(snake_color);
snake(x+i,y+j);//,x+15+i,y+15+j);
delay(speed);
setcolor(bk);
snakeb(/*x+i,y+j*/);//,x+15+i,y+15+j);
setvect(9,our);
if(stop==1){break;}
if(check()){break;}
if(hit==1){
hit=0;
target.x=size+size*random(25);
target.y=size+size*random(20);
setcolor(target_color);
setfillstyle(SOLID_FILL,target_color);
circle(target.x+size/2,target.y+size/2,size/2-1);
floodfill(target.x+size/2,target.y+size/2,target_color);
}
setfillstyle(SOLID_FILL,target_color);
setcolor(2);
circle(target.x+size/2,target.y+size/2,size/2-1);
floodfill(target.x+size/2,target.y+size/2,2);
/*setcolor(11);
sprintf(msg,"POINT = %3d",point);
settextstyle(0,HORIZ_DIR,1);
outtextxy(550,100,msg);*/
gotoxy(65,4);
printf("POINT = %3d",point);
//delay(3000);
//cleardevice();
}
closegraph();
}
void interrupt our(__CPPARGS){
//if(inportb(0x60)==UP){
//i=0;j
switch(inportb(0x60)){
case UP: if(direction==1)break;direction=0;break;
case DOWN: if(direction==0)break;direction=1;break;
case RIGHT: if(direction==3)break;direction=2;break;
case LEFT: if(direction==2)break;direction=3;break;
case 15:blocks++;break;
case ESC: stop=1;break;
}
(*prev)();
}
void snake(int x1,int y1){//,int x2,int y2){
int k=0;
//if(getcolor()==15){
for(k=blocks-1;k>0;k--){
box[k].x=box[k-1].x;
box[k].y=box[k-1].y;
}
box[0].x=x1;
box[0].y=y1;
//}
//setfillstyle(SOLID_FILL,snake_color);
for(k=0;k<blocks;k++){
Rectangle(box[k].x,box[k].y,box[k].x+size,box[k].y+size);
//floodfill(box[k].x+size/2,box[k].y+size/2,snake_color);
}
}
void snakeb(){
//setfillstyle(SOLID_FILL,bk);
for(int k=0;k<blocks;k++){
Rectangle(box[k].x,box[k].y,box[k].x+size,box[k].y+size);
//floodfill(box[k].x+size/2,box[k].y+size/2,bk);
}
}
void initialize(int x,int y){
setcolor(bk);
rectangle(0,0,639,479);
setfillstyle(SOLID_FILL,bk);
floodfill(250,250,bk);
box[0].x=x;
box[0].y=y;
for(int i=1;i<blocks;i++){
box[i].x=x-size*i;
box[i].y=y;
}
/*for(int k=0;k<blocks;k++)
rectangle(box[k].x,box[k].y,box[k].x+15,box[k].y+15);*/
}
int check(){
int i;
char msg[50];
if(!(box[0].x>=0 && box[0].x<=639 && box[0].y>=0 && box[0].y<=479)){
for( i=100;i<700;i+=100){
sound(i);
delay(100);
nosound();
}
sprintf(msg,"GAME OVER");
setcolor(4);
settextstyle(1,HORIZ_DIR,6);
outtextxy(150,200,msg);
delay(3000);
cleardevice();
return 1;
}
for( i=1;i<blocks;i++){
if(box[0].x==box[i].x && box[0].y==box[i].y){
sprintf(msg,"GAME OVER");
setcolor(4);
settextstyle(1,HORIZ_DIR,6);
outtextxy(150,200,msg);
delay(3000);
cleardevice();
return 1;
}
}
if(box[0].x==target.x && box[0].y==target.y){
//for( i=50;i<400;i+=50){
sound(700);
delay(100);
nosound();
//}
blocks++;
point++;
hit=1;
setcolor(bk);
//circle(target.x+size/2,target.y+size/2,size/2-1);
setfillstyle(SOLID_FILL,bk);
setcolor(bk);
circle(target.x+size/2,target.y+size/2,size/2-1);
floodfill(target.x+size/2,target.y+size/2,bk);
}
if(blocks==40){
stage++;
blocks=4;
sprintf(msg,"STAGE %d CLEARED",stage-1);
setcolor(4);
settextstyle(1,HORIZ_DIR,6);
outtextxy(150,200,msg);
delay(2000);
cleardevice();
initialize(100,100);
speed=100/stage;
}
return 0;
}
void Rectangle(int x1,int y1,int x2,int y2){
for(int i=0;i<size/2;i++)
rectangle(x1+i,y1+i,x2-i,y2-i);
}
