51单片机计算器 ADDA.docx

1、51单片机计算器 AD DA说明：该源程序包括键盘计算器，AD总线 DA总线 Music播放 串口收发 液晶显示；程序段均用/*/隔开；为方便大家使用已将各程序段分开，共参考。若需建立全部功能则分别建立各自.H文件，将它们全加入工程。另附仿真Proteus图。 各延时程序/*/#include #include #include delay.h#define uchar unsigned char#define uint unsigned int void delay_nus(uint x) while(x-); void delay_nms(uint z)/毫秒级延时函数 uint i,j;

2、 for(i=0;iz;i+) for(j=0;j0;c-) for(a=125;a0;a-) for(b=200;b0;b-);void music_delay(uint z) /延时165MS,即十六分音符 uint x,y; for(x=z;x0;x-) for(y=19000;y0;y-);void music_delay1(uint z) /延时1MS uint x,y; for(x=z;x0;x-) for(y=112;y0;y-); /*/#include /包括一个 52 标准内核的头文件 #include #include /包含有左右循环移位子函数的库#include ad

3、c.h#include LCD1602.h#include delay.h#define uchar unsigned char /宏定义, 定义一下方便使用#define uint unsigned int#define IN0 XBYTE0X0000uchar bai,shi,ge,ii=0,jieguo;uchar xdata *ad_adr; /=/ ADC0809模数转换/=void ADC0809_main(void) uchar cun; ad_adr=&IN0; *ad_adr=ii; delay_nus(1000); jieguo=*ad_adr; /读取转换结果 jiegu

4、o=jieguo*500/255; /A/D分辨率为8位（255），转换出0-5v的实数值 cun=(unsigned char)jieguo; bai=(cun/100); /得到百位数 shi=cun%100/10; /得到十位数 ge=cun%10; LCD_write_str(1,0,value: ); write_com(0xC0+9); write_dat(0x30+bai); write_dat(0x2e); /显示小数点 write_dat(0x30+shi); write_dat(0x30+ge); write_dat(V);/*/#include #include #inc

5、lude #include delay.h#include dac.h#define uchar unsigned char#define uint unsigned int#define DAC0832 XBYTE 0x7fff /=/ DAC0832转换函数/=void DAC0832_shanjiaobo() uchar i,k; for(i=0;i100;i+) for(k=0;k255;k+) /k0;k-) DAC0832=k; void DAC0832_fangbo() uchar i; for(i=0;i100;i+) DAC0832=0X00; /输入低电平 delay_nu

