#include <stdio.h>
#include <alloc.h>
#include <stdlib.h>
#include <string.h>
/*字符操作函数*/
#include <ctype.h>
#define BUFFSIZE 32
#define COL 128
#define ROW 64
/*定义栈1*/
typedef struct node
{
int data;
struct node *next;
}STACK1;
/*定义栈2*/
typedef struct node2
{
char data;
struct node2 *next;
}STACK2;
/*下面定义两个栈基本操作*/
/*入栈函数*/
STACK1 *PushStack(STACK1 *top,int x)
{
STACK1 *p;
p=(STACK1 *)malloc(sizeof(STACK1));
if(p==NULL)
{
printf("ERROR\n!");
exit(0);
}
p->data=x;
p->next=top;
top=p;
return top;
}
/*出栈函数*/
STACK1 *PopStack(STACK1 *top)
{
STACK1 *q;
q=top;
top=top->next;
free(q);
return top;
}
/*读栈顶元素*/
int GetTop(STACK1 *top)
{
if(top==NULL)
{
printf("Stack is null\n");
return 0;
}
/*返回栈顶元素*/
return top->data;
}
/*取栈顶元素，并删除栈顶元素*/
STACK1 *GetDelTop(STACK1 *top,int *x)
{
*x=GetTop(top);
top=PopStack(top);
return top;
}
int EmptyStack(STACK1 *top) /*判栈是否为空*/
{
if(top==NULL)
return 1;
return 0;
}
/*入栈函数*/
STACK2 *PushStack2(STACK2 *top,char x)
{
STACK2 *p;
p=(STACK2 *)malloc(sizeof(STACK2));
if(p==NULL)
{
printf("error\n!");
exit(0);
}
p->data=x;
p->next=top;
top=p;
return top;
}
STACK2 *PopStack2(STACK2 *top) /*出栈*/
{
STACK2 *q;
q=top;
top=top->next;
free(q);
return top;
}
/*读栈顶元素*/
char GetTop2(STACK2 *top)
{
if(top==NULL)
{
printf("Stack is null\n");
return 0;
}
return top->data;
}
/*取栈顶元素，并删除栈顶元素*/
STACK2 *GetDelTop2(STACK2 *top,char *x)
{
*x=GetTop2(top);
top=PopStack2(top);
return top;
}
/*判栈是否为空*/
int EmptyStack2(STACK2 *top)
{
if(top==NULL)
return 1;
else
return 0;
}
/*随机发牌函数*/
void GenCard()
{
int num,i;
randomize();
for(i=0;i<4;i++)
{
num=random(13); /*大小随机数*/
printf("%d ",num);
}
}
/*中缀字符串e转后缀字符串a函数*/
void ExpressTransform(char *expMiddle,char *expBack)
{
STACK2 *top=NULL; /* 定义栈顶指针*/
int i=0,j=0;
char ch;
while(expMiddle[i]!='\0')
{
/*判断字符是数字*/
if(isdigit(expMiddle[i]))
{
do{
expBack[j]=expMiddle[i];
i++;j++;
}while(expMiddle[i]!='.');
expBack[j]='.';
j++;
}
/*处理“(”*/
if(expMiddle[i]=='(')
top=PushStack2(top,expMiddle[i]);
/*处理“)”*/
if(expMiddle[i]==')')
{
top=GetDelTop2(top,&ch);
while(ch!='(')
{
expBack[j]=ch;
j++;
top=GetDelTop2(top,&ch);
}
}
/*处理加或减号*/
if(expMiddle[i]=='+'||expMiddle[i]=='-')
{
if(!EmptyStack2(top))
{
ch=GetTop2(top);
while(ch!='(')
{
expBack[j]=ch;
j++;
top=PopStack2(top);
if(EmptyStack2(top))
break;
else
ch=GetTop2(top);
}
}
top=PushStack2(top,expMiddle[i]);
}
/*处理乘或除号*/
if(expMiddle[i]=='*'||expMiddle[i]=='/')
{
if(!EmptyStack2(top))
{
ch=GetTop2(top);
while(ch=='*'||ch=='/')
{
expBack[j]=ch;
j++;
top=PopStack2(top);
if(EmptyStack2(top))
break;
else
ch=GetTop2(top);
}
}
top=PushStack2(top,expMiddle[i]);
}
i++;
}
while(!EmptyStack2(top))
top=GetDelTop2(top,&expBack[j++]);
expBack[j]='\0';
}
/*后缀表达式求值函数*/
int ExpressComputer(char *s)
{
STACK1 *top=NULL;
int i,k,num1,num2,result;
i=0;
while(s[i]!='\0') /*当字符串没有结束时作以下处理*/
{
if(isdigit(s[i])) /*判字符是否为数字*/
{
k=0; /*k初值为0*/
do{
k=10*k+s[i]-'0'; /*将字符连接为十进制数字*/
i++; /*i加1*/
}while(s[i]!='.'); /*当字符不为‘.’时重复循环*/
top=PushStack(top,k); /*将生成的数字压入堆栈*/
}
if(s[i]=='+') /*如果为'+'号*/
{
top=GetDelTop(top,&num2); /*将栈顶元素取出存入num2中*/
top=GetDelTop(top,&num1); /*将栈顶元素取出存入num1中*/
result=num2+num1; /*将num1和num2相加存入result中*/
top=PushStack(top,result); /*将result压入堆栈*/
}
if(s[i]=='-') /*如果为'-'号*/
{
top=GetDelTop(top,&num2); /*将栈顶元素取出存入num2中*/
top=GetDelTop(top,&num1); /*将栈顶元素取出存入num1中*/
result=num1-num2; /*将num1减去num2结果存入result中*/
top=PushStack(top,result); /*将result压入堆栈*/
}
if(s[i]=='*') /*如果为'*'号*/
{
top=GetDelTop(top,&num2); /*将栈顶元素取出存入num2中*/
top=GetDelTop(top,&num1); /*将栈顶元素取出存入num1中*/
result=num1*num2; /*将num1与num2相乘结果存入result中*/
top=PushStack(top,result); /*将result压入堆栈*/
}
if(s[i]=='/') /*如果为'/'号*/
{
top=GetDelTop(top,&num2); /*将栈顶元素取出存入num2中*/
top=GetDelTop(top,&num1); /*将栈顶元素取出存入num1中*/
result=num1/num2; /*将num1除num2结果存入result中*/
top=PushStack(top,result); /*将result压入堆栈*/
}
i++; /*i加1*/
}
top=GetDelTop(top,&result); /*最后栈顶元素的值为计算的结果*/
return result; /*返回结果*/
}
/*检查输入的表达式是否正确*/
int CheckExpression(char *e)
{
char ch;
int i=0;
while(e[i]!='\0')
{
if(isdigit(e[i]))
{
if(isdigit(e[i+1]))
{
i++;
continue;
}
if(e[i+1]!='.')
{
printf("\n The wrong express format!!\n");
return 0;
}
i++;
}
i++;
}
return 1;
}
/*主函数*/
int main()
{
char expMiddle[BUFFSIZE],expBack[BUFFSIZE],ch;
int i,result;
clrscr();
/*提示输入字符串格式*/
printf("*******************************************\n");
printf("| Welcome to play our game : 24 points! |\n");
printf("| The input format as follows: |\n");
printf("| 10.*(4.-3.) |\n");
printf("*******************************************\n");
while(1)
{
printf("\n The four digits are: ");
GenCard();
printf("\n");
do{
printf(" Please input the express:\n");
/*输入字符串压回车键*/
scanf("%s%c",expMiddle,&ch);
//printf("%s\n",expMiddle);
/*检查输入的表达式是否正确*/
}while(!CheckExpression(expMiddle));
printf("%s\n",expMiddle);
/*调用ExpressTransform函数将中缀表达式expMiddle转换为后缀表达式expBack*/
ExpressTransform(expMiddle,expBack);
/*计算后缀表达式的值*/
result=ExpressComputer(expBack);
printf("The value of %s is:%d.\n",expMiddle,result);
if(result==24)
printf("You are right!");
else printf("You are wrong!");
printf(" Do you want to play again(y/n)?\n");
scanf("%c",&ch);
if(ch=='n'||ch=='N')
break;
}
return 0;
}
