液晶1602显示矩阵键盘.doc_第1页
液晶1602显示矩阵键盘.doc_第2页
液晶1602显示矩阵键盘.doc_第3页
全文预览已结束

下载本文档

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

文档简介

#include#include#define uchar unsigned char#define uint unsigned intsbit lcd_RS=P25;sbit lcd_RW=P26;sbit lcd_en=P27;void delay(uint z) uint i,j; for(i=0;i200;i+) for(j=0;jz;j+);void write_command(uchar com) /*LCD写命令*/ lcd_RS=0; lcd_RW=0; P0=com; delay(5); lcd_en=1; delay(5); lcd_en=0;void lcd_init() /*LCD初始化*/ write_command(0X38); write_command(0X0e); write_command(0X06); write_command(0X01);void write_data(number)/*LCD写数据操作*/ lcd_RS=1; lcd_RW=0; P0=number; delay(5); lcd_en=1; delay(5); lcd_en=0;uchar Keyscan() /*扫描子程序*/ uchar i,j,temp,buffer4=0xfe,0xfd,0xfb,0xf7; for(j=0;j4;j+) P1=bufferj; /*以下三个_nop_();作用为让 P1 口的状态稳定*/ _nop_();_nop_();_nop_();temp=0x10; for(i=0;i4;i+) if(!(P1&temp) return (i+j*4); temp=1; void L1602_char(uchar hang,uchar lie,uchar sign)uchar a;if(hang = 1) a = 0x80;if(hang = 2) a = 0xc0;a = a + lie - 1;write_command(a);write_data(sign); void L1602_string(uchar hang,uchar lie,uchar *p)uchar a;if(hang = 1) a = 0x80;if(hang = 2) a = 0xc0;a = a + lie - 1;write_command(a);while(1)if(*p = 0) break;write_data(*p);p+;void main() uchar key_data; lcd_init();L1602_string(1,1, 4*4 KeyBoard );L1602_string(2,1,You Press The );while(1) P1 = 0xf0;if(P1 != 0xf0)delay(5);if(P1 != 0xf0) key_data = Keyscan(); L160

温馨提示

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

评论

0/150

提交评论