您的当前位置:首页正文

曾经听说过一个走迷宫的诀窍顺着墙沿一侧走

2020-04-08 来源:步旅网


http://www.noteach.com/program/Cjc/c/200702/21447.html

http://www.4oa.com/Article/html/6/31/445/2005/15315.html

曾经听说过一个走迷宫的诀窍:顺着墙沿一侧走。

(一直沿左侧或一直沿右侧)。本程序实现了这一

思想,小人一直沿左侧走。

迷宫是随机生成的。

开始时,按数字 1 键进入人工控制模式;按w,s,

a,d分别代表上,下,左,右方向。

开始时,按除数字 1 以外的任意键进入自动模式;

小人由电脑控制。

按 Q键结束程序。

/*

Name: maze.c

Author: zhuqing

Des cription: 迷宫探险

Date: 28-08-03 10:15

Copyright:

*/

#include

#include

#include

#include

#include

#define N 22

#define M 22

int bg[M][N];

void makebg(int,int);

void drawbg(int[][],int,int,int,int,int);

void drawman(int,int,int);

void rect(int,int,int,int);

void main(){/* main()开始 */

int step=20;

int len=10;

int size=20;

int x=0,y=0;

int i=0,j=0;

int gdriver=DETECT,gmode;

char ch;

int direc;

makebg(M,N);

/* registerbgidriver(EGAVGA_driver);*/

/* initgraph(&gdriver,&gmode,\"c:\\\urboc2\"); */

initgraph(&gdriver,&gmode,\"c:\\\c20\\\\bgi\");

cleardevice();

setwritemode(XOR_PUT);

settextstyle(1,0,3);

setcolor(GREEN);

outtextxy(100,180,\"Press to quit\");

setcolor(BLUE);

setfillstyle(LINE_FILL,BLUE);

drawbg(bg,M,N,size,0,0);

setcolor(WHITE);

x+=len;y+=len;

drawman(x,y,len);

setcolor(GREEN);

outtextxy(60,120,\"PRESS KEY <1> :YOU ,\");

outtextxy(70,150,\"OTHER KEY :AUTOMATIC\");

setcolor(WHITE);

if((ch=getch())=='1'){

/* 人工控制 */

while((ch=getch())!='q'){

drawman(x,y,len);

switch(ch){

case 'a':

if(j>0&&bg[i][j-1]==0){

if(x>step){x-=step;j--;};

}

break;

case 's':

if(iif(y<479-step){y+=step;i++;};

}

break;

case 'd':

if(jif(x<639-step){x+=step;j++;}

}

break;

case 'w':

if(i>0&&bg[i-1][j]==0){

if(y>step){y-=step;i--;}

}

break;

default :break;

}

drawman(x,y,len);

delay(800);

if(i>=M-1&&j>=N-1){

settextstyle(4,0,3);

setcolor(RED);

outtextxy(150,260,\"YOU WIN!\");

}

setcolor(WHITE);

}

closegraph();

}/* 人工控制结束 */

else{

/* 电脑控制 */

/* direc表示上一步运动方向 */

/* 并表示下一步运动方向 */

/* 0~3分别表示 西、北、东、南 */

direc=2;

i=j=0;

while(idelay(80000);

drawman(x,y,len);

switch(direc){

case 0:

/* 以3,0,1的次序尝试 */

if(iy+=step;i++;

direc=3;

}

else if(j>0&&bg[i][j-1]==0){

x-=step;j--;

direc=0;

}

else if(i>0&&bg[i-1][j]==0){

y-=step;i--;

direc=1;

}

else {

x+=step;j++;

direc=2;

}

break;

case 1:

if(j>0&&bg[i][j-1]==0){

x-=step;j--;

direc=0;

}

else if(i>0&&bg[i-1][j]==0){

y-=step;i--;

direc=1;

}

else if(jx+=step;j++;

direc=2;

}

else{

y+=step;i++;

direc=3;

}

break;

case 2:

if(i>0&&bg[i-1][j]==0){

y-=step;i--;

direc=1;

}

else if(jx+=step;j++;

direc=2;

}

else if(iy+=step;i++;

direc=3;

}

else {

x-=step;j--;

direc=0;

}

break;

case 3:

if(jx+=step;j++;

direc=2;

}

else if(iy+=step;i++;

direc=3;

}

else if(j>0&&bg[i][j-1]==0){

x-=step;j--;

direc=0;

}

else {

y-=step;i--;

direc=1;

}

break;

default :break;

}

drawman(x,y,len);

}

getch();

closegraph();

}/* 电脑控制结束 */

}/* main()结束 */

/* 绘制小人 */

void drawman(int x,int y,int len){

int r=len/4;

rect(x-r,y-len,x+r,y-len+2*r);

line(x,y-len+2*r,x,y);

line(x-len,y,x+len,y);

line(x,y,x-len,y+len);

line(x,y,x+len,y+len);

}

/* 绘制迷宫地图 */

void drawbg(int bg[][N],int a,int b,int size,int x,int y){

int startx=x;

int i,j;

for(i=0;ifor(j=0;jif(bg[i][j]==1)

rect(x,y,x+size-1,y+size-1);

x+=size;

}

x=startx;

y+=size;

}

rectangle(0,0,size*b,size*a);

line(0,0,size,0);line(0,0,0,size);

line(size*b,size*(a-1),size*b,size*a);

line(size*(b-1),size*a,size*b,size*a);

}

/* 绘制实心矩形 */

void rect(int x0,int y0,int x1,int y1){

int i,j;

for(i=x0;i<=x1;i++)

line(i,y0,i,y1);

}

/* 随机生成代表迷宫地图的数组 */

void makebg(int a,int b){

int i,j;

int ran;

int direc;

/* 初始化迷宫地图 */

for(i=0;ifor(j=0;jbg[i][j]=1;

/* 随机生成迷宫通路 */

randomize();

i=j=0;direc=2;

while(1){

bg[i][j]=0;

if(i>=M-1&&j>=N-1)break;

ran=(int)rand()*4;

if(ran<1){

if(direc!=1&&ii++;

direc=3;

}

}

else if(ran<2){

if(direc!=2&&j>0){

j--;

direc=0;

}

}

else if(ran<3){

if(direc!=3&&i>0){

i--;

direc=1;

}

}

else {

if(direc!=0&&jj++;

direc=2;

}

}

}

/* 随机生成迷宫其余部分 */

for(i=0;ifor(j=0;jif(bg[i][j]==1){

ran=(int)rand()*10;

if(ran<7)bg[i][j]=0;

}

}

因篇幅问题不能全部显示,请点此查看更多更全内容