duandeyou

dreamrise

1. 
   
2. #include "stdio.h"
   
3. #include "math.h"
   
4. #include "stdlib.h"
   
5. 
   
6. struct OperationStack        {
   
7.         char elem[100];
   
8.         short top;
   
9. } operation;
   
10. 
    
11. struct DataStack{
    
12.         float elem[100];
    
13.         short top;
    
14. } opnd;
    
15. 
    
16. char  w,theta,choose;
    
17. float result1,a,b,data;
    
18. char  precede[17][17];
    
19. FILE  *f;
    
20. 
    
21. void Initialization(void);
    
22. void Read(void);
    
23. char GetOpStackTop(void);
    
24. int  MyOrder(char);
    
25. void PushOperationStack(char w);
    
26. char PopOperationStack(void);
    
27. 
    
28. int main() {
    
29.         float result;
    
30.         Initialization();
    
31.     choose='Y';
    
32.         do        {
    
33.                 opnd.top=0 ;
    
34.                 operation.top=0 ;
    
35.                 PushOperationStack('=');/*INI_STACK*/
    
36.                 Read();
    
37.                 while (!((w=='=')&&(GetOpStackTop()=='='))) /*当运算符不只=时循环*/
    
38.                 switch (precede[MyOrder(GetOpStackTop())][MyOrder(w)])
    
39.                 {
    
40.                         case  '<':        PushOperationStack(w);/*栈顶运算符比目前读入运算优先级小
    
41.                                   当前读入的运算符入栈*/
    
42.                                                 Read();/*读入下一个字符 */
    
43.                                                 break;
    
44.                         case  '=':        //char PopOperationStack(void);/*优先级相等时即'(',')'相遇时脱括号*/
    
45.                                                 (operation.top)--;
    
46.                                                 Read();
    
47.                                                 break;
    
48.                         case  '>':        theta=PopOperationStack();/*栈顶运算符比目前读入运算优先级高
    
49.                                       则退栈并将结果入栈作下一运算的操作数*/
    
50.                                                 float PopData(void);
    
51.                                                 a=PopData();
    
52.                                                 float PushData(float data);
    
53.                                                 float operate(float,char);
    
54.                                                 PushData(operate(a,theta));
    
55.                                                 break;
    
56.                         case  '!':        printf("Error!Check the input.\n");
    
57.                                                 //goto a_b;
    
58.                         default:break;
    
59.                 }
    
60.                 float PopData(void);
    
61.                 printf("%f\n",PopData());                              
    
62.                 printf("Continue?Y/N:");
    
63.                 scanf("%c",&choose);
    
64.         }while (choose=='Y');
    
65. //switch (choose)
    
66. //{case 'Y': goto a_a;break;
    
67. // default : printf("Thank you!\n");
    
68. // }
    
69.     return;
    
70. }
    
71. 
    
72. void PushOperationStack(char w)        {
    
73.         (operation.top)++;
    
74.         operation.elem[operation.top]=w;
    
75.         return;
    
76. }
    
77. 
    
78. void PushData(float data){
    
79.         (opnd.top)++;
    
80.         opnd.elem[opnd.top]=data;
    
81.         return;
    
82. }
    
83. 
    
84. char PopOperationStack(void)        {
    
85.         char op;
    
86.         op=operation.elem[operation.top];
    
87.         (operation.top)--;
    
88.         return op;
    
89. }
    
90. 
    
91. float PopData(void)        {
    
92.         float   num;
    
93.         num=opnd.elem[opnd.top];
    
94.         (opnd.top)--;
    
95.         return num;
    
96. }
    
97. 
    
98. char GetOpStackTop(void)        {
    
99.         return operation.elem[operation.top];
    
100. }
     
101. 
     
102. float gettop_data(void){
     
103.         return opnd.elem[opnd.top];
     
104. }
     
105. 
     
