今天你apple了吗？

案例一 贪吃蛇游戏（学习基于while(!keyhit())的即时原理）
#define N 200
#include <graphics.h>
#include <stdlib.h>
#include <dos.h>
#define LEFT 0x4b00
#define RIGHT 0x4d00
#define DOWN 0x5000
#define UP 0x4800
#define ESC 0x011b
int i,key;
int score=0;/*得分*/
int gamespeed=50000;/*游戏速度自己调整*/
struct Food
{
int x;/*食物的横坐标*/
int y;/*食物的纵坐标*/
int yes;/*判断是否要出现食物的变量*/
}food;/*食物的结构体*/
struct Snake
{
int x[N];
int y[N];
int node;/*蛇的节数*/
int direction;/*蛇移动方向*/
int life;/* 蛇的生命,0活着,1死亡*/
}snake;
void Init(void);/*图形驱动*/
void Close(void);/*图形结束*/
void DrawK(void);/*开始画面*/
void GameOver(void);/*结束游戏*/
void GamePlay(void);/*玩游戏具体过程*/
void PrScore(void);/*输出成绩*/
void main(void) /*主函数*/
{
Init();/*图形驱动*/
DrawK();/*开始画面*/
GamePlay();/*玩游戏具体过程*/
Close();/*图形结束*/
}
void Init(void) /*图形驱动*/
{
int gd=DETECT,gm;
initgraph(&gd,&gm,"c:\\tc");
cleardevice();
}
/*开始画面，左上角坐标为（50，40），右下角坐标为（610，460）的围墙*/
void DrawK(void)
{
/*setbkcolor(LIGHTGREEN);*/
setcolor(11);
setlinestyle(SOLID_LINE,0,THICK_WIDTH);/*设置线型*/
for(i=50;i<=600;i+=10)/*画围墙*/
{
rectangle(i,40,i+10,49); /*上边*/
rectangle(i,451,i+10,460);/*下边*/
}
for(i=40;i<=450;i+=10)
{
rectangle(50,i,59,i+10); /*左边*/
rectangle(601,i,610,i+10);/*右边*/
}
}
void GamePlay(void) /*玩游戏具体过程*/
{
randomize();/*随机数发生器*/
food.yes=1;/*1表示需要出现新食物,0表示已经存在食物*/
snake.life=0;/*活着*/
snake.direction=1;/*方向往右*/
snake.x[0]=100;snake.y[0]=100;/*蛇头*/
snake.x[1]=110;snake.y[1]=100;
snake.node=2;/*节数*/
PrScore();/*输出得分*/
while(1)/*可以重复玩游戏,压ESC键结束*/
{
while(!kbhit())/*在没有按键的情况下,蛇自己移动身体*/
{
    if(food.yes==1)/*需要出现新食物*/
    {
    food.x=rand()%400+60;
    food.y=rand()%350+60;
    while(food.x%10!=0)/*食物随机出现后必须让食物能够在整格内,这样才可以让蛇吃到*/
       food.x++;
    while(food.y%10!=0)
       food.y++;
       food.yes=0;/*画面上有食物了*/
    }
    if(food.yes==0)/*画面上有食物了就要显示*/
    {
setcolor(GREEN);
rectangle(food.x,food.y,food.x+10,food.y-10);
    }
for(i=snake.node-1;i>0;i--)/*蛇的每个环节往前移动,也就是贪吃蛇的关键算法*/
{
snake.x=snake.x[i-1];
    snake.y=snake.y[i-1];
    }
switch(snake.direction) /*1,2,3,4表示右,左,上,下四个方向,通过这个判断来移动蛇头*/
    {
    case 1:snake.x[0]+=10;break;
    case 2: snake.x[0]-=10;break;
    case 3: snake.y[0]-=10;break;
    case 4: snake.y[0]+=10;break;
    }
    for(i=3;i<snake.node;i++)/*从蛇的第四节开始判断是否撞到自己了，因为蛇头为两节，第三节不可能拐过来*/
    {
    if(snake.x==snake.x[0]&&snake.y==snake.y[0])
    {
GameOver();/*显示失败*/
snake.life=1;
break;
    }
}
   if(snake.x[0]<55||snake.x[0]>595||snake.y[0]<55||
    snake.y[0]>455)/*蛇是否撞到墙壁*/
   {
    GameOver();/*本次游戏结束*/
    snake.life=1; /*蛇死*/
   }
   if(snake.life==1)/*以上两种判断以后,如果蛇死就跳出内循环，重新开始*/
break;
   if(snake.x[0]==food.x&&snake.y[0]==food.y)/*吃到食物以后*/
   {
setcolor(0);/*把画面上的食物东西去掉*/
rectangle(food.x,food.y,food.x+10,food.y-10);
    snake.x[snake.node]=-20;snake.y[snake.node]=-20;
/*新的一节先放在看不见的位置,下次循环就取前一节的位置*/
    snake.node++;/*蛇的身体长一节*/
    food.yes=1;/*画面上需要出现新的食物*/
    score+=10;
    PrScore();/*输出新得分*/
   }
   setcolor(4);/*画出蛇*/
   for(i=0;i<snake.node;i++)
    rectangle(snake.x,snake.y,snake.x+10,
snake.y-10);
   delay(gamespeed);
   setcolor(0);/*用黑色去除蛇的的最后一节*/
   rectangle(snake.x[snake.node-1],snake.y[snake.node-1],
   snake.x[snake.node-1]+10,snake.y[snake.node-1]-10);
} /*endwhile（！kbhit）*/
if(snake.life==1)/*如果蛇死就跳出循环*/
break;
key=bioskey(0);/*接收按键*/
if(key==ESC)/*按ESC键退出*/
break;
else
if(key==UP&&snake.direction!=4) /*判断是否往相反的方向移动*/
    snake.direction=3;
else
    if(key==RIGHT&&snake.direction!=2)
    snake.direction=1;
    else
    if(key==LEFT&&snake.direction!=1)
        snake.direction=2;
    else
       if(key==DOWN&&snake.direction!=3)
        snake.direction=4;
}/*endwhile(1)*/
}
void GameOver(void) /*游戏结束*/
{
cleardevice();
PrScore();
setcolor(RED);
settextstyle(0,0,4);
outtextxy(200,200,"GAME OVER");
getch();
}
void PrScore(void) /*输出成绩*/

