c语言编写的计算器 绝对经典

c语言编写的计算器 绝对经典 我们的客车那个设计呢，还是不错的 ，分数也比较高的L。

#include
#include
#include
#include
#include
#include
#define F1 59
#define F2 60
#define F3 61
#define F4 62
#define F9 67
#define ESC 27
#define BK_SPACE 8
#define ENTER 13
#define EQ 61
typedef struct node{
double number;
struct node*next;
}NODE;
void screen（void）;
void recover（void）;
char plus（double achar c[]）;
char chengfa（double achar c[]）;
char minus（double achar c[]）;
char chufa（double achar c[]）;
char others（char a[]char b[]）;
char store（char a[]char b[]）;
void main（）
{
screen（）;
}
char store（char a[]char b[]）{            /*单个储存功能函数*/
double ctstr1[20];
switch（a[0]）{
case ‘z‘:
 b[0]=‘\0‘;                                /*mr显示*/
  recover（）;
   moveto（416140）;
    outtext（str1）;
     strcpy（bstr1）;
      break;
case ‘c‘:
 b[0]=‘\0‘;                                    /*mc清除出储存的东西*/
  recover（）;
   moveto（416140）;
    str1[0]=‘\0‘;
    setfillstyle（17）;
     bar（206198229213）;
     break;
case ‘x‘:
 a[0]=‘\0‘;                                      /*ms储存*/
  recover（）;
   moveto（416140）;
    c=atof（b）;
     b[0]=‘\0‘;
      recover（）;
       gcvt（c10str1）;
        outtextxy（223211“M“）;
        break;
case ‘v‘:
b[strlen（b）-1]=‘\0‘;                                      /*m+与屏幕上的数相加*/
recover（）;
moveto（416140）;
t=atof（b）;
b[0]=‘\0‘;
c=c+t;
gcvt（c10b）;
outtext（b）;
break;
}
}
char others（char a[]char b[]）{            /*其他计算函数*/
double numnum1t;
char str1[32];

if（a[0]==ESC）{                     /*ESC*/
   recover（）;
   b[0]=‘\0‘;
   moveto（416140）;
   }
  if（a[0]==F9）{
     b[strlen（b）-1]=‘\0‘;
      num=atof（b）;
      num=-num;
      b[0]=‘\0‘;
      gcvt（num10b）;
       recover（）;
        moveto（416140）;
         outtext（b）;
         }
  if（a[0]==BK_SPACE）{                /*退格健*/
     recover（）;
      t=strlen（b）;
       b[t-2]=‘\0‘;
        moveto（416140）;
         outtext（b）;
   }
  if（a[0]==‘@‘）                      /*开方*/
    {
     b[strlen（b）-1]=‘\0‘;
      num=atof（b）;
       recover（）;
        moveto（416140）;
         outtext（b）;
          num=sqrt（num）;
     gcvt（num10str1）;
      moveto（416140）;
       b[0]=‘\0‘;
        strncpy（bstr120）;
         recover（）;
          outtext（b）;
     }
   if（a[0]==‘r‘）{                   /*1/X*/
     b[strlen（b）-1]=‘\0‘;
      recover（）;
      moveto（416140）;
      outtext（b）;
        num=atof（b）;
     num=1/num;
     gcvt（num10str1）;
     recover（）;
     moveto（416140）;
     b[0]=‘\0‘;
     strncpy（bstr120）;
     recover（）;
     outtext（b）;
     }
     }
void recover（void）{                       /*清除文本内容函数*/
setfillstyle（115）;
   bar（205123425144）;
    rectangle（205123425144）;
     setfillstyle（115）;
      bar（426123430144）;
       bar（200123204144）;
}
char chufa（double achar c[]）{        /*除法计算函数*/
char ch1[2];
double b;
c[0]=‘\0‘;
ch1[1]=‘\0‘;

 属性            大小     日期    时间   名称
----------- ---------  ---------- -----  ----

     文件      10923  2009-08-17 13:56  计算器课程设计.c

     文件      33792  2009-08-17 13:58  Debug\vc60.idb

     文件      28672  2009-08-17 13:58  Debug\vc60.pdb

     文件       3497  2009-08-17 13:58  计算器课程设计.dsp

     文件      33792  2009-08-17 13:58  计算器课程设计.ncb

     文件       1350  2009-08-17 13:58  计算器课程设计.plg

     文件        553  2009-08-17 13:58  计算器课程设计.dsw

     文件      48640  2009-08-17 13:58  计算器课程设计.opt

     目录          0  2009-08-17 13:58  Debug

----------- ---------  ---------- -----  ----

               161219                    9