C字符贪吃蛇

　　算法参照Perl字符贪吃蛇，源码:

#include <stdio.h>
#include <windows.h>
#define WIDTH 12     // 宽
#define HEIGHT 8     // 高
#define DEBUG 0
const char FENCE ='*';    // 栅栏
const char HEAD  ='@';  // 蛇头
const char BODY  ='#';  // 蛇身
const char FOOD  ='O';  // 食物
const char BLANK =' ';  // 空白
char arr[HEIGHT][WIDTH];
struct Snake{
    int y,x;
}snake[WIDTH*HEIGHT];  // 结构体，保存坐标点
int len=,food=,key=,score=,alive=,direct=,speed=,full=(WIDTH-)*(HEIGHT-);  // 长度、食物、按键、总分、存活、方向、速度
int uldr[][]={{},{-,},{,-},{,},{,}};  // 上、左、下、右

void init(){           // 初始化游戏地图
    int y=,x=,start_pos=HEIGHT/;
    for(y=;y<HEIGHT;y++)
        for(x=;x<WIDTH;x++)
            if( y ==  || y == HEIGHT- || x ==  || x == WIDTH- ){
                    arr[y][x] = FENCE;
            }
            else{
                arr[y][x] = BLANK;
            }
    snake[].y=start_pos;
    snake[].x=;
    len++;
    snake[].y=start_pos;
    snake[].x=;
    len++;
    arr[ snake[].y ][ snake[].x ] = HEAD ;
    arr[ snake[].y ][ snake[].x ] = BODY ;
}

void show(){
    int y,x;
    if(!DEBUG)system("cls");
    printf("your score:%d\n",score);
    printf("current speed:%d\n",speed);
    for(y= ; y<HEIGHT ; y++ ){
        for(x= ; x<WIDTH ; x++ )
            printf("%c",arr[y][x]);
        printf("\n");
    }
}

void make_food(){
    int rx,ry;
    while(!food){
        rx = rand()%WIDTH;
        ry = rand()%HEIGHT;
        if(    arr[ry][rx] == BLANK ){
            arr[ry][rx]=FOOD;
            food=;
            break;
        }
    }
}

void move(){
    int cnt=;
    if( kbhit()!= ){
        while( kbhit() != )key=getch();
        switch(key){
            case 'w' : direct=(direct == )?:;break;
            case 'a' : direct=(direct == )?:;break;
            case 's' : direct=(direct == )?:;break;
            case 'd' : direct=(direct == )?:;break;
            default : direct;
        }   // 禁止反向移动
    }
    len++;  // 准备将当前位置放在snake数组首部
    if(DEBUG)printf("len:%d\n",len);
    for(cnt=len-;cnt>;cnt--){
        snake[cnt].x=snake[cnt-].x;
        snake[cnt].y=snake[cnt-].y;    // 1234 变为 51234
    }
    snake[].y+=uldr[direct][];
    snake[].x+=uldr[direct][];    // 移动蛇头
}

void check_head(){
    int y=snake[].y;
    int x=snake[].x;
    int i=;
    int cnt=;
    if(y <  || y > HEIGHT- || x <  || x > WIDTH-){  // 是否越界
        alive=;
    }
    if( arr[y][x] == BODY ){  // 是否吃到自己
        alive=;
    }
    if( arr[y][x] == BLANK){
        arr[y][x] = HEAD;
    }
    if( arr[y][x] == FOOD ){  // 吃到食物
        arr[y][x] = HEAD;
        score++;
        len++;
        food=;
        snake[len-].y=snake[len-].y;  // 蛇尾增加一节蛇身
        snake[len-].x=snake[len-].x;
        make_food();
    }
    if(DEBUG)printf("len:%d\n",len);
    if(DEBUG){
        for(;i<len;i++){
            printf("y,x:(%d,%d)\n",snake[i].y,snake[i].x);
        }
    }
    arr[ snake[len-].y ][ snake[len-].x ]=BLANK;    // 先清除蛇尾显示
    len--;
    for(cnt=;cnt<=len-;cnt++){
        arr[ snake[cnt].y ][ snake[cnt].x ]=BODY;   // 蛇身显示
    }
}

void main(){
    init();
    make_food();
    while(alive && len<full){
        move();
        check_head();
        speed=(speed > )?:(score/+);
        if(alive){
            show();
            Sleep(-speed*);  // 多久刷新一次
        }
    }
    if( len == full){
        printf("congratulations!\n");
    }
    else{
        printf("you lose\n");
    }
}