手机上的记忆力游戏

//在tc3.0++在运行

//a数组用于随机产生1-6数表示每个方格后面的图形.用inita()函数来实现
//c数组用于记录方格的状态,用字符L(lock)表示没有打开的方格
//D(delete)表示已消去的方格.O(open)表示打开的方格.
//变量m表示按回车键的有效次数.也是记忆力参数,越小记忆力越好
//变量xpos,ypos用于表示当前光标所在的位置
//(x1,y1),(x2,y2)用于记录打开的两个方格的位置
//judge()函数用于控制光标范围,使其不能移出长方形
//win()函数用于判定游戏是否过关，通过判定每个方格是否全是'D'状态
//xago,yago 用于记录移动前的位置
//ax,ay表示行列式的行与列,用它们来控制游戏的关数,ax位于3-6之间，ay位于4-7之间
//z来控制方格后的图形
//第一关后面的图形用1-6代表的图形.第二关后面的图形用0-9十个数。第三关后面的图形用A-O十五个字母,
//第四关后面的图形用A-T二十一个字母

#include<stdio.h>
#include<dos.h>
#include<stdlib.h>
#include<conio.h>
#include<bios.h>
#define KEY_ENTER 0x1c0d
#define KEY_ESC 0x11b
#define KEY_UP 0x4800
#define KEY_DOWN 0x5000
#define KEY_F1 0x3b00
#define KEY_LEFT 0x4b00
#define KEY_RIGHT 0x4d00
#define KEY_P  0x1970
#define KEY_R 0x1372

char far *screen=(char far* )0xb8000000;
void putchxy(int y,int x,char ch,char fc,char bc)
{
  screen[(x*160)+(y<<1)+0]=ch;
  screen[(x*160)+(y<<1)+1]=(bc*16)+fc;
}

/*declare the functions*/
void help();
void inita();
void initpic();
int win();
void recover();
void initc();
int judge(int *,int *);

/*define the variables*/
int victory,xago,yago,xpos,ypos;
int ax=3,ay=4,z=0;
int c[6][7];
int a[6][7];

/*main function*/
void main()
{
int i,j,key,m=0,insure;
int x1,y1,x2,y2;
clrscr();
_AL=3;
_AH=0;
geninterrupt(0x10);
help();
getch();
clrscr();
initpic();
inita();
initc();
do{
   key=bioskey(0);
   xago=xpos;yago=ypos;
   switch(key){

 case KEY_UP:    {
    ypos--;
    if(judge(&xpos,&ypos))
        {ypos++;
        continue;}
    putchxy(xpos,ypos,177,YELLOW,BLACK);
    recover();
    break;
   }
 case KEY_DOWN:    {
    ypos++;
    if(judge(&xpos,&ypos))
        {ypos--;
        continue;}
    putchxy(xpos,ypos,177,YELLOW,BLACK);
    recover();
    break;
   }
 case KEY_LEFT:  {
    xpos--;
    if(judge(&xpos,&ypos))
        {xpos++;
        continue;}
    putchxy(xpos,ypos,177,YELLOW,BLACK);
    recover();
    break;
   }
 case KEY_RIGHT: {
    xpos++;
    if(judge(&xpos,&ypos))
        {xpos--;
        continue;}
    putchxy(xpos,ypos,177,YELLOW,BLACK);
    recover();
    break;
   }
 case KEY_ENTER:{
    if(c[ypos-10][xpos-30]=='O'||c[ypos-10][xpos-30]=='D')   continue;
    m++;
    gotoxy(47,7);
    printf("%d",m);
    switch(m%2)   /*0表示打开的方格数为2个,1表示打开的方格数为1个*/
          {
    case 1:  {
       x1=xpos;y1=ypos;
       putchxy(x1,y1,a[y1-10][x1-30],YELLOW,BLACK);
       c[y1-10][x1-30]='O';
       break;
       }   /*把打开的第一个方格位置记录下来*/
    case 0:  {
       x2=xpos;y2=ypos;  /*把打开的第二个方格位置记录下来*/
       putchxy(x2,y2,a[y2-10][x2-30],YELLOW,BLACK);
       delay(500);
       if(a[y1-10][x1-30]==a[y2-10][x2-30])/*判定第一个方格与第二个方格后的图形是否一样*/
        {
         c[y1-10][x1-30]='D';
         c[y2-10][x2-30]='D';     /*把要消去的方格的状态改为'D'*/
         putchxy(x2,y2,32,YELLOW,BLACK);
         putchxy(x1,y1,32,YELLOW,BLACK);                                           

                                                }
       else           /*方格后的图形不一样.所以把打开的方格的状态改为'L'*/
        {
         c[y1-10][x1-30]='L';
         c[y2-10][x2-30]='L';
         putchxy(x2,y2,219,YELLOW,BLACK);
         putchxy(x1,y1,219,YELLOW,BLACK);
        }
       break;
       }
          }
    break;
    }
   case KEY_P:
       {
       m=0;
       ax++;ay++;
       if(ax>6)  {ax=3;ay=4;}
       switch(ax)
         {
          case 3: z=0; break;
          case 4: z=47;break;
          case 5: z=64;break;
          case 6: z=64;break;
    }
        clrscr();
        initpic();
        inita();
        initc();
        break;
       }
   case KEY_R:
      {
       m=0;
       clrscr();
       initpic();
       inita();
       initc();
       break;
       }
  case KEY_F1:
      {
       clrscr();
       help();
       getch();
       clrscr();
       initpic();
       inita();
       initc();
       break;
      }
  case KEY_ESC:
      {
      gotoxy(30,20);
      cprintf("QUIT(Y/N)");
      while(1)
       {
       insure=getch();
       if(insure=='Y'||insure=='y') exit(1);
       if(insure=='N'||insure=='n')
    {
    delline();
    gotoxy(48,7);
    break;
    }
       }
      break;
      }

  }
victory=1;  /*先假定游戏已经结束*/
victory=win();
if(victory==0)  continue;
   else   /*已过关, 开始下一关*/
 {    clrscr();
      gotoxy(20,8);
      printf("\n\t\t\tYOU HAVE PASSED THIS MISSION!\n");
      printf("\n\t\t\twait for next mission........");
      sleep(4);
      clrscr();
      m=0;
      ax++;ay++;
      if(ax>6)  {ax=3;ay=4;}
      switch(ax)
  {
   case 3: z=0; break;
   case 4: z=47;break;
   case 5: z=64;break;
   case 6: z=64;break;
  }
      textcolor(random(6)+2);
      initpic();
      inita();
      initc();
 }
}while(1);

}
void initpic()
{
int i,j;
xpos=30;ypos=10;
for(j=10;j<10+ax;j++)
   for(i=30;i<30+ay;i++)
      putchxy(i,j,219,YELLOW,BLACK);
putchxy(30,10,177,YELLOW,BLACK);
gotoxy(23,7);
printf("the steps you used are: 0");
gotoxy(26,8);
printf("press F1 to get help");
gotoxy(30,9);
printf("MISSION:%d",ax-2);
}

