Calculator Beta 1.0 (大一课程设计)

小学期有个程序设计，我就写了个这个交上去了，当时起名1.0，想着暑假要写个界面。现在复习delphi了，想着这玩意不值钱，索性就开了吧。。。众神也就当个笑话看看。ps：有玩win32api的高手，跪求提携。

/*  Name:                             Calculator Beta 1.0;  Author:                                     Welcome.Z;  Date:                             01/07/12      15:46;  Description: for calculate a sort of math expressions.*/#include<iostream>#include<string>#include<fstream>#include<cmath>#include<iomanip>#include<stack>#include<windows.h>#include<conio.h>#include<ctype.h>#include<time.h>using namespace std;const char op2[]={'+','-','*','/','^','(',')','\0'};const string op1[]={"sin","cos","tan","log","ln","exp","sqrt",                    "abs","asin","acos","atan","sinh","cosh","tanh"};const int priortable[8][8]={{1,1,-1,-1,-1,-1,1,1},                           {1,1,-1,-1,-1,-1,1,1},                           {1,1,1,1,-1,-1,1,1},                           {1,1,1,1,-1,-1,1,1},                           {1,1,1,1,-1,-1,1,1},                           {-1,-1,-1,-1,-1,-1,1,1},                           {1,1,1,1,1,2,1,1},                           {-1,-1,-1,-1,-1,-1,2,1}};bool err;string err_info;string copyrightname(const char *s){int i=strlen(s)-1;while (s [i]!='.') i--;string u;while (s [--i]!='\\') /////////////////////////////////////u = char(tolower(s[i]))+u;return u;}int GetOrder(char c){  int m = 8;  for (int i=0;i<8;i++)  if (c==op2[i])  {     m = i;     break;  }  return m;}int CheckChar(char c){  if (('0'<=c) && (c<='9') || (c=='.'))    return 0;  else if (GetOrder(c)!=8)    return 1;  else if (('a'<=c)&&(c<='z') || ('A'<=c)&&(c<='Z'))    return 2;  else    return-1;}int Priority(char o1, char o2){  int i, j;  i = GetOrder(o1);  j = GetOrder(o2);  return priortable[i][j];}void transform(string mid, char *suffix){  int i, j;  i = 0;  j = 0;  char c = mid[0];  stack<char> S;  char o;                            //current operator  S.push('\0');  while(!S.empty())  {    if (CheckChar(c)==0)    {      suffix[i++] = c;    }    else if (CheckChar(c)==2)    {       suffix[i++] = c;       if(mid[j+1]=='(')       {          S.push('@');          suffix[i++] = '(';       }    }    else    {       if (i>0 && suffix[i-1]!=' ')          suffix[i++] = ' ';       switch(c)       {          case'(': S.push(c); break;          case')': o = S.top();                   bool flag;                   flag = false;                   while (o!='(')                   {                      suffix[i++] = o;                      suffix[i++] = ' ';                      S.pop();                      o = S.top();                      flag = true;                   }                   if (flag) i--;                   S.pop();                   o = S.top();                   if (o=='@')                   {                      suffix[i++] = ')';                      S.pop();                   }                   break;          default: while(!S.empty())                   {                      o = S.top();                      if (Priority(o,c)==1)                      {                         suffix[i++] = o;                         suffix[i++] = ' ';                      }                      else break;                      S.pop();                   }                   if (c!='\0')                      S.push(c);                   break;       }    }    if (c!='\0')       c = mid[++j];  }  suffix[i] = '\0';}double calculate(double a, char c, double b){  switch(c)  {    case'+': return a + b;    case'-': return a - b;    case'*': if (log10(a)+log10(b)>98)             {                err = false;                err_info = "Multiplication Overflow...";                break;             }             else return a * b;    case'/': if (b==0)             {                err = false;                err_info = "Division By Zero...";                break;             } else             return a / b;    case'^': bool flag;             flag = true;             if (a<0)             {                flag = false;                a = -a;             }             double m;             double x;             x = b * log10(a);             if (x>99)             {                err = false;                err_info = "Power Over flow...";                break; }             else             {                m = exp(b * log(a));                if (!flag)                if (long(b*1000)%2==0) m = -m;                return m;             }    default: return-1;  }}double calc(double a, string f){  int i, j;  for (i=0;i<14;i++)  if (op1[i]==f) break;  switch(i)  {     case 0: return sin(a);     case 1: return cos(a);     case 2: return tan(a);     case 3: if (a<0)             {                err = false;                err_info = "Log Negative Number...";                break;             }             else             return log10(a);    case 4: if (a<0)            {                err = false;                err_info = "Ln Negative Number...";                break;            }            else            return log(a);    case 5: return exp(a);    case 6: if (a<0)            {                err = false;                err_info = "Sqrt Negative Number...";                break;            }            else            return sqrt(a);    case 7: return fabs(a);    case 8: if (fabs(a)>1)         {                err = false;                err_info = "Operating Number Over Arcsin Domain...";                break;            } else         return asin(a);    case 9: if (fabs(a)>1)         {                err = false;                err_info = "Operating Number Over Arccos Domain...";                break;             } else         return acos(a);    case 10:return atan(a);    case 11:return sinh(a);    case 12:return cosh(a);    case 13:return tanh(a);    default:err = false;            err_info = "Invalid Function Input...";            return -1;  }}double work(char *suffix){  int i = 0;  char c = suffix[0];  double x;  stack<double> S;  stack<string> SS;  double a, b;  while((c!='\0') && (err))  {     double w1 = 10.0;     double w2 = 1.0;     bool flag = false;     if (CheckChar(c)==0)     {        x = 0;        while (CheckChar(c)==0)        {           if (c=='.')           {              w1 = 1.0;              w2 = 10.0;              flag = true;           }           else           {              x = w1*x + (c-'0')/w2;              if (flag) w2 *= 10;           }           c = suffix[++i];        }        S.push(x);     }     else if (c==')')     {        a = S.top();        S.pop();        string function = SS.top();        SS.pop();        S.push(calc(a,function));     }     else if (CheckChar(c)==1)     {        b = S.top();        S.pop();        a = S.top();        S.pop();        S.push(calculate(a,c,b));     }     else if (CheckChar(c)==2)     {        string function;        while(c!='(')        {           if (c<'a') c = c+32;           function = function + c;           c = suffix[++i];}        SS.push(function);     }     c = suffix[++i];  }  return S.top();}string standardize(string s){  int i = s.find(' ', 0);  while (i!=string::npos)  {     s.erase(i, 1);     i = s.find(' ', 0);  }  int n = s.find(';', 0);  if (n!=-1)    s.erase(n);  return s;}void Checkexpress(string &s){  int i, j, n, l = 0;  n = s.length();  for (i=0;i<n;i++)  {    if (s[i]=='(') l++;    if (s[i]==')') l--;    if (l<0)    {      err = false;      err_info = "Bracket Not Match...";      break;    }    if (s[i]=='(')    {       if (s[i+1]!='(' && s[i+1]!='-' && CheckChar(s[i+1])==1)       {          err = false;          err_info="Lack of Operating Number...";       }    }    else if (s[i]==')')    {       int x = CheckChar(s[i+1]);       if (x==0||x==2||s[i+1]=='(')       {  err = false;  err_info = "Lack of Operator...";       }    }    else if (CheckChar(s[i])==-1)    {       err = false;       err_info = "Invalid Operator...";       break;    }    else if (CheckChar(s[i])==1)    {       if (s[i+1]!='(' && CheckChar(s[i+1])==1)       {          err = false;          err_info = "Lack of Operating Number...";       }    }    else if (CheckChar(s[i])==2)    {       if (!(CheckChar(s[i+1])==2))       if (s[i+1]!='(')       {          err = false;          err_info = "Illegal Function Called...";       }    }  }  if (i==n && l!=0)  {     err = false;     err_info = "Bracket Not Match...";  }}void gettime(int &y, int &m, int &d){time_t timer;time(&timer);tm* t_tm = localtime(&timer);y = t_tm->tm_year + 1900;m = t_tm->tm_mon + 1;d = t_tm->tm_mday;}bool iscputime(string s){int n = s.length();if (n>8) return false;int i = 0;while (s[i]!='.'&&CheckChar(s[i])==0) i++;if (s[i++]!=':') return false;while (s[i]!='.'&&CheckChar(s[i])==0) i++;if (s[i++]!=':') return false;while (s[i]!='.'&&CheckChar(s[i])==0) i++;if (s[i]!='\0') return false;return true;}void welcome(){  cout<<"$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$"<<endl;  cout<<"$  xxxxx    x     x       xxxxx x     x x          x   xxxxxxx xxxxxxx xxxxx  $"<<endl;  cout<<"$ x        x x    x      x      x     x x         x x     x    x     x x    x $"<<endl;  cout<<"$x        xxxxx   x     x       x     x x        xxxxx    x    x     x xxxxx  $"<<endl;  cout<<"$ x      x     x  x      x      x     x x       x     x   x    x     x x    x $"<<endl;  cout<<"$  xxxxxx       x xxxxxx  xxxxx xxxxxxx xxxxxx x       x  x    xxxxxxx x     x$"<<endl;  cout<<"$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$"<<endl;  cout<<"            Made By Welcome.Z  [Version Beta 1.00]  Issue Date:1/7/12        \n"<<endl;  int y, m, d, r;  bool ava = true;  gettime(y, m, d);  if (!(y==2012&&m<=8)) ava = false;  else r = 31 * (8 - m) + 32 - d;  if (ava)  {cout<<"     This beta version expired on 1st of September. Just "<<r<<" day";if (r!=1) cout<<'s';cout<<" remaining.  \n"<<endl;  }  else  {system("color fc");cout<<"\n                        This Beta version has expired."<<endl;cout<<"             Please contact the author to obtain the latest version."<<endl;cout<<"                          E-mail: [e-mail]"<<endl;char p = getch();if (p!='`') exit(0);  }//while(!kbhit()){}}bool legalname(string s){  if (s!="calculator beta 1.0")  {    system("color fc");    cout<<"You have mandatory renamed the program, which is prohibited by author."<<endl;    cout<<"Change the official name back or you will never normal startup the process."<<endl;    char q = getch();    if (q=='`')    {system("cls");return true;    }    else return false;  }  return true;}bool rebuilt(){  string s, u;  system("tasklist /fi \"imagename eq notepad.exe\" /v >tas.txt");  ifstream ii("tas.txt");  while (!ii.eof())  {    ii>>s;    if (iscputime(s))    {      getline(ii, s);      int t = s.length();      while (s[--t]!='.') s.erase(t, 1);      s.erase(t, 1);      for (int i=0;i<s.length();i++) s[i]=tolower(s[i]);      if (s==" calculator_in")      {      return false;      ii.clear();        ii.close();      }    }  }  ii.clear();  ii.close();  return true;}int main(int argc, char **argv){  bool ava;  string s;  s = copyrightname(argv[0]);  if (!legalname(s)) exit(0);  welcome();  cout<<"                        Press Any Key To Continue . . .\n";  char pp = getch();  string mid;  char suffix[1000];  double answer;  bool exist;  exist = true;  char p;  fstream icin("Calculator_in.txt", ios::in);  ofstream ocout("Calculator_out.txt");  if (icin==0)  {     exist = false;     system("color 0c");     cout<<"                          Input File Inexistence . . ."<<endl;     cout<<"                   Please Check The File's Name Or Rebuild It."<<endl;     cout<<"                          Wanna Rebuild It ? (Y/N) "<<endl;     cout<<"                                  ";     p = getch();     if (!(p=='n'||p=='N'))     {        icin.open("Calculator_in.txt", ios::out);        icin.clear();        icin.close();        system("start Calculator_in.txt");        cout<<"\n                        Waiting For Rebuild File";        while (!rebuilt())        {cout<<" ."; Sleep(500);cout<<" ."; Sleep(500);cout<<" ."; Sleep(500);cout<<"\b\b\b\b\b\b      \b\b\b\b\b\b"; Sleep(500);}system("del /q tas.txt");cout<<" . . .\n                       Input File Has Already Rebuilt!"<<endl;        cout<<"                        Press Any Key To Continue . . .";char pp = getch();        system("cls");        welcome();        exist = true;        icin.open("Calculator_in.txt", ios::in);    }    else    {        system("cls");        welcome();        cout<<"                               Mission Failed!"<<endl;    }  }  if (exist)  {     int num = 0;     int sss = 0;     while(!icin.eof())     {        memset(suffix, '\0', sizeof(suffix));        getline(icin, mid);        if (mid=="") continue;        if (mid[0]==';') break;        num++;        mid = standardize(mid);        int i = mid.length() - 1;        if (mid[i]==';') mid.erase(i,1);        ocout<<"Mission "<<num<<":"<<endl;        ocout<<"The middle expression is:  "<<mid<<endl;        err = true;        Checkexpress(mid);        if (err)        {           int i = 0;           int j = mid.find('(',i);   while (j!=-1)   {     if (mid[++j]=='-')     mid.insert(j,"0");     j = mid.find('(',j);           }}        if (err) transform(mid, suffix);        if (err) answer = work(suffix);        if (err)        {           ocout<<"The answer is:             "<<answer<<endl<<endl;           sss++;        }        else        {           ocout<<"Calculate failed!          ";           ocout<<err_info<<endl<<endl;        }     }     if (num==0) ocout<<"No Mission!"<<endl;     else     ocout<<num<<" expressions in sum. "<<sss<<" Successful. "<<num-sss<<" Failed. "<<endl;     ocout<<"_____________________________________________________________";     ocout<<"\nCalculator Beta 1.0   Made By Welcome.Z   [Version Beta 1.00] \n";  }  icin.close();  ocout.close();  if (exist)  {     system("color 0a");     cout<<"                             Mission Complete!!!"<<endl;     cout<<"                      Whether Show Up The Result ? (Y/N) "<<endl;     cout<<"                                  ";     p = getch();     if (p=='y'||p=='Y'||p=='\0')     {        system("start Calculator_out.txt");     }  }  cout<<"\n                         Press Any Key To Quit . . . "<<endl;  p = getch();  return 0;}