106. void Read(void)        {
     
107.         float data;
     
108.         short scale;
     
109.         BEGIN_1:scanf("%c",&w);
     
110.         if ((w>='0')&&(w<='9'))        {
     
111.                 data=0 ;
     
112.             while ((w>='0')&&(w<='9')) {
     
113.                         data=data*10+w-'0';
     
114.                         scanf("%c",&w);
     
115.                 }
     
116.         }/*以上读入整数部分，下面读入小数部分*/
     
117.         if (w=='.') {
     
118.                 scale=1;   
     
119.                 scanf("%c",&w);
     
120.                 while (w>='0'&&w<='9'){
     
121.                         data=data*10 +w-48;/*48为'0'的ASCII值*/
     
122.                         (scale)*=10;
     
123.                         scanf("%c",&w);
     
124.                 }
     
125.                 (data)/=scale;/*小数点左移得到数据的真值*/
     
126.         }
     
127.         PushData(data);
     
128.         /*上面结束后W必定不在'0'..'9'之间*/
     
129.         /*下面主要是对三角函数和max,min运算符的读入*/
     
130.         switch (w)        {
     
131.             case 'S':                     /*读入三角正弦w赋值为'B'*/
     
132.                 case 's':scanf("%c",&w);
     
133.                         switch (w) {
     
134.                             case 'I':
     
135.                                 case 'i':scanf("%c",&w);   
     
136.                                                  if ( ( w=='n' ) || ( w=='N' ) ){
     
137.                              w='B';
     
138.                             }
     
139.                          break;
     
140.                 case 'E':
     
141.                                 case 'e':scanf("%c",&w);
     
142.                          if ( ( w=='c' ) || ( w=='C' ) ){
     
143.                              w='F';
     
144.                              }
     
145.                          break;
     
146.                         }
     
147.                         break;
     
148.                 case  'C':                        
     
149.                 case  'c':scanf("%c",&w);
     
150.             switch (w)        {
     
151.                 case 'O':
     
152.                                 case 'o':scanf("%c",&w);
     
153.                                                  if ( ( w=='s' ) || ( w=='S' ) ){
     
154.                                w='C';/*对应cos*/
     
155.                                }
     
156.                           else if ( ( w=='t' ) || ( w=='T') ){
     
157.                                w='E';/*对应cot*/                        
     
158.                                                        }
     
159.                                break;
     
160.                 case 'T':               
     
161.                                 case 't':scanf("%c",&w);
     
162.                                          if ( ( w=='g' ) || ( w=='G' ) ){
     
163.                                                        w='E';/*对应ctg*/
     
164.                             }
     
165.                             break;
     
166.                 case 'S':            
     
167.                                 case 's':scanf("%c",&w);
     
168.                                                  if ( ( w=='c' ) || ( w=='C' ) ){
     
169.                                w='G';/*对应csc*/
     
170.                                }
     
171.                                break;      
     
172.             }
     
173.                         break;
     
174.                 case 'T':       
     
175.                 case 't':if ( ( getchar()=='a' ) || ( getchar()=='A' )){
     
176.                               if ( ( getchar()=='n' ) || ( getchar()=='N' ) ){
     
177.                                     w='D';/*对应tan*/
     
178.                             }                          
     
179.                                }
     
180.                  else if ( ( getchar()=='g' ) || ( getchar()=='G' ) ){
     
181.                             w='D';/*对应tg*/
     
182.                             }                     
     
183.                          break;
     
184.                 case 'M':         
     
185.                 case 'm':scanf("%c",&w);
     
186.                         switch (w)        {
     
187.                             case 'A':
     
188.                                 case 'a':if ( ( getchar()=='a' ) || ( getchar()=='A' ) ) {
     
189.                                                         if ( ( getchar()=='x' ) || ( getchar()=='X' ) ){  
     
190.                                  w='H';/*对应max*/
     
191.                                  }
     
192.                                 }  
     
193.                          break;
     
194.                                 case 'I':                                                               
     
195.                                 case 'i':if ( ( getchar()=='n' ) ||  ( getchar()=='N' ) ){
     
196.                                                                 w='I';/*对应min*/
     
197.                                 }
     
198.                          break;
     
199.             }
     
200.                         break;
     
201.                 case ',':goto BEGIN_1;/*跳转后为max和min读入下一个参数*/
     
202.         default:;/*此处省略了读入+，-，*，/，%，^等符号时的空操作*/
     
203.         }
     
204.         return;
     
205. }
     
206. 
     
207. float operate(float a,char theta)        {
     
208.         float b;
     
209.         int c,d;
     
210.         switch (theta)        {
     
211.                 case '+':b=PopData();
     
212.                                 return a+b;
     
213.                 case '-':b=PopData();
     
214.                                 return b-a;
     
215.                 case '*':b=PopData();
     
216.                                 return a*b;
     
217.                 case '/':b=PopData();
     
218.                                 if (b!=0)//I really don't
     
219.                      //know why there is a error.
     
220.                                 return b/a;
     
221.                 case '%':c=floor(a);
     
222.                                 b=PopData();
     
223.                                 d=floor(b);
     
224.                                 return d/c;/*库函数：取余 */
     
225.                 case 'A':b=PopData();
     
226.                                  return pow(a,b);/*POWER(a,b)*/
     
227.         case 'B':return sin(a);
     
228.                 case 'C':return cos(a);
     
229.                 case 'D':return tan(a);
     
230.                 case 'E':return 1/tan(a);
     
231.                 case 'F':return 1/cos(a);
     
232.                 case 'G':return 1/sin(a);
     
233.                 case 'H':b=PopData();
     
234.                                  return (a>b?a:b);
     
235.                 case 'I':b=PopData();
     
236.                                 return (a<b?a:b);
     
237.                 default:break;
     
238.         }
     
239. }
     
240. 
     
241. void Initialization()        {
     
242.         short i=0,j=0;
     
243.         char  tmp_c='\0';
     
244.        
     
245.         if ((f=fopen("for_ok.txt","r"))==NULL){
     
246.                 printf("open file error\n");
     
247.                 exit(-1);
     
248.         };
     
249. 
     
250.         while (!feof(f))        {
     
251.                 j=0;               
     
252.                 tmp_c=fgetc(f);
     
253.                 //while (!(j==17))        {
     
254.                 while ( tmp_c != '\n' ) {
     
255.                           precede[i][j]=tmp_c;
     
256.                           if (!feof(f)) tmp_c=fgetc(f);
     
257.                           else break;
     
258.                         j++;
     
259.                 }
     
260.                 i++;
     
261.         }
     
262.         fclose(f);
     
263. }
     
264. 
     
265. int MyOrder(char c){
     
266.         switch (c){
     
267.                 case '^':return 0;/*POW*/
     
268.                 case 'B':return 1;/*SIN*/
     
269.                 case 'C':return 2;/*COS*/
     
270.                 case 'D':return 3;/*TAN*/
     
271.                 case 'E':return 4;/*CTAN*/
     
272.                 case 'F':return 5;/*SEC*/
     
273.                 case 'G':return 6;/*CSC*/
     
274.                 case 'H':return 7;/*MAX*/
     
275.                 case 'I':return 8;/*MIN*/
     
276.                 case '(':return 9;
     
277.                 case ')':return 10;
     
278.                 case '+':return 11;
     
279.                 case '_':return 12;
     
280.                 case '*':return 13;
     
281.                 case '/':return 14;
     
282.                 case '%':return 15;
     
283.                 case '=':return 16;
     
284.         }
     
285. }
     

复制代码

小劲鸭

你的问题呢?:confused:

hiddy

收到。。。。

kj501

从内容上看，好象是一个计算器的源代码。