{
char str[10];
setfillstyle(SOLID_FILL,YELLOW);
bar(50,15,220,35);
setcolor(6);
settextstyle(0,0,2);
sprintf(str,"score:%d",score);
outtextxy(55,20,str);
}
void Close(void) /*图形结束*/
{
getch();
closegraph();
}
案例二 计算器
#include <dos.h> /*DOS接口函数*/
#include <math.h> /*数学函数的定义*/
#include <conio.h> /*屏幕操作函数*/
#include <stdio.h> /*I/O函数*/
#include <stdlib.h> /*库函数*/
#include <stdarg.h> /*变量长度参数表*/
#include <graphics.h> /*图形函数*/
#include <string.h> /*字符串函数*/
#include <ctype.h> /*字符操作函数*/
#define UP 0x48 /*光标上移键*/
#define DOWN 0x50 /*光标下移键*/
#define LEFT 0x4b /*光标左移键*/
#define RIGHT 0x4d /*光标右移键*/
#define ENTER 0x0d /*回车键*/
void *rar; /*全局变量，保存光标图象*/
struct palettetype palette; /*使用调色板信息*/
int GraphDriver;    /* 图形设备驱动*/
int GraphMode;    /* 图形模式值*/
int ErrorCode;        /* 错误代码*/
int MaxColors;        /* 可用颜色的最大数值*/
int MaxX, MaxY;    /* 屏幕的最大分辨率*/
double AspectRatio;    /* 屏幕的像素比*/
void drawboder(void); /*画边框函数*/
void initialize(void); /*初始化函数*/
void computer(void); /*计算器计算函数*/
void changetextstyle(int font, int direction, int charsize); /*改变文本样式函数*/
void mwindow(char *header); /*窗口函数*/
int specialkey(void) ; /*获取特殊键函数*/
int arrow(); /*设置箭头光标函数*/
int main() /*主函数*/
{
initialize(); /* 设置系统进入图形模式    */
computer();    /*运行计算器    */
closegraph(); /*系统关闭图形模式返回文本模式*/
return(0); /*结束程序*/
}
void initialize(void) /* 设置系统进入图形模式    */
{
int xasp, yasp;    /* 用于读x和y方向纵横比*/
GraphDriver = DETECT; /* 自动检测显示器*/
initgraph( &GraphDriver, &GraphMode, "" ); /*初始化图形系统*/
ErrorCode = graphresult();         /*读初始化结果*/
if( ErrorCode != grOk ) /*如果初始化时出现错误*/
{
printf("Graphics System Error: %s\n",
grapherrormsg( ErrorCode ) ); /*显示错误代码*/
exit( 1 ); /*退出*/
}
getpalette( &palette );         /* 读面板信息*/
MaxColors = getmaxcolor() + 1;    /* 读取颜色的最大值*/
MaxX = getmaxx(); /* 读屏幕尺寸    */
MaxY = getmaxy();     /* 读屏幕尺寸    */
getaspectratio( &xasp, &yasp );     /* 拷贝纵横比到变量中*/
AspectRatio = (double)xasp/(double)yasp;/* 计算纵横比值*/
}
void computer(void) /*计算器函数*/
{
struct viewporttype vp; /*定义视口类型变量*/
int color, height, width;
int x, y,x0,y0, i, j,v,m,n,act,flag=1;
float num1=0,num2=0,result; /*操作数和计算结果变量*/
char cnum[5],str2[20]={""},c,temp[20]={""};
char str1[]="1230.456+-789*/Qc=^%"; /* 定义字符串在按钮图形上显示的符号 */
mwindow( "Calculator" ); /* 显示主窗口 */
color = 7; /*设置灰颜色值*/
getviewsettings( &vp );     /* 读取当前窗口的大小*/
width=(vp.right+1)/10;     /* 设置按钮宽度 */
height=(vp.bottom-10)/10 ; /*设置按钮高度 */
x = width /2; /*设置x的坐标值*/
y = height/2;     /*设置y的坐标值*/
setfillstyle(SOLID_FILL, color+3);
bar( x+width*2, y, x+7*width, y+height );
/*画一个二维矩形条显示运算数和结果*/
setcolor( color+3 ); /*设置淡绿颜色边框线*/
rectangle( x+width*2, y, x+7*width, y+height ); /*画一个矩形边框线*/
setcolor(RED); /*设置颜色为红色*/
outtextxy(x+3*width,y+height/2,"0."); /*输出字符串"0."*/
x =2*width-width/2; /*设置x的坐标值*/
y =2*height+height/2; /*设置y的坐标值*/
for( j=0 ; j<4 ; ++j ) /*画按钮*/
{
for( i=0 ; i<5 ; ++i )
{
setfillstyle(SOLID_FILL, color);
setcolor(RED);
bar( x, y, x+width, y+height ); /*画一个矩形条*/
rectangle( x, y, x+width, y+height );
sprintf(str2,"%c",str1[j*5+i]); /*将字符保存到str2中*/
outtextxy( x+(width/2), y+height/2, str2);
x =x+width+ (width / 2) ;    /*移动列坐标*/
}
y +=(height/2)*3;    /* 移动行坐标*/
x =2*width-width/2; /*复位列坐标*/
}
x0=2*width;
y0=3*height;
x=x0;
y=y0;
gotoxy(x,y); /*移动光标到x,y位置*/
arrow(); /*显示光标*/
putimage(x,y,rar,XOR_PUT);
m=0;
n=0;
strcpy(str2,""); /*设置str2为空串*/
while((v=specialkey())!=45) /*当压下Alt+x键结束程序，否则执行下面的循环*/
{
while((v=specialkey())!=ENTER) /*当压下键不是回车时*/
{
    putimage(x,y,rar,XOR_PUT); /*显示光标图象*/
    if(v==RIGHT) /*右移箭头时新位置计算*/
    if(x>=x0+6*width) /*如果右移，移到尾，则移动到最左边字符位置*/
{
        x=x0;
        m=0;
    }
    else
    {
        x=x+width+width/2;
        m++;
    } /*否则，右移到下一个字符位置*/
    if(v==LEFT) /*左移箭头时新位置计算*/
    if(x<=x0)
    {
        x=x0+6*width;
        m=4;
    } /*如果移到头，再左移，则移动到最右边字符位置*/
    else
    {
        x=x-width-width/2;
        m--;
    } /*否则，左移到前一个字符位置*/
if(v==UP) /*上移箭头时新位置计算*/
    if(y<=y0)
    {
        y=y0+4*height+height/2;
        n=3;
    } /*如果移到头，再上移，则移动到最下边字符位置*/
    else
    {
y=y-height-height/2;
n--;
} /*否则，移到上边一个字符位置*/
    if(v==DOWN) /*下移箭头时新位置计算*/
    if(y>=7*height)
    {
        y=y0;
n=0;
    } /*如果移到尾，再下移，则移动到最上边字符位置*/
    else
    {
        y=y+height+height/2;
        n++;
    } /*否则，移到下边一个字符位置*/
putimage(x,y,rar,XOR_PUT); /*在新的位置显示光标箭头*/
}
c=str1[n*5+m]; /*将字符保存到变量c中*/
if(isdigit(c)||c=='.') /*判断是否是数字或小数点*/
{
    if(flag==-1) /*如果标志为-1，表明为负数*/
{
strcpy(str2,"-"); /*将负号连接到字符串中*/
flag=1;
} /*将标志值恢复为1*/
sprintf(temp,"%c",c); /*将字符保存到字符串变量temp中*/
strcat(str2,temp); /*将temp中的字符串连接到str2中*/
setfillstyle(SOLID_FILL,color+3);
bar(2*width+width/2,height/2,15*width/2,3*height/2);
outtextxy(5*width,height,str2); /*显示字符串*/
}
if(c=='+')
{
num1=atof(str2); /*将第一个操作数转换为浮点数*/
strcpy(str2,""); /*将str2清空*/
act=1; /*做计算加法标志值*/
setfillstyle(SOLID_FILL,color+3);
bar(2*width+width/2,height/2,15*width/2,3*height/2);
outtextxy(5*width,height,"0."); /*显示字符串*/
}
if(c=='-')
{
if(strcmp(str2,"")==0) /*如果str2为空，说明是负号，而不是减号*/
    flag=-1; /*设置负数标志*/
else
{
    num1=atof(str2); /*将第二个操作数转换为浮点数*/
    strcpy(str2,""); /*将str2清空*/
    act=2; /*做计算减法标志值*/
    setfillstyle(SOLID_FILL,color+3);
    bar(2*width+width/2,height/2,15*width/2,3*height/2); /*画矩形*/
    outtextxy(5*width,height,"0."); /*显示字符串*/
}
}
if(c=='*')
{
num1=atof(str2); /*将第二个操作数转换为浮点数*/
strcpy(str2,""); /*将str2清空*/
act=3; /*做计算乘法标志值*/
setfillstyle(SOLID_FILL,color+3); bar(2*width+width/2,height/2,15*width/2,3*height/2);
outtextxy(5*width,height,"0."); /*显示字符串*/
}
if(c=='/')
{
num1=atof(str2); /*将第二个操作数转换为浮点数*/
strcpy(str2,""); /*将str2清空*/
act=4; /*做计算除法标志值*/
setfillstyle(SOLID_FILL,color+3);
bar(2*width+width/2,height/2,15*width/2,3*height/2);
outtextxy(5*width,height,"0."); /*显示字符串*/
}
if(c=='^')
{
num1=atof(str2); /*将第二个操作数转换为浮点数*/
strcpy(str2,""); /*将str2清空*/
act=5; /*做计算乘方标志值*/
setfillstyle(SOLID_FILL,color+3); /*设置用淡绿色实体填充*/
bar(2*width+width/2,height/2,15*width/2,3*height/2); /*画矩形*/
outtextxy(5*width,height,"0."); /*显示字符串*/
}
if(c=='%')
{
num1=atof(str2); /*将第二个操作数转换为浮点数*/
strcpy(str2,""); /*将str2清空*/
act=6; /*做计算模运算乘方标志值*/
setfillstyle(SOLID_FILL,color+3); /*设置用淡绿色实体填充*/
bar(2*width+width/2,height/2,15*width/2,3*height/2); /*画矩形*/
outtextxy(5*width,height,"0."); /*显示字符串*/
}
if(c=='=')
{
num2=atof(str2); /*将第二个操作数转换为浮点数*/
switch(act) /*根据运算符号计算*/
{
    case 1:result=num1+num2;break; /*做加法*/
    case 2:result=num1-num2;break; /*做减法*/
    case 3:result=num1*num2;break; /*做乘法*/
    case 4:result=num1/num2;break; /*做除法*/
    case 5:result=pow(num1,num2);break; /*做x的y次方*/
    case 6:result=fmod(num1,num2);break; /*做模运算*/
}
setfillstyle(SOLID_FILL,color+3); /*设置用淡绿色实体填充*/
bar(2*width+width/2,height/2,15*width/2,3*height/2); /*覆盖结果区*/
sprintf(temp,"%f",result); /*将结果保存到temp中*/
outtextxy(5*width,height,temp); /*显示结果*/
}
if(c=='c')
{
num1=0; /*将两个操作数复位0，符号标志为1*/
num2=0;
flag=1;
strcpy(str2,""); /*将str2清空*/
setfillstyle(SOLID_FILL,color+3); /*设置用淡绿色实体填充*/
bar(2*width+width/2,height/2,15*width/2,3*height/2); /*覆盖结果区*/
outtextxy(5*width,height,"0."); /*显示字符串*/
}
if(c=='Q')exit(0); /*如果选择了q回车，结束计算程序*/
}
putimage(x,y,rar,XOR_PUT); /*在退出之前消去光标箭头*/
return; /*返回*/
}
void mwindow( char *header ) /*窗口函数*/
{
int height;
cleardevice();            /* 清除图形屏幕    */
setcolor( MaxColors - 1 );        /* 设置当前颜色为白色*/
setviewport( 20, 20, MaxX/2, MaxY/2, 1 );    /* 设置视口大小    */
height = textheight( "H" ); /* 读取基本文本大小 */
settextstyle( DEFAULT_FONT, HORIZ_DIR, 1 );/*设置文本样式*/
settextjustify( CENTER_TEXT, TOP_TEXT );/*设置字符排列方式*/
outtextxy( MaxX/4, 2, header ); /*输出标题*/
setviewport( 20,20+height+4, MaxX/2+4, MaxY/2+20, 1 ); /*设置视口大小*/
drawboder(); /*画边框*/
}
void drawboder(void) /*画边框*/
{
struct viewporttype vp; /*定义视口类型变量*/
setcolor( MaxColors - 1 );        /*设置当前颜色为白色    */
setlinestyle( SOLID_LINE, 0, NORM_WIDTH );/*设置画线方式*/
getviewsettings( &vp );/*将当前视口信息装入vp所指的结构中*/
rectangle( 0, 0, vp.right-vp.left, vp.bottom-vp.top ); /*画矩形边框*/
}
int arrow()/*设计鼠标图形函数*/
{
int size;
int raw[]={4,4,4,8,6,8,14,16,16,16,8,6,8,4,4,4}; /*定义多边形坐标*/
setfillstyle(SOLID_FILL,2); /*设置填充模式*/
fillpoly(8,raw); /*画出一光标箭头*/
size=imagesize(4,4,16,16); /*测试图象大小*/
rar=malloc(size); /*分配内存区域*/
getimage(4,4,16,16,rar); /*存放光标箭头图象*/
putimage(4,4,rar,XOR_PUT); /*消去光标箭头图象*/
return 0;
}
int specialkey(void) /*按键函数*/
{
int key;
while(bioskey(1)==0); /*等待键盘输入*/
key=bioskey(0); /*键盘输入*/
key=key&0xff? key&0xff:key>>8; /*只取特殊键的扫描值，其余为0*/
return(key); /*返回键值*/
}
案例三 黑白棋游戏
#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);/*输出胜利者信息*/
/******主函数*********/
void main(void)
{
int gd=DETECT,gr;
initgraph(&gd,&gr,"c:\\tc"); /*初始化图形系统*/
DrawQp();/*画棋盘*/
playtoplay();/*人人对战*/
getch();
closegraph();/*关闭图形系统*/
}
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)
{
    for(kk=i-1;kk>k&&k>=0;kk--)
    {
    a[kk][j]=a[j];
    fillellipse(120+kk*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!");
}
案例六 速算24
#define N 20
#define COL 100
#define ROW 40
#include "stdio.h"
#include "time.h" /*系统时间函数*/
#include "graphics.h" /*图形函数*/
#include "alloc.h"/*动态地址分配函数*/
#include "stdlib.h" /*库函数*/
#include "string.h" /*字符串函数*/
#include "ctype.h" /*字符操作函数*/
char p[4][13]={
{'A','2','3','4','5','6','7','8','9','0','J','Q','K'},/*扑克牌，10用0来表示*/
{'A','2','3','4','5','6','7','8','9','0','J','Q','K'},
{'A','2','3','4','5','6','7','8','9','0','J','Q','K'},
{'A','2','3','4','5','6','7','8','9','0','J','Q','K'}};
typedef struct node
{
int data;
struct node *link;
}STACK1; /*栈1*/
typedef struct node2
{
char data;
struct node2 *link;
}STACK2; /*栈2*/
void init(void);/*图形驱动*/
void close(void);/*图形关闭*/
void play(void);/*发牌的具体过程*/
void rand1(int j);/*随机发牌函数*/
void change(char *e,char *a); /*中缀变后缀函数*/
int computer(char *s); /*后缀表达式计算函数*/
STACK1 *initstack1(STACK1 *top); /*栈1初始化*/
STACK1 *push(STACK1 *top,int x); /*栈1入栈运算*/
STACK1 *pop(STACK1 *top); /*栈1删除栈顶元素*/
int topx(STACK1 *top); /*栈1读栈顶元素*/
STACK1 *ptop(STACK1 *top,int *x); /*栈1读出栈顶元素值并删除栈顶元素*/
int empty(STACK1 *top); /*判栈1是否为空函数*/
STACK2 *initstack2(STACK2 *top); /*栈2初始化*/
STACK2 *push2(STACK2 *top,char x); /*栈2入栈运算*/
STACK2 *pop2(STACK2 *top); /*栈2删除栈顶元素*/
char topx2(STACK2 *top); /*栈2读栈顶元素*/
STACK2 *ptop2(STACK2 *top,char *x); /*栈2读出栈顶元素值并删除栈顶元素*/
int empty2(STACK2 *top); /*判栈2是否为空函数*
int text1(char *s) ; /*显示文本*/
main()
{
char s[N],s1[N],ch;
int i,result;
int gdriver, gmode;
clrscr(); /*清屏*/
init(); /*初始化函数*/
while(1)
{
setbkcolor(BLACK); /*设置背景颜色*/
cleardevice();/*清屏*/
play(); /*发牌*/
gotoxy(1,15); /*移动光标*/
printf("--------------------Note-------------------\n");
printf(" Please enter express accroding to above four number\n"); /*提示信息*/
printf(" Format as follows:2.*(5.+7.)\n");/*提示输入字符串格式*/
printf(" ----------------------------------------------\n");
scanf("%s%c",s1,&ch); /*输入字符串压回车键*/
change(s1,s); /*调用change函数将中缀表达式s1转换为后缀表达式s*/
result=computer(s); /*计算后缀表达式的值，返回结果result */
if(result==24) /*如果结果等于24*/
    text1("very good"); /*调用函数text1显示字符串"very good"*/
else
    text1("wrong!!!");/*否则函数text1显示字符串"wrong!!!"*/
printf("Continue (y/n)?\n"); /*提示信息，是否继续*/
scanf("%c",&ch); /*输入一字符*/
if(ch=='n'||ch=='N') /*如果该字符等于n或N*/
    break; /*跳出循环，程序结束*/
} /*否则，开始下一轮循环*/
close();
return; /*返回*/
}
void rand1(int j)/*随机发牌函数*/
{
int kind,num;
char str[3],n;
randomize();
while(1)/*循环直到有牌发*/
{
kind=random(4); /*花色随机数*/
num=random(13); /*大小随机数*/
if(p[kind][num]!=-1) /*该数未取过*/
{
    n=p[kind][num]; /*取相应位置的扑克牌数*/
    p[kind][num]=-1; /*牌发好以后相应位置的元素置-1*/
    break;
}
}
switch(kind)/*花式的判断*/
{
case 0:setcolor(RED);sprintf(str,"%c",3);break; /*红桃*/
case 1:setcolor(BLACK);sprintf(str,"%c",3);break; /*黑桃*/
case 2:setcolor(RED);sprintf(str,"%c",4);break; /*方片*/
case 3:setcolor(BLACK);sprintf(str,"%c",5);break; /*草花*/
}
settextstyle(0,0,2);
outtextxy(COL+j*100-30,ROW+100-46,str);/*显示左上角花色*/
outtextxy(COL+j*100+16,ROW+100+32,str); /*显示右下角花色*/
if(n!='0')/*输出其他牌*/
{
settextstyle(0,0,3);
sprintf(str,"%c",n);
outtextxy(COL+j*100-5,ROW+100-5,str);/*显示牌的大小*/
}
else/*输出10的时候*/
{
sprintf(str,"%d",10);
outtextxy(COL+j*100-6,ROW+100-5,str);
}
}
void play(void)/*发牌的具体过程*/
{
int j;
for(j=0;j<4;j++)
{
bar(COL+j*100-35,ROW+100-50,COL+j*100+35,ROW+1*100+50);/*画空牌*/
setcolor(BLUE);
rectangle(COL+j*100-32,ROW+100-48,COL+j*100+32,ROW+100+48); /*画矩形框*/
rand1(j); /*随机取牌*/
delay(10000); /*延时显示*/
}
}
void init(void)/*图形驱动*/
{
int gd=DETECT,gm;
initgraph(&gd,&gm,"c:\\tc");
cleardevice();
}
void close(void)/*图形关闭*/
{
closegraph();
}
void change(char *e,char *a) /*中缀字符串e转后缀字符串a函数*/
{
STACK2 *top=NULL; /* 定义栈顶指针*/
int i,j;char w;
i=0;
j=0;
while(e!='\0') /*当字符串没有结束时*/
{
if(isdigit(e)) /*如果字符是数字*/
{
    do{
    a[j]=e; /*将数字原样拷贝到数组a中*/
    i++; /*e数组的下标加1*/
    j++; /*a数组的下标加1*/
    }while(e!='.'); /*直到字符为数字结束符“.”为止*/
    a[j]='.';j++; /*将数字结束符“.”拷贝到a数组依然保持结束标记*/
}
if(e=='(') /*如果字符是“(”时*/
    top=push2(top,e); /*将其压入堆栈*/
if(e==')') /*如果字符是“)”时*/
{
    top=ptop2(top,&w); /*取出栈顶元素，并从栈顶删除该元素*/
    while(w!='(') /*如果字符不是“(”时反复循环*/
    {
    a[j]=w; /*将栈顶元素存入a数组*/
    j++; /*下标加1*/
    top=ptop2(top,&w) ; /*取出栈顶元素，并从栈顶删除该元素*/
    }
}
if(e=='+'||e=='-') /*如果字符是加或减号时*/
{
    if(!empty2(top)) /*如栈不为空*/
    {
    w=topx2(top);
    while(w!='(') /*当栈顶元素不是“(”时反复循环*/
    {
    a[j]=w;
    j++; /*将栈顶元素存入表达式a中，a的下标加1*/
    top=pop2(top); /*删除栈顶元素*/
    if(empty2(top)) /*如果栈为空*/
        break; /*跳出循环*/
    else
        w=topx2(top); /*否则读栈顶元素*/
    }
    }
top=push2(top,e); /*将当前e的字符元素压入堆栈*/
}
if(e=='*'||e=='/') /*如果字符是乘或除号时*/
{
    if(!empty2(top)) /*如栈不为空*/
    {
    w=topx2(top); /*读栈顶元素存入w*/
    while(w=='*'||w=='/')/*当栈顶元素是乘或除时反复循环*/
    {
    a[j]=w;
    j++; /*将栈顶元素存入字符串a中，a的下标加1*/
    top=pop2(top); /*删除栈顶元素*/
    if(empty2(top)) /*如果栈为空*/
        break; /*跳出循环*/
    else
        w=topx2(top); /*否则读栈顶元素*/
    }
    }
    top=push2(top,e); /*将当前e字符元素压入堆栈*/
}
i++; /*e的下标加1*/
}
while(!empty2(top)) /*当不为空时反复循环*/
top=ptop2(top,&a[j++]); /*将栈顶元素存入数组a中*/
a[j]='\0'; /*将字符串结束标记写入最后一个数组元素中构成字符串*/
}
int computer(char *s) /* 计算函数*/
{
STACK1 *top=NULL;
int i,k,num1,num2,result;
i=0;
while(s!='\0') /*当字符串没有结束时作以下处理*/
{
if(isdigit(s)) /*判字符是否为数字*/
{
    k=0; /*k初值为0*/
    do{
    k=10*k+s-'0'; /*将字符连接为十进制数字*/
    i++; /*i加1*/
    }while(s!='.'); /*当字符不为‘.’时重复循环*/
    top=push(top,k); /*将生成的数字压入堆栈*/
}
if(s=='+') /*如果为'+'号*/
{
    top=ptop(top,&num2); /*将栈顶元素取出存入num2中*/
    top=ptop(top,&num1); /*将栈顶元素取出存入num1中*/
    result=num2+num1; /*将num1和num2相加存入result中*/
    top=push(top,result); /*将result压入堆栈*/
}
if(s=='-') /*如果为'-'号*/
{
    top=ptop(top,&num2); /*将栈顶元素取出存入num2中*/
    top=ptop(top,&num1); /*将栈顶元素取出存入num1中*/
    result=num1-num2; /*将num1减去num2结果存入result中*/
    top=push(top,result); /*将result压入堆栈*/
}
if(s=='*') /*如果为'*'号*/
{
    top=ptop(top,&num2); /*将栈顶元素取出存入num2中*/
    top=ptop(top,&num1); /*将栈顶元素取出存入num1中*/
    result=num1*num2; /*将num1与num2相乘结果存入result中*/
    top=push(top,result); /*将result压入堆栈*/
}
if(s=='/') /*如果为'/'号*/
{
    top=ptop(top,&num2); /*将栈顶元素取出存入num2中*/
    top=ptop(top,&num1); /*将栈顶元素取出存入num1中*/
    result=num1/num2; /*将num1除num2结果存入result中*
    top=push(top,result); /*将result压入堆栈*/
}
i++; /*i加1*/
}
top=ptop(top,&result); /*最后栈顶元素的值为计算的结果*/
return result; /*返回结果*/
}
STACK1 *initstack1(STACK1 *top) /*初始化*/
{
top=NULL; /*栈顶指针置为空*/
return top; /*返回栈顶指针*/
}
STACK1 *push(STACK1 *top,int x) /*入栈函数*/
{
STACK1 *p; /*临时指针类型为STACK1*/
p=(STACK1 *)malloc(sizeof(STACK1)); /*申请STACK1大小的空间*/
if(p==NULL) /*如果p为空*/
{
printf("memory is overflow\n!!"); /*显示内存溢出*/
exit(0); /*退出*/
}
p->data=x; /*保存值x到新空间*/
p->link=top; /*新结点的后继为当前栈顶指针*/
top=p; /*新的栈顶指针为新插入的结点*/
return top; /*返回栈顶指针*/
}
STACK1 *pop(STACK1 *top) /*出栈*/
{
STACK1 *q; /*定义临时变量*/
q=top; /*保存当前栈顶指针*/
top=top->link; /*栈顶指针后移*/
free(q); /*释放q*/
return top; /*返回栈顶指针*/
}
int topx(STACK1 *top) /*读栈顶元素*/
{
if(top==NULL) /*栈是否为空*/
{
printf("Stack is null\n"); /*显示栈为空信息*/
return 0; /*返回整数0*/
}
return top->data; /*返回栈顶元素*/
}
STACK1 *ptop(STACK1 *top,int *x) /*取栈顶元素，并删除栈顶元素*/
{
*x=topx(top); /*读栈顶元素*/
top=pop(top); /*删除栈顶元素*/
return top; /*返回栈顶指针*/
}
int empty(STACK1 *top) /*判栈是否为空*/
{
if(top==NULL) /*如果为空*/
return 1; /*返回1*/
else
return 0; /*否则返回0*/
}
STACK2 *initstack2(STACK2 *top) /*初始化*/
{
top=NULL; /*栈顶指针置为空*/
return top; /*返回栈顶指针*/
}
STACK2 *push2(STACK2 *top,char x) /*入栈函数*/
{
STACK2 *p; /*临时指针类型为STACK2*/
p=(STACK2 *)malloc(sizeof(STACK2)); /*申请STACK2大小的空间*/
if(p==NULL) /*如果p为空*/
{
printf("memory is overflow\n!!"); /*显示内存溢出*/
exit(0); /*退出*/
}
p->data=x; /*保存值x到新空间*/
p->link=top; /*新结点的后继为当前栈顶指针*/
top=p; /*新的栈顶指针为新插入的结点*/
return top; /*返回栈顶指针*/
}
STACK2 *pop2(STACK2 *top) /*出栈*/
{
STACK2 *q; /*定义临时变量*/
q=top; /*保存当前栈顶指针*/
top=top->link; /*栈顶指针后移*/
free(q); /*释放q*/
return top; /*返回栈顶指针*/
}
char topx2(STACK2 *top) /*读栈顶元素*/
{
if(top==NULL) /*栈是否为空*/
{
printf("Stack is null\n"); /*显示栈为空信息*/
return ''; /*返回空字符*/
}
return top->data; /*返回栈顶元素*/
}
STACK2 *ptop2(STACK2 *top,char *x) /*取栈顶元素，并删除栈顶元素*/
{
*x=topx2(top); /*读栈顶元素*/
top=pop2(top); /*删除栈顶元素*/
return top; /*返回栈顶指针*/
}
int empty2(STACK2 *top) /*判栈是否为空*/
{
if(top==NULL) /*如果为空*/
return 1; /*返回1*/
else
return 0; /*否则返回0*/
}
int text1(char *s)
{
setbkcolor(BLUE); /*设置背景颜色为蓝色*/
cleardevice(); /*清除屏幕*/
setcolor(12); /*设置文本颜色为淡红色*/
settextstyle(1, 0, 8);/*三重笔划字体, 放大8倍*/
outtextxy(120, 120, s); /*输出字符串s*/
setusercharsize(2, 1, 4, 1);/*水平放大2倍, 垂直放大4倍*/
setcolor(15); /*设置文本颜色为*白色/
settextstyle(3, 0, 5); /*无衬字笔划, 放大5倍*/
outtextxy(220, 220, s); /*输出字符串s*/
getch(); /*键盘输入任一字符*/
return ; /*返回*/
}