24点源码.doc

24点源码 /*6.3.4 源程序*/ #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); /*调用函数text