C programlama yılan oyunu (snake game)

C programlama ile yılan oyunu (snake game)

#include <graphics.h>
#include <time.h>

int main()
{
int i,x[100],y[100],rx,ry,gd,gm,l,d=2,s=16;
srand(time(NULL));
detectgraph(&gd,&gm);
initgraph(&gd,&gm,NULL);
setfillstyle(1,1);
bar(s-s/2,s-s/2,(s/2)+s*(850/s),s+s/2); //üst
bar(s-s/2,(-s/2)+s*(700/s),(s/2)+s*(850/s),(s/2)+s*(700/s));//alt
bar(s-s/2,s-s/2,s+s/2,(s/2)+s*(700/s));//sol
bar(-s/2+s*(850/s),s-s/2,(s/2)+s*(850/s),(s/2)+s*(700/s)); //sağ
x[0]=s*(850/(2*s));
y[0]=s*(700/(2*s));
bar(x[0]-s/2,y[0]-s/2,x[0]+s/2,y[0]+s/2);
l=5;
for(i=1;i<l;i++)
{
x[i]=x[0]-(i*s);
y[i]=y[0];
bar(x[i]-s/2,y[i]-s/2,x[i]+s/2,y[i]+s/2);
}

rx=s;
ry=s;
setfillstyle(1,2);
while(getpixel(rx,ry)!=0)
{
rx=s*(1+rand()%(850/s-1));
ry=s*(1+rand()%(700/s-1));

}bar(rx-s/2,ry-s/2,rx+s/2,ry+s/2);
delay(1000);
while(1)
{
setfillstyle(1,0);
bar(x[l-1]-s/2,y[l-1]-s/2,x[l-1]+s/2,y[l-1]+s/2);
for(i=l;i>0;i--)
{
x[i]=x[i-1];
y[i]=y[i-1];
}
if(d==0)
x[0]=x[0]-s;
else if(d==1)
y[0]=y[0]-s;
else if(d==2)
x[0]=x[0]+s;
else if(d==3)
y[0]=y[0]+s;
if(getpixel(x[0],y[0]==1))
break;
if(GetAsyncKeyState(VK_RIGHT)&&d!=0)
d=2;
else if(GetAsyncKeyState(VK_UP)&&d!=3)
d=1;
else if(GetAsyncKeyState(VK_LEFT)&&d!=2)
d=0;
else if(GetAsyncKeyState(VK_DOWN)&&d!=1)
d=3;
if(getpixel(x[0],y[0])==2)
{
rx=s;
ry=s;
setfillstyle(1,2);
while(getpixel(rx,ry)!=0)
{
rx=s*(1+rand()%(850/s-1));
ry=s*(1+rand()%(700/s-1));
}
bar(rx-s/2,ry-s/2,rx+s/2,ry+s/2);
l=l+1;
}
setfillstyle(1,1);
for(i=0;i<l;i++)
bar(x[i]-s/2,y[i]-s/2,x[i]+s/2,y[i]+s/2);
delay(100);
}
printf("skor:  %d",l-5);
while(!GetAsyncKeyState(VK_RETURN));
closegraph();
    getch();
    return 0;
}