【PROTEUS仿真】AT89C51實現簡單貪喫蛇程序

原理圖

源程序

#include <reg51.h>
#define uchar unsigned char
#define SNAKE 20                 //最大長長度
#define TIME 50                 //顯示延時時間
#define SPEED 71               //速度控制

sbit Left=P3^4;       	  //左
sbit Right=P3^2;			  //右
sbit Up=P3^3;		  //上
sbit Down=P3^5;			  //下
uchar x[SNAKE+1];
uchar y[SNAKE+1];
uchar time,n,i,e;              //延時時間，當前蛇長，通用循環變量，當前速度
char addx,addy;                //位移偏移量 
/********************
延時程序
*********************/
void delay(char MS)
{
    char us,usn;
    while(MS!=0)
    {
        usn = 0;
        while(usn!=0)
        {
            us=0xff;
            while (us!=0)
            {
                us--;
            };
            usn--;
        }
        MS--;
    }
}
/*******************************************
判斷碰撞
*******************************************/
bit knock()
{
    bit k;
    k=0;
    if(x[1]>7||y[1]>7)k=1;                             //撞牆
    for(i=2; i<n; i++)if((x[1]==x[i])&(y[1]==y[i]))k=1; //撞自己 
    return k;
}
/*****************
上下左右鍵位處理
*****************/
void turnkey()// interrupt 0 using 2
{
    //Left=1;
    if(!Down)
    {
        addy=0;
        if(addx!=1)addx=-1;
        else addx=1;
    }
    if(!Up)
    {
        addy=0;
        if(addx!=-1)addx=1;
        else addx=-1;
    }
    if(!Left)
    {
        addx=0;
        if(addy!=-1)addy=1;
        else addy=-1;
    }
    if(!Right)
    {
        addx=0;
        if(addy!=1)addy=-1;
        else addy=1;
    }
}
/*****************
乘方程序
*****************/
uchar mux(uchar temp)
{
    if(temp==7)return 128;
    if(temp==6)return 64;
    if(temp==5)return 32;
    if(temp==4)return 16;
    if(temp==3)return 8;
    if(temp==2)return 4;
    if(temp==1)return 2;
    if(temp==0)return 1;
    return 0;
}
/*****************
顯示時鐘 顯示程序
*****************/
void timer0(uchar k)
{
    while(k--)
    {
        for(i=0; i<SNAKE+1; i++)
        {
            P2=mux(x[i]);
            P1=255-mux(y[i]);
            turnkey();                     //上下左右鍵位處理
            delay(TIME);                   //顯示延遲
            P2=0x00;
            P1=0xff;
        }
    }
}
/*****************
主程序 
*****************/
void main(void)
{
    e=SPEED;
    P0=0x00;
    P1=0xff;
    P2=0x00;
    P3=0xff;
    while(1)
    {
        for(i=3; i<SNAKE+1; i++)x[i]=100;
        for(i=3; i<SNAKE+1; i++)y[i]=100; //初始化 
        x[0]=4;
        y[0]=4;                                                //果子
        n=3;                                                          //蛇長 n=-1
        x[1]=1;
        y[1]=0;                                                //蛇頭
        x[2]=0;
        y[2]=0;                                                //蛇尾1
        addx=0;
        addy=0;                                                //位移偏移

        while(1)
        {
            if(!Down||!Up||!Left||!Right)break;
            timer0(1);
        }
        while(1)
        {
            timer0(e);
            if(knock())
            {
                e=SPEED;    //判斷碰撞
                break;
            }
            if((x[0]==x[1]+addx)&(y[0]==y[1]+addy))         //是否喫東西 
            {
                n++;
                if(n==SNAKE+1)
                {
                    n=3;
                    e=e-10;
                    for(i=3; i<SNAKE+1; i++)x[i]=100;
                    for(i=3; i<SNAKE+1; i++)y[i]=100;
                }
                x[0]=x[n-2];
                y[0]=y[n-2];
            }
            for(i=n-1; i>1; i--)
            {
                x[i]=x[i-1];
                y[i]=y[i-1];
            }

            x[1]=x[2]+addx;
            y[1]=y[2]+addy;                     //移動
        }
    }
}

運行效果