我来我网
https://5come5.cn
 
您尚未 登录  注册 | 菠菜 | 软件站 | 音乐站 | 邮箱1 | 邮箱2 | 风格选择 | 更多 » 
 

本页主题: 进来看看这个程序 显示签名 | 打印 | 加为IE收藏 | 收藏主题 | 上一主题 | 下一主题

瓜瓜坠地





性别: 帅哥 状态: 该用户目前不在线
等级: 栋梁之材
家族: 考研俱乐部
发贴: 594
威望: 0
浮云: 1161
在线等级:
注册时间: 2006-05-12
最后登陆: 2007-01-09

5come5帮你背单词 [ wither /'wiðə/ v. (使)凋谢,(使)枯萎 ]


进来看看这个程序

{
    for(kk=i-1;kk>k&&k>=0;kk--)
    {
      a[kk][j]=a[j];
      fillellipse(120+k/*3.3.4 源程序*/
#include "graphics.h" /*图形系统头文件*/
#define LEFT 0x4b00 /*光标左键值*/
#define RIGHT 0x4d00 /*光标右键值*/
#define DOWN 0x5000 /*光标下键值*/
#define UP 0x4800 /*光标上键值*/
#define ESC 0x011b /* ESC键值*/
#define ENTER 0x1c0d /* 回车键值*/
int a[8][8]={0},key,score1,score2;/*具体分数以及按键与存放棋子的变量*/
char playone[3],playtwo[3];/*两个人的得分转换成字符串输出*/
void playtoplay(void);/*人人对战函数*/
void DrawQp(void);/*画棋盘函数*/
void SetPlayColor(int x);/*设置棋子第一次的颜色*/
void MoveColor(int x,int y);/*恢复原来棋盘状态*/
int QpChange(int x,int y,int z);/*判断棋盘的变化*/
void DoScore(void);/*处理分数*/
void PrintScore(int n);/*输出成绩*/
void playWin(void);/*输出胜利者信息*/
/******主函数*********/
int main(void)
{
  int gd=DETECT,gr;
  initgraph(&gd,&gr,"c:\\tc"); /*初始化图形系统*/
  DrawQp();/*画棋盘*/
  playtoplay();/*人人对战*/
  getch();
  closegraph();/*关闭图形系统*/
  return 0;
}
void DrawQp()/*画棋盘*/
{
  int i,j;
  score1=score2=0;/*棋手一开始得分都为0*/
  setbkcolor(BLUE);
  for(i=100;i<=420;i+=40)
  {
    line(100,i,420,i);/*画水平线*/
    line(i,100,i,420); /*画垂直线*/
  }
  setcolor(0);/*取消圆周围的一圈东西*/
  setfillstyle(SOLID_FILL,15);/*白色实体填充模式*/
  fillellipse(500,200,15,15); /*在显示得分的位置画棋*/
  setfillstyle(SOLID_FILL,8); /*黑色实体填充模式*/
  fillellipse(500,300,15,15);
  a[3][3]=a[4][4]=1;/*初始两个黑棋*/
  a[3][4]=a[4][3]=2;/*初始两个白棋*/
  setfillstyle(SOLID_FILL,WHITE);
  fillellipse(120+3*40,120+3*40,15,15);
  fillellipse(120+4*40,120+4*40,15,15);
  setfillstyle(SOLID_FILL,8);
  fillellipse(120+3*40,120+4*40,15,15);
  fillellipse(120+4*40,120+3*40,15,15);
  score1=score2=2; /*有棋后改变分数*/
  DoScore();/*输出开始分数*/
}
void playtoplay()/*人人对战*/
{
  int x,y,t=1,i,j,cc=0;
  while(1)/*换棋手走棋*/
  {
    x=120,y=80;/*每次棋子一开始出来的坐标,x为行坐标,y为列坐标*/
    while(1) /*具体一个棋手走棋的过程*/
    {
    PrintScore(1);/*输出棋手1的成绩*/
    PrintScore(2);/*输出棋手2的成绩*/
    SetPlayColor(t);/*t变量是用来判断棋手所执棋子的颜色*/
    fillellipse(x,y,15,15);
    key=bioskey(0);/*接收按键*/
    if(key==ESC)/*跳出游戏*/
      break;
    else
    if(key==ENTER)/*如果按键确定就可以跳出循环*/
    {
      if(y!=80&&a[(x-120)/40][(y-120)/40]!=1
&&a[(x-120)/40][(y-120)/40]!=2)/*如果落子位置没有棋子*/
      {
        if(t%2==1)/*如果是棋手1移动*/
        a[(x-120)/40][(y-120)/40]=1;
        else/*否则棋手2移动*/
        a[(x-120)/40][(y-120)/40]=2;
      if(!QpChange(x,y,t))/*落子后判断棋盘的变化*/
      {
        a[(x-120)/40][(y-120)/40]=0;/*恢复空格状态*/
        cc++;/*开始统计尝试次数*/
        if(cc>=64-score1-score2) /*如果尝试超过空格数则停步*/
        {
        MoveColor(x,y);
        fillellipse(x,y,15,15);
        break;
        }
        else
        continue;/*如果按键无效*/
      }
      DoScore();/*分数的改变*/
      break;/*棋盘变化了,则轮对方走棋*/
    }
    else/*已经有棋子就继续按键*/
      continue;
    }
    else /*四个方向按键的判断*/
    if(key==LEFT&&x>120)/*左方向键*/
    {
      MoveColor(x,y);
      fillellipse(x,y,15,15);
      SetPlayColor(t);
      x-=40;
      fillellipse(x,y,15,15);
    }
    else
    if(key==RIGHT&&x<400&&y>80)/*右方向键*/
    {
      MoveColor(x,y);
      fillellipse(x,y,15,15);
      SetPlayColor(t);
      x+=40;
      fillellipse(x,y,15,15);
    }
    else
    if(key==UP&&y>120)/*上方向键*/
    {
      MoveColor(x,y);
      fillellipse(x,y,15,15);
      SetPlayColor(t);
      y-=40;
      fillellipse(x,y,15,15);
    }
    else
    if(key==DOWN&&y<400)/*下方向键*/
    {
      MoveColor(x,y);
      fillellipse(x,y,15,15);
      SetPlayColor(t);
      y+=40;
      fillellipse(x,y,15,15);
    }
    }
    if(key==ESC)/*结束游戏*/
    break;
    if((score1+score2)==64||score1==0||score2==0)/*格子已经占满或一方棋子为0判断胜负*/
    {
    playWin();/*输出最后结果*/
    break;
    }
    t=t%2+1; /*一方走后,改变棋子颜色即轮对方走*/
    cc=0; /*计数值恢复为0*/
  } /*endwhile*/
}
void SetPlayColor(int t)/*设置棋子颜色*/
{
  if(t%2==1)
    setfillstyle(SOLID_FILL,15);/*白色*/
  else
    setfillstyle(SOLID_FILL,8);/*灰色*/
}
void MoveColor(int x,int y)/*走了一步后恢复原来格子的状态*/
{
  if(y<100)/*如果是从起点出发就恢复蓝色*/
    setfillstyle(SOLID_FILL,BLUE);
  else/*其他情况如果是1就恢复白色棋子,2恢复黑色棋子,或恢复蓝色棋盘*/
    switch(a[(x-120)/40][(y-120)/40])
    {
    case 1:
      setfillstyle(SOLID_FILL,15);break; /*白色*/
    case 2:
      setfillstyle(SOLID_FILL,8);break; /*黑色*/
    default:
      setfillstyle(SOLID_FILL,BLUE); /*蓝色*/
    }
}
int QpChange(int x,int y,int t)/*判断棋盘的变化*/
{
  int i,j,k,kk,ii,jj,yes;
  yes=0;
  i=(x-120)/40; /*计算数组元素的行下标*/
  j=(y-120)/40; /*计算数组元素的列下标*/
  SetPlayColor(t);/*设置棋子变化的颜色*/
  /*开始往8个方向判断变化*/
  if(j<6)/*往右边*/
  {
  for(k=j+1;k<8;k++)
    if(a[k]==a[j]||a[k]==0)/*遇到自己的棋子或空格结束*/
    break;
    if(a[k]!=0&&k<8)
    {
    for(kk=j+1;kk<k&&k<8;kk++)/*判断右边*/
    {
      a[kk]=a[j]; /*改变棋子颜色*/
      fillellipse(120+i*40,120+kk*40,15,15);
    }
    if(kk!=j+1) /*条件成立则有棋子改变过颜色*/
    yes=1;
    }
  }
  if(j>1)/*判断左边*/
  {
    for(k=j-1;k>=0;k--)
    if(a[k]==a[j]||!a[k])
      break;
    if(a[k]!=0&&k>=0)
    {
    for(kk=j-1;kk>k&&k>=0;kk--)
    {
      a[kk]=a[j];
      fillellipse(120+i*40,120+kk*40,15,15);
    }
   if(kk!=j-1)
      yes=1;
    }
  }
  if(i<6)/*判断下边*/
  {
    for(k=i+1;k<8;k++)
    if(a[k][j]==a[j]||!a[k][j])
      break;
    if(a[k][j]!=0&&k<8)
    {
    for(kk=i+1;kk<k&&k<8;kk++)
    {
      a[kk][j]=a[j];
      fillellipse(120+kk*40,120+j*40,15,15);
    }
    if(kk!=i+1)
      yes=1;
    }
  }
  if(i>1)/*判断上边*/
  {
    for(k=i-1;k>=0;k--)
    if(a[k][j]==a[j]||!a[k][j])
      break;
    if(a[k][j]!=0&&k>=0)
k*40,120+j*40,15,15);
    }
    if(kk!=i-1)
      yes=1;
    }
  }
  if(i>1&&j<6)/*右上*/
  {
    for(k=i-1,kk=j+1;k>=0&&kk<8;k--,kk++)
    if(a[k][kk]==a[j]||!a[k][kk])
      break;
    if(a[k][kk]&&k>=0&&kk<8)
    {
    for(ii=i-1,jj=j+1;ii>k&&k>=0;ii--,jj++)
    {
      a[ii][jj]=a[j];
      fillellipse(120+ii*40,120+jj*40,15,15);
    }
    if(ii!=i-1)
    yes=1;
    }
  }
  if(i<6&&j>1)/*左下*/
  {
    for(k=i+1,kk=j-1;k<8&&kk>=0;k++,kk--)
    if(a[k][kk]==a[j]||!a[k][kk])
      break;
    if(a[k][kk]!=0&&k<8&&kk>=0)
    {
    for(ii=i+1,jj=j-1;ii<k&&k<8;ii++,jj--)
    {
      a[ii][jj]=a[j];
      fillellipse(120+ii*40,120+jj*40,15,15);
    }
    if(ii!=i+1)
    yes=1;
    }
  }
  if(i>1&&j>1)/*左上*/
  {
    for(k=i-1,kk=j-1;k>=0&&kk>=0;k--,kk--)
    if(a[k][kk]==a[j]||!a[k][kk])
      break;
    if(a[k][kk]!=0&&k>=0&&kk>=0)
    {
    for(ii=i-1,jj=j-1;ii>k&&k>=0;ii--,jj--)
    {
      a[ii][jj]=a[j];
      fillellipse(120+ii*40,120+jj*40,15,15);
    }
    if(ii!=i-1)
    yes=1;
    }
  }
  if(i<6&&j<6)/* 右下*/
  {
    for(k=i+1,kk=j+1;kk<8&&kk<8;k++,kk++)
    if(a[k][kk]==a[j]||!a[k][kk])
      break;
    if(a[k][kk]!=0&&kk<8&&k<8)
    {
    for(ii=i+1,jj=j+1;ii<k&&k<8;ii++,jj++)
    {
      a[ii][jj]=a[j];
      fillellipse(120+ii*40,120+jj*40,15,15);
    }
    if(ii!=i+1)
    yes=1;
    }
  }
  return yes;/*返回是否改变过棋子颜色的标记*/
}
void DoScore()/*处理分数*/
{
  int i,j;
  score1=score2=0;/*重新开始计分数*/
  for(i=0;i<8;i++)
    for(j=0;j<8;j++)
    if(a[j]==1)/*分别统计两个人的分数*/
      score1++;
    else
      if(a[j]==2)
        score2++;
}
void PrintScore(int playnum)/*输出成绩*/
{
  if(playnum==1)/*清除以前的成绩*/
  {
    setfillstyle(SOLID_FILL,BLUE);
    bar(550,100,640,400);
  }
  setcolor(RED);
  settextstyle(0,0,4);/*设置文本输出样式*/
  if(playnum==1)/*判断输出哪个棋手的分,在不同的位置输出*/
  {
    sprintf(playone,"%d",score1);
    outtextxy(550,200,playone);
  }
  else
  {
    sprintf(playtwo,"%d",score2);
    outtextxy(550,300,playtwo);
  }
  setcolor(0);
}
void playWin()/*输出最后的胜利者结果*/
{
  settextstyle(0,0,4);
  setcolor(12);
  if(score2>score1)/*开始判断最后的结果*/
    outtextxy(100,50,"black win!");
  else
    if(score2<score1)
    outtextxy(100,50,"white win!");
    else
    outtextxy(60,50,"you all win!");
}
顶端 Posted: 2006-10-28 10:03 | [楼 主]
kenneygf



性别: 帅哥 状态: 该用户目前不在线
头衔: 星星在眨眼~
等级: 前途无量
发贴: 6207
威望: 0
浮云: 1131
在线等级:
注册时间: 2004-05-22
最后登陆: 2009-07-12

5come5帮你背单词 [ argue /'a:gju:/ vi. 辩论,争论;vt. 主张,论证,辩明,说服,劝说 ]


我编译了一下 运行不行
顶端 Posted: 2006-10-28 17:07 | [1 楼]
我来我网·5come5 Forum » 程序员之家

Total 0.009119(s) query 6, Time now is:11-24 02:38, Gzip enabled
Powered by PHPWind v5.3, Localized by 5come5 Tech Team, 黔ICP备16009856号