简易计算器(1602加矩阵键盘)_第1页
简易计算器(1602加矩阵键盘)_第2页
简易计算器(1602加矩阵键盘)_第3页
简易计算器(1602加矩阵键盘)_第4页
简易计算器(1602加矩阵键盘)_第5页
已阅读5页,还剩2页未读 继续免费阅读

下载本文档

版权说明:本文档由用户提供并上传,收益归属内容提供方,若内容存在侵权,请进行举报或认领

文档简介

1、一、原理图:二、程序#include /包含单片机寄存器的头文件#include /包含_nop_()函数定义的头文件#includesbit RS=P20; /寄存器选择位,将RS位定义为P2.0引脚sbit RW=P21; /读写选择位,将RW位定义为P2.1引脚sbit E=P22; /使能信号位,将E位定义为P2.2引脚sbit BF=P17; /忙碌标志位,#define NO_KEY_PRESS 0xff/*/unsigned char code tab=0xb7,0xee,0xde,0xbe,0xed,0xdd,0xbd,0xeb,0xdb,0xbb;unsigned char

2、code num=;unsigned long num1,num2,alg;unsigned char flag;void delay1ms() unsigned char i,j; for(i=0;i10;i+) for(j=0;j15;j+) ; /*/ void delay(unsigned char n) unsigned char i;for(i=0;in;i+) delay1ms(); /*函数功能:判断液晶模块的忙碌状态返回值:result。result=1,忙碌;result=0,不忙*/ unsigned char BusyTest(void) bit result;RS=0

3、; /根据规定,RS为低电平,RW为高电平时,可以读状态 RW=1; E=1; /E=1,才允许读写 _nop_(); /空操作 _nop_(); _nop_(); _nop_(); /空操作四个机器周期,给硬件反应时间 result=BF; /将忙碌标志电平赋给resultE=0; return result; /*函数功能:将模式设置指令或显示地址写入液晶模块入口参数:dictate*/void WriteInstruction (unsigned char dictate) while(BusyTest()=1); /如果忙就等待 RS=0; /根据规定,RS和R/W同时为低电平时,可以

4、写入指令 RW=0; E=0; /E置低电平(根据表8-6,写指令时,E为高脉冲, / 就是让E从0到1发生正跳变,所以应先置0 _nop_(); _nop_(); /空操作两个机器周期,给硬件反应时间 P1=dictate; /将数据送入P1口,即写入指令或地址 _nop_(); _nop_(); _nop_(); _nop_(); /空操作四个机器周期,给硬件反应时间 E=1; /E置高电平 _nop_(); _nop_(); _nop_(); _nop_(); /空操作四个机器周期,给硬件反应时间 E=0; /当E由高电平跳变成低电平时,液晶模块开始执行命令 /*函数功能:指定字符显示的

5、实际地址入口参数:x*/ void WriteAddress(unsigned char x) WriteInstruction(x|0x80); /显示位置的确定方法规定为80H+地址码x /*函数功能:将数据(字符的标准ASCII码)写入液晶模块入口参数:y(为字符常量)*/ void WriteData(unsigned char y) while(BusyTest()=1); RS=1; /RS为高电平,RW为低电平时,可以写入数据 RW=0; E=0; /E置低电平(根据表8-6,写指令时,E为高脉冲, / 就是让E从0到1发生正跳变,所以应先置0 P1=y; /将数据送入P0口,即

6、将数据写入液晶模块 _nop_(); _nop_(); _nop_(); _nop_(); /空操作四个机器周期,给硬件反应时间 E=1; /E置高电平 _nop_(); _nop_(); _nop_(); _nop_(); /空操作四个机器周期,给硬件反应时间 E=0; /当E由高电平跳变成低电平时,液晶模块开始执行命令 /*函数功能:对LCD的显示模式进行初始化设置*/void LcdInitiate(void) delay(15); /延时15ms,首次写指令时应给LCD一段较长的反应时间 WriteInstruction(0x38); /显示模式设置:162显示,57点阵,8位数据接口

7、delay(5); /延时5msWriteInstruction(0x38);delay(5);WriteInstruction(0x38);delay(5);WriteInstruction(0x0c); /显示模式设置:显示开,有光标,光标闪烁delay(5);WriteInstruction(0x06); /显示模式设置:光标右移,字符不移delay(5);WriteInstruction(0x01); /清屏幕指令,将以前的显示内容清除delay(5); unsigned char keyscan()/键盘扫描,返回扫描值 unsigned char temp1,temp2,key;P

8、0=0xf0;if(P0!=0xf0)delay(10);if(P0!=0xf0)temp1=P0;P0=0x0f;_nop_();_nop_();_nop_();temp2=P0;key=temp1|temp2;while(P0!=0x0f);return key;return NO_KEY_PRESS; unsigned char key_inquiry()/对键盘扫描值译码并显示unsigned char i,key; key=keyscan();if(key!=NO_KEY_PRESS)if(flag)/按等于号若再次计算则将之前的数值清零WriteInstruction(0x01);

9、delay(5);flag=0;switch(key)case 0x7e:WriteData(+);return +;case 0x7d:WriteData(-);return -;case 0x7b:WriteData(*);return *;case 0x77:WriteData(0xfd);return /;case 0xd7:WriteAddress(0x40);WriteData(=);return =;case 0xe7:WriteInstruction(0x01);num1=0;num2=0;break;/CEdefault:break; for(i=0;i10;i+)if(ke

10、y=tabi)WriteData(numi);return i;return NO_KEY_PRESS;void count()/对计算进行处理,并显示计算后的结果unsigned char key,i=0,a9;unsigned long num0;key=key_inquiry();if(key=+)|(key=-)|(key=*)|(key=/)num2=num1;num1=0;alg=key;if(keynum1)num0=(num2-num1);if(num20)num0=(num2/num1);elseWriteData(e);break;default:num0=0;break;/显示计算结果if(0=num0)if(0!=alg)WriteData(0);elsenum0=num1;while(num00) i+;ai=num0%10; /WriteData(numnum0%10);num0=num0/10; for(;i0;i-)WriteData(numai);num1=0;num2=0;alg=0;fla

温馨提示

  • 1. 本站所有资源如无特殊说明,都需要本地电脑安装OFFICE2007和PDF阅读器。图纸软件为CAD,CAXA,PROE,UG,SolidWorks等.压缩文件请下载最新的WinRAR软件解压。
  • 2. 本站的文档不包含任何第三方提供的附件图纸等,如果需要附件,请联系上传者。文件的所有权益归上传用户所有。
  • 3. 本站RAR压缩包中若带图纸,网页内容里面会有图纸预览,若没有图纸预览就没有图纸。
  • 4. 未经权益所有人同意不得将文件中的内容挪作商业或盈利用途。
  • 5. 人人文库网仅提供信息存储空间,仅对用户上传内容的表现方式做保护处理,对用户上传分享的文档内容本身不做任何修改或编辑,并不能对任何下载内容负责。
  • 6. 下载文件中如有侵权或不适当内容,请与我们联系,我们立即纠正。
  • 7. 本站不保证下载资源的准确性、安全性和完整性, 同时也不承担用户因使用这些下载资源对自己和他人造成任何形式的伤害或损失。

评论

0/150

提交评论