#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[]）{????????????/*單個儲存功能函數(shù)*/
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+與屏幕上的數(shù)相加*/
recover（）;
moveto（416140）;
t=atof（b）;
b[0]=‘\0‘;
c=c+t;
gcvt（c10b）;
outtext（b）;
break;
}
}
char?others（char?a[]char?b[]）{????????????/*其他計算函數(shù)*/
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）{???????????????????????/*清除文本內容函數(shù)*/
setfillstyle（115）;
???bar（205123425144）;
????rectangle（205123425144）;
?????setfillstyle（115）;
??????bar（426123430144）;
???????bar（200123204144）;
}
char?chufa（double?achar?c[]）{????????/*除法計算函數(shù)*/
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