void help()
{
randomize();
textcolor(random(6)+2);
char *p=
"\n\n\
\twelcome to play this game.    there are four missons.\n\
\tpress 'left' 'right' 'up' and 'down' key to move the pane.\n\
\tpress the 'enter' key to open the pane. \n\
\t\tif the opened two panes are the same will be deleted.\n\
\tpress the 'r' key to restart the game.\n\
\tpress the 'p' key to pass the current misson and play the next misson.\n\
\tpress the 'esc' key to exit the game.\n\n\n\n\n\
\t\t\t\t****************\n\
\t\t\t\t***GOOD LUCK!***\n\
\t\t\t\t****************\n\
\n\n\n\n\
\t\t\t\t\t\t\tauthor: litigo\n\
\t\t\t\t\t\t\ttime:   9/23/2003\n\
\t\t\t\t\t\t\te-mail: litigo@sohu.com\n\
\t\t\t\t\t\t\toicq:   25317747";

while(*p++)
   {
    printf("%c",*p);
    delay(30);
    }
}

void inita()
{
int b[6][7]={0},x,y,i;
   long int t;
   srand( time(&t));
for(i=1;i<=ax*ay;i++)
   {
      do{
 x=random(ax);
 y=random(ay);
 }while(b[x][y]==1);
      if(i<=ax*ay/2)  a[x][y]=i+z;
      else   a[x][y]=i-ax*ay/2+z;
      b[x][y]=1;

   }
}

void initc()
{
int i,j;
for(i=0;i<6;i++)
   for(j=0;j<7;j++)
      c[i][j]='L';

}

int judge(int *xp,int *yp)
   {
    if(*xp<30||*xp>(29+ay)||*yp<10||*yp>(9+ax))  return 1;
    else return 0;
    }

void recover()
{
  switch(c[yago-10][xago-30])
      {
       case 'O':putchxy(xago,yago,a[yago-10][xago-30],YELLOW,BLACK);break;
       case 'L':putchxy(xago,yago,219,YELLOW,BLACK);break;
       case 'D':putchxy(xago,yago,32,YELLOW,BLACK);break;
       }
}

int win()
{
 int i,j;
 for(i=0;i<ax;i++)
    for(j=0;j<ay;j++)
       if(c[i][j]!='D')  victory=0;  /*有一个没有消去就认为游戏没有结束*/
 return victory;
}