6、s(500); /延时 DAC0832=0xff; delay_nus(500); void dac0832_main() DAC0832_fangbo(); DAC0832_shanjiaobo();/*/#include #include delay.h#include LCD1602.h#include KEY.h#define uchar unsigned char#define uint unsigned intuchar num; /存放按键标识uchar denghao=0,flag=0,fuhao,key; /denghao存放是否按下等号键，flag存放是否按下符号键，fuh

7、ao存放按下是什么符号，key存放按键ASCII码值long a,b,c; /加数a、b 结果为cuchar code table= /键盘显示编码，加上0x30，为对应的ASCII码 0x2f-0x307, 8, 9, 0x2f-0x30, / 1、 2、 3、 + ； 0x2a-0x304, 5, 6, 0x2a-0x30, / 4、 5、 6、 - ； 0x2d-0x301, 2, 3, 0x2d-0x30, / 7、 8、 9、 * ； 0x2b-0x300x2f-0x30, 0x2a-0x30, 0, 0x2b-0x30; / 0、 =、 CE、 / ; 0x01-0x30, 0,

8、0x3d-0x30, 0x2f-0x30; / 0、 =、 CE、 / ;void keyscan() uchar temp; KEY_8=0xfe; /1111 1110 temp=KEY_8; temp=temp&0xf0; while(temp!=0xf0) delay_nms(20); temp=KEY_8; temp=temp&0xf0; while(temp!=0xf0) temp=KEY_8; switch(temp) case 0xee:num=0;break; /1110 1110 case 0xde:num=1;break; /1101 1110 case 0xbe:num

9、=2;break; /1011 1110 case 0x7e:num=3;break; /0111 1110 while(temp!=0xf0) /等待按键释放 temp=KEY_8; temp=temp&0xf0; if(num=0|num=1|num=2) /判断是按下1,2,3 if(flag=0) /如果没有按符号键,符号前的数值为a a=a*10+tablenum; else if(flag=1) /如果按了符号键,符号后的数值为b b=b*10+tablenum; if(denghao=1) /如果之前按了=号,再按键时清屏，进行下一次计算 denghao=0; LCD_init(

10、); LCD_write_str(0,0,JIsuanqitest); write_com(0x80+0x40); /清屏 else if(num=3) /判断是否按下+ flag=1; fuhao=4; key=tablenum; /显示按下的键 write_dat(0x30+key); KEY_8=0xfd; / 1111 1101 temp=KEY_8; temp=temp&0xf0; while(temp!=0xf0) delay_nms(20); temp=KEY_8; temp=temp&0xf0; while(temp!=0xf0) temp=KEY_8; switch(temp

11、) case 0xed:num=4;break; /1110 1101 case 0xdd:num=5;break; /1101 1101 case 0xbd:num=6;break; /1011 1101 case 0x7d:num=7;break; /0111 1101 while(temp!=0xf0) /等待按键释放 temp=KEY_8; temp=temp&0xf0; if(num=4|num=5|num=6) /判断是按下4,5,6 if(denghao=1) /如果之前按了=号,再按键时清屏，进行下一次计算 denghao=0; LCD_init(); LCD_write_st

12、r(0,0,JIsuanqitest); write_com(0x80+0x40); /清屏 if(flag=0) /如果没有按符号键,符号前的数值为a a=a*10+tablenum; else if(flag=1)/如果按了符号键,符号后的数值为b b=b*10+tablenum; else if(num=7) /判断是否按下- flag=1; fuhao=3; key=tablenum; /显示按下的键 write_dat(0x30+key); KEY_8=0xfb; /1111 1011 temp=KEY_8; temp=temp&0xf0; while(temp!=0xf0) del

13、ay_nms(20); temp=KEY_8; temp=temp&0xf0; while(temp!=0xf0) temp=KEY_8; switch(temp) case 0xeb:num=8;break; /1110 1011 case 0xdb:num=9;break; /1101 1011 case 0xbb:num=10;break; /1011 1011 case 0x7b:num=11;break; /0111 1011 while(temp!=0xf0) temp=KEY_8; temp=temp&0xf0; if(num=8|num=9|num=10) /判断是按下7,8,

14、9 if(denghao=1) /如果之前按了=号,再按键时清屏，进行下一次计算 denghao=0; LCD_init(); LCD_write_str(0,0,JIsuanqitest); write_com(0x80+0x40); /清屏 if(flag=0) a=a*10+tablenum; /如果没有按符号键,符号前的数值为a else if(flag=1) b=b*10+tablenum; /如果按了符号键,符号后的数值为b else if(num=11) /判断是否按下* flag=1; fuhao=2; key=tablenum; write_dat(0x30+key); KE

15、Y_8=0xf7; /1111 0111 temp=KEY_8; temp=temp&0xf0; while(temp!=0xf0) delay_nms(20); temp=KEY_8; temp=temp&0xf0; while(temp!=0xf0) temp=KEY_8; switch(temp) case 0xe7:num=12;break; /1110 0111 case 0xd7:num=13;break; /1101 0111 case 0xb7:num=14;break; /1011 0111 case 0x77:num=15;break; /0111 0111 while(t

16、emp!=0xf0) temp=KEY_8; temp=temp&0xf0; switch(num) case 13: /按0键 if(denghao=1) /如果之前按了=号,再按键时清屏，进行下一次计算 denghao=0; LCD_init(); LCD_write_str(0,0,JIsuanqitest); write_com(0x80+0x40); /清屏 if(flag=0) a=a*10; else if(flag=1) b=b*10; write_dat(0x30); break; case 14: /按=键（+、-、*、/、） denghao=1; if(fuhao=1)

17、/如果符号键是+，执行+运算 write_com(0x80+0x4f); /使结果从屏幕最右下角显示出来 write_com(0x04); /从右到左显示 c=a+b; while(c!=0) write_dat(0x30+c%10); c=c/10; write_dat(0x3d); /显示等号= fuhao=0; a=0; b=0; flag=0; if(fuhao=2) /如果符号键是-，执行-运算 write_com(0x80+0x4f); /使结果从屏幕最右下角显示出来 write_com(0x04); if(a=b) c=a-b; while(c!=0) write_dat(0x3

18、0+c%10); c=c/10; else if(ab) c=b-a; while(c!=0) write_dat(0x30+c%10); c=c/10; write_dat(0x2d); /显示负号 write_dat(0x3d); /显示等号= a=0; b=0; flag=0; fuhao=0; if(fuhao=3) /如果符号键是*，执行*运算 write_com(0x80+0x4f); /使结果从屏幕右下角显示出来 write_com(0x04); c=a*b; while(c!=0) write_dat(0x30+c%10); c=c/10; write_dat(0x3d); /

19、显示等号= a=0; b=0; flag=0; fuhao=0; if(fuhao=4) /如果符号键是/，执行/运算 key=0; /小数位数 write_com(0x80+0x4f); write_com(0x04); if(b!=0) c=(long)( ( (float)a/b )*10000); /结果保留4位小数 else LCD_write_str(1,15,rorre); /显示错位 while(c!=0) write_dat(0x30+c%10); c=c/10; key+; if(key=4) /显示完六位小数后，显示小数点 write_dat(0x2e); /显示小数点

20、if(a/b=0) write_dat(0x30); /显示0 write_dat(0x3d); /显示等号 a=0; b=0; flag=0; fuhao=0; break; case 12: LCD_init(); LCD_write_str(0,0,JIsuanqitest); write_com(0x80+0x40); /清屏 a=0; b=0; flag=0; fuhao=0; break; case 15: flag=1; fuhao=1; write_dat(0x30+tablenum); break; void jisuanqi_main() keyscan(); void i

21、nt1() interrupt 2 EX1=0;/关外部中断1 /music_delay1(1);/去抖 EX1=1;/开外部中断1/*/#include#include LCD1602.h#include delay.hvoid write_num(uchar num) /写数据线命令(四线模式数据要分两次写) LCD_date &= 0x0F; /清高四位端口 LCD_date |= (num&0xF0); /写高四位数据 LCD_EN = 1; /EN=1 delay_nus(5); LCD_EN = 0; /EN=0 LCD_date &= 0x0F; /清高四位端口 LCD_date

