《2022年2022年简单的C语言代码 .pdf》由会员分享，可在线阅读，更多相关《2022年2022年简单的C语言代码 .pdf（8页珍藏版）》请在taowenge.com淘文阁网|工程机械CAD图纸|机械工程制图|CAD装配图下载|SolidWorks_CaTia_CAD_UG_PROE_设计图分享下载上搜索。
1、用 C 简单编写计算器源代码#include /*DOS 接口函数 */ #include /*数学函数的定义 */ #include /*屏幕操作函数 */ #include /*I/O 函数*/ #include /* 库函数 */ #include /*变量长度参数表 */ #include /*图形函数 */ #include /*字符串函数 */ #include /*字符操作函数 */ #define UP 0 x48 /*光标上移键 */ #define DOWN 0 x50 /* 光标下移键 */ #define LEFT 0 x4b /*光标左移键 */ #define RI
2、GHT 0 x4d /* 光标右移键 */ #define ENTER 0 x0d /*回车键*/ void *rar; /* 全局变量，保存光标图象 */ struct palettetype palette; /* 使用调色板信息 */ int GraphDriver; /* 图形设备驱动 */ int GraphMode; /* 图形模式值 */ int ErrorCode; /* 错误代码 */ int MaxColors; /* 可用颜色的最大数值 */ int MaxX, MaxY; /* 屏幕的最大分辨率 */ double AspectRatio; /* 屏幕的像素比 */ v
3、oid drawboder(void); /*画边框函数 */ void initialize(void); /* 初始化函数 */ void computer(void); /* 计算器计算函数 */ void changetextstyle(int font, int direction, int charsize); /*改变文本样式函数 */ void mwindow(char *header); /*窗口函数 */ int specialkey(void) ; /* 获取特殊键函数 */ int arrow(); /* 设置箭头光标函数 */ /*主函数 */ int main()
4、initialize();/* 设置系统进入图形模式*/ computer(); /*运行计算器*/ closegraph();/*系统关闭图形模式返回文本模式*/ return(0); /*结束程序 */ /* 设置系统进入图形模式*/ void initialize(void) int xasp, yasp; /* 用于读 x 和 y 方向纵横比 */ GraphDriver = DETECT; /* 自动检测显示器 */ initgraph( &GraphDriver, &GraphMode, ); 名师资料总结 - - -精品资料欢迎下载 - - - - - - - - - - - -
5、 - - - - - - 名师精心整理 - - - - - - - 第 1 页，共 8 页 - - - - - - - - - /*初始化图形系统 */ ErrorCode = graphresult(); /*读初始化结果 */ if( ErrorCode != grOk ) /* 如果初始化时出现错误 */ printf(Graphics System Error: %sn, grapherrormsg( ErrorCode ) ); /*显示错误代码 */ exit( 1 ); /*退出*/ getpalette( &palette ); /* 读面板信息 */ MaxColors =
6、getmaxcolor() + 1; /* 读取颜色的最大值 */ MaxX = getmaxx(); /* 读屏幕尺寸*/ MaxY = getmaxy(); /* 读屏幕尺寸*/ getaspectratio( &xasp, &yasp ); /* 拷贝纵横比到变量中 */ AspectRatio = (double)xasp/(double)yasp;/* 计算纵横比值 */ /*计算器函数 */ void computer(void) struct viewporttype vp; /*定义视口类型变量 */ int color, height, width; int x, y,x0,
7、y0, i, j,v,m,n,act,flag=1; float num1=0,num2=0,result; /*操作数和计算结果变量 */ char cnum5,str220=,c,temp20=; char str1=1230.456+-789*/Qc=%;/* 定义字符串在按钮图形上显示的符号*/ mwindow( Calculator ); /* 显示主窗口*/ color = 7; /* 设置灰颜色值 */ getviewsettings( &vp ); /* 读取当前窗口的大小 */ width=(vp.right+1)/10; /* 设置按钮宽度*/ height=(vp.bot
8、tom-10)/10 ; /*设置按钮高度*/ x = width /2; /* 设置 x 的坐标值 */ y = height/2; /*设置 y的坐标值 */ setfillstyle(SOLID_FILL, color+3); bar( x+width*2, y, x+7*width, y+height ); /*画一个二维矩形条显示运算数和结果*/ setcolor( color+3 ); /*设置淡绿颜色边框线 */ rectangle( x+width*2, y, x+7*width, y+height ); /*画一个矩形边框线 */ setcolor(RED); /*设置颜色为
9、红色 */ outtextxy(x+3*width,y+height/2,0.); /* 输出字符串 0.*/ x =2*width-width/2; /* 设置 x 的坐标值 */ y =2*height+height/2; /* 设置 y 的坐标值 */ for( j=0 ; j4 ; +j ) /* 画按钮 */ for( i=0 ; i=x0+6*width) /*如果右移，移到尾，则移动到最左边字符位置*/ x=x0; m=0; else x=x+width+width/2; m+; /* 否则，右移到下一个字符位置*/ if(v=LEFT) /* 左移箭头时新位置计算 */ if(
10、x=x0) x=x0+6*width; 名师资料总结 - - -精品资料欢迎下载 - - - - - - - - - - - - - - - - - - 名师精心整理 - - - - - - - 第 3 页，共 8 页 - - - - - - - - - m=4; /* 如果移到头，再左移，则移动到最右边字符位置*/ else x=x-width-width/2; m-; /* 否则，左移到前一个字符位置*/ if(v=UP) /* 上移箭头时新位置计算 */ if(y=7*height) y=y0; n=0; /* 如果移到尾，再下移，则移动到最上边字符位置*/ else y=y+heigh
11、t+height/2; n+; /* 否则，移到下边一个字符位置*/ putimage(x,y,rar,XOR_PUT); /* 在新的位置显示光标箭头*/ c=str1n*5+m; /* 将字符保存到变量c 中*/ if(isdigit(c)|c=.) /* 判断是否是数字或小数点 */ if(flag=-1) /* 如果标志为 -1，表明为负数 */ strcpy(str2,-); /* 将负号连接到字符串中 */ flag=1; /* 将标志值恢复为 1*/ sprintf(temp,%c,c); /* 将字符保存到字符串变量temp中*/ strcat(str2,temp); /*将
12、temp中的字符串连接到str2 中*/ setfillstyle(SOLID_FILL,color+3); bar(2*width+width/2,height/2,15*width/2,3*height/2); outtextxy(5*width,height,str2); /* 显示字符串 */ 名师资料总结 - - -精品资料欢迎下载 - - - - - - - - - - - - - - - - - - 名师精心整理 - - - - - - - 第 4 页，共 8 页 - - - - - - - - - if(c=+) num1=atof(str2); /*将第一个操作数转换为浮点数
13、*/ strcpy(str2,); /* 将 str2清空 */ act=1; /*做计算加法标志值 */ setfillstyle(SOLID_FILL,color+3); bar(2*width+width/2,height/2,15*width/2,3*height/2); outtextxy(5*width,height,0.); /* 显示字符串 */ if(c=-) if(strcmp(str2,)=0) /* 如果 str2为空，说明是负号，而不是减号*/ flag=-1; /* 设置负数标志 */ else num1=atof(str2); /*将第二个操作数转换为浮点数*/
14、strcpy(str2,); /* 将 str2清空 */ act=2; /*做计算减法标志值 */ setfillstyle(SOLID_FILL,color+3); bar(2*width+width/2,height/2,15*width/2,3*height/2); /* 画矩形 */ outtextxy(5*width,height,0.); /* 显示字符串 */ if(c=*) num1=atof(str2); /*将第二个操作数转换为浮点数*/ strcpy(str2,); /* 将 str2清空 */ act=3; /*做计算乘法标志值 */ setfillstyle(SOL
15、ID_FILL,color+3); bar(2*width+width/2,height/2,15*width/2,3*height/2); outtextxy(5*width,height,0.); /* 显示字符串 */ if(c=/) num1=atof(str2); /*将第二个操作数转换为浮点数*/ strcpy(str2,); /* 将 str2清空 */ act=4; /*做计算除法标志值 */ setfillstyle(SOLID_FILL,color+3); bar(2*width+width/2,height/2,15*width/2,3*height/2); outtex
16、txy(5*width,height,0.); /* 显示字符串 */ if(c=) num1=atof(str2); /*将第二个操作数转换为浮点数*/ 名师资料总结 - - -精品资料欢迎下载 - - - - - - - - - - - - - - - - - - 名师精心整理 - - - - - - - 第 5 页，共 8 页 - - - - - - - - - strcpy(str2,); /* 将 str2清空 */ act=5; /*做计算乘方标志值 */ setfillstyle(SOLID_FILL,color+3); /* 设置用淡绿色实体填充*/ bar(2*width+w
17、idth/2,height/2,15*width/2,3*height/2); /* 画矩形 */ outtextxy(5*width,height,0.); /* 显示字符串 */ if(c=%) num1=atof(str2); /*将第二个操作数转换为浮点数*/ strcpy(str2,); /* 将 str2清空 */ act=6; /*做计算模运算乘方标志值*/ setfillstyle(SOLID_FILL,color+3); /* 设置用淡绿色实体填充*/ bar(2*width+width/2,height/2,15*width/2,3*height/2); /* 画矩形 */
18、 outtextxy(5*width,height,0.); /* 显示字符串 */ if(c=) num2=atof(str2); /*将第二个操作数转换为浮点数*/ switch(act) /*根据运算符号计算 */ case 1:result=num1+num2;break; /* 做加法 */ case 2:result=num1-num2;break; /* 做减法*/ case 3:result=num1*num2;break; /* 做乘法 */ case 4:result=num1/num2;break; /* 做除法*/ case 5:result=pow(num1,num2
19、);break; /* 做 x 的 y 次方*/ case 6:result=fmod(num1,num2);break; /* 做模运算 */ setfillstyle(SOLID_FILL,color+3); /* 设置用淡绿色实体填充*/ bar(2*width+width/2,height/2,15*width/2,3*height/2); /* 覆盖结果区 */ sprintf(temp,%f,result); /* 将结果保存到 temp中*/ outtextxy(5*width,height,temp); /* 显示结果 */ if(c=c) num1=0; /*将两个操作数复位
20、0，符号标志为 1*/ num2=0; flag=1; strcpy(str2,); /* 将 str2清空 */ setfillstyle(SOLID_FILL,color+3); /* 设置用淡绿色实体填充*/ bar(2*width+width/2,height/2,15*width/2,3*height/2); /* 覆盖结果区 */ outtextxy(5*width,height,0.); /* 显示字符串 */ if(c=Q)exit(0); /* 如果选择了 q 回车，结束计算程序 */ 名师资料总结 - - -精品资料欢迎下载 - - - - - - - - - - - -
21、- - - - - - 名师精心整理 - - - - - - - 第 6 页，共 8 页 - - - - - - - - - putimage(x,y,rar,XOR_PUT); /* 在退出之前消去光标箭头*/ return; /*返回*/ /*窗口函数 */ void mwindow( char *header ) int height; cleardevice(); /* 清除图形屏幕*/ setcolor( MaxColors - 1 ); /* 设置当前颜色为白色 */ setviewport( 20, 20, MaxX/2, MaxY/2, 1 ); /* 设置视口大小*/ hei
22、ght = textheight( H ); /* 读取基本文本大小*/ settextstyle( DEFAULT_FONT, HORIZ_DIR, 1 );/* 设置文本样式 */ settextjustify( CENTER_TEXT, TOP_TEXT );/* 设置字符排列方式 */ outtextxy( MaxX/4, 2, header ); /*输出标题 */ setviewport( 20,20+height+4, MaxX/2+4, MaxY/2+20, 1 ); /* 设置视口大小 */ drawboder(); /*画边框*/ void drawboder(void)
23、/* 画边框*/ struct viewporttype vp; /*定义视口类型变量 */ setcolor( MaxColors - 1 ); /*设置当前颜色为白色*/ setlinestyle( SOLID_LINE, 0, NORM_WIDTH );/*设置画线方式 */ getviewsettings( &vp );/*将当前视口信息装入vp 所指的结构中 */ rectangle( 0, 0, vp.right-vp.left, vp.bottom-vp.top ); /*画矩形边框 */ /*设计鼠标图形函数 */ int arrow() int size; int raw=4
24、,4,4,8,6,8,14,16,16,16,8,6,8,4,4,4; /* 定义多边形坐标 */ setfillstyle(SOLID_FILL,2); /* 设置填充模式 */ fillpoly(8,raw); /* 画出一光标箭头 */ size=imagesize(4,4,16,16); /*测试图象大小 */ rar=malloc(size); /*分配内存区域 */ getimage(4,4,16,16,rar); /*存放光标箭头图象 */ putimage(4,4,rar,XOR_PUT); /*消去光标箭头图象 */ return 0; /*按键函数 */ int speci
25、alkey(void) int key; while(bioskey(1)=0); /* 等待键盘输入 */ key=bioskey(0); /*键盘输入 */ 名师资料总结 - - -精品资料欢迎下载 - - - - - - - - - - - - - - - - - - 名师精心整理 - - - - - - - 第 7 页，共 8 页 - - - - - - - - - key=key&0 xff? key&0 xff:key8; /*只取特殊键的扫描值，其余为0*/ return(key); /*返回键值 */ 名师资料总结 - - -精品资料欢迎下载 - - - - - - - - - - - - - - - - - - 名师精心整理 - - - - - - - 第 8 页，共 8 页 - - - - - - - - -