22、 |= (num&0x0F)4); /写低四位数据 LCD_EN = 1; /EN=1 delay_nus(5); LCD_EN = 0; /EN=0void write_com(uchar com) /写指令/ check_busy(); /读忙 LCD_RS = 0;/ LCD_RW=0; /写入 write_num(com); void write_dat(uchar dat) /写函数/ check_busy(); /读忙 LCD_RS = 1;/ LCD_RW=0; /写入 write_num(dat);void LCD_init(void) /LCD初始化 delay_nms(15

23、); /原来1602初始化成4位数据线之前必需先初始化成8位 write_com(0x33); /(此时命令发送方式是8位格式,但数据线只需接4位), delay_nms(5); /然后再改到4位线宽,这样初始化才稳定 write_com(0x32); delay_nms(5); write_com(0x28); /四线模式设置 write_com(0x0f); /显示开-对应开关显示控制指令 write_com(0x01); /清屏-对应清屏指令 delay_nms(5);void LCD_set_addr(uchar x,uchar y)/写地址函数 if(x) write_com(0xc0+y); /第二行显示 else write_com(0x80+y); /第一行显示 void LCD_write_char(uchar x,uchar y,uchar zifu)/写字符函数 LCD_set_addr(x,y); write_dat(zifu); void LCD_write_str(uc