单片机c51驱动1602A液晶屏的驱动实验.doc

大家网电子工程师：/forum-593-1.html单片机c51驱动1602A液晶屏的驱动实验-所需硬件: 1.单片机实验开发板A2.杜邦头插线3.16x2液晶显示字符模块4.STC89C51RC单片机所需软件: 1. Keil C51 V8.08或Keil_uv3 绿色版本2.STC单片机ISP下载编程软件1602A液晶屏连接图C语言源程序/* 1602A液晶屏驱动程序* 晶 振 频 率:11.0592M* 线路-单片机实验开发板A*/#include #define uchar unsigned char#define uint unsigned intsbit LCM_E=P35; /定义接口sbit LCM_RW=P36;sbit LCM_RS=P37; #define LCM_Data P1/数据接口void LCM_WriteData(uchar WDLCM);void LCM_WriteCommand(uchar WCLCM,BuysC);uchar LCM_ReadData(void);uchar LCM_ReadStatus(void);void LCM_Init(void);void DisplayOneChar(uchar X, uchar Y, uchar DData);void DisplayListChar(uchar X, uchar Y, uchar code *DData);void Delay5Ms(void);void Delay400Ms(void);uchar code uctech = 1602A;uchar code net = ;void main(void)Delay400Ms(); /启动等待，等LCM讲入工作状态LCM_Init(); /LCM初始化Delay5Ms(); /延时片刻(可不要)DisplayListChar(6, 1, uctech); DisplayListChar(0, 0, net);LCM_ReadData();/测试用句无意义LCM_Data=255;while(1);/*1602A写数据函数*/*函数原型:void LCM_WriteData(uchar WDLCM)/*函数功能:1602A写数据/*输入参数:要写入的数据/*输出参数:无/*调用模块:/*建立时间:2005/11/14/*作者:站长/*/void LCM_WriteData(uchar WDLCM)LCM_ReadStatus(); /检测忙LCM_Data = WDLCM;LCM_RS = 1;LCM_RW = 0;LCM_E = 0; /若晶振速度太高可以在这后加小的延时LCM_E = 0; /延时LCM_E = 1;/*1602A写指令函数*/*函数原型:void LCM_WriteCommand(uchar WCLCM,BuysC)/*函数功能:1602A写指令/*输入参数:要写入的指令/*输出参数:无/*调用模块:/*建立时间:2005/11/14/*作者:站长/*/void LCM_WriteCommand(uchar WCLCM,BuysC) /BuysC为0时忽略忙检测if (BuysC) LCM_ReadStatus(); /根据需要检测忙LCM_Data = WCLCM;LCM_RS = 0;LCM_RW = 0;LCM_E = 0;LCM_E = 0;LCM_E = 1;/*1602A读数据函数*/*函数原型:uchar LCM_ReadData(void)/*函数功能:1602A读数据/*输入参数:无/*输出参数:1602A返回的数据/*调用模块:/*建立时间:2005/11/14/*作者:站长/*/uchar LCM_ReadData(void)LCM_RS = 1;LCM_RW = 1;LCM_E = 0;LCM_E = 0;LCM_E = 1;return(LCM_Data);/*1602A读状态函数*/*函数原型:uchar LCM_ReadData(void)/*函数功能:1602A读状态/*输入参数:无/*输出参数:1602A返回的状态/*调用模块:/*建立时间:2005/11/14/*作者:站长/*/uchar LCM_ReadStatus(void)LCM_Data = 0xFF;LCM_RS = 0;LCM_RW = 1;LCM_E = 0;LCM_E = 0;LCM_E = 1;while (LCM_Data & 0x80); /检测忙信号return(LCM_Data);/*1602A初始化函数*/*函数原型:void LCM_Init(void)/*函数功能:1602A初始化/*输入参数:无/*输出参数:无/*调用模块:/*建立时间:2005/11/14/*作者:站长/*/void LCM_Init(void)LCM_Data = 0;LCM_WriteCommand(0x38,0); /三次显示模式设置，不检测忙信号Delay5Ms();LCM_WriteCommand(0x38,0);Delay5Ms();LCM_WriteCommand(0x38,0);Delay5Ms();LCM_WriteCommand(0x38,1); /显示模式设置,开始要求每次检测忙信号LCM_WriteCommand(0x08,1); /关闭显示LCM_WriteCommand(0x01,1); /显示清屏LCM_WriteCommand(0x06,1); / 显示光标移动设置LCM_WriteCommand(0x0C,1); / 显示开及光标设置/*1602A按指定位置显示一个字符函数*/*函数原型:void DisplayOneChar(uchar X, uchar Y, uchar DData)/*函数功能:1602A按指定位置显示一个字符/*输入参数:X坐标 Y坐标 要显示的字符/*输出参数:无/*调用模块:/*建立时间:2005/11/14/*作者:站长/*/void DisplayOneChar(uchar X, uchar Y, uchar DData)Y &= 0x1;X &= 0xF; /限制X不能大于15，Y不能大于1if (Y) X |= 0x40; /当要显示第二行时地址码+0x40;X |= 0x80; / 算出指令码LCM_WriteCommand(X, 0); /这里不检测忙信号，发送地址码LCM_WriteData(DData);/*1602A按指定位置显示一串字符函数*/*函数原型:void DisplayListChar(uchar X, uchar Y, uchar code *DData)/*函数功能:1602A按指定位置显示一个字符/*输入参数:X坐标 Y坐标 要显示字符串的首地址/*输出参数:无/*调用模块:/*建立时间:2005/11/14/*作者:站长/*/void DisplayListChar(uchar X, uchar Y, uchar code *DData)uchar ListLength;ListLength = 0;Y &= 0x1;X &= 0xF; /限制X不能大于15，Y不能大于1while (DDataListLength0x20) /若到达字串尾则退出if (X 单片机实验开发板A*/ LCM_RS EQU P3.7 ;/定义接口 LCM_RW EQU P3.6 LCM_E EQU P3.5 LCM_Data EQU P1 ;数据接口ORG 0000H ;从0000H处开始SJMP MAIN ;跳转到MAIN处ORG 0030H ;主程序从0030H处开始MAIN: MOV SP,#70H ;堆栈指针指向70HLCALL INITIAL ;调用启动LCM子程序进行初始化LCALL CLS ;调用清除LCM子程序MOV A,#80H ;向A送立即数80H设定显示地址为第一行第一列LCALL WRITE_COM ;调用写指令到LCM子程序MOV DPTR,#LINE1 ;将第一行字符串的启始地址送如DPTR中LCALL DISP ;调用显示字符串到LCM子程序MOV A,#0C0H ;向A送立即数0C0H设定显示地址为第二行第一列LCALL WRITE_COM ;调用写指令到LCM子程序MOV DPTR,#LINE2 ;将第二行字符串的启始地址送如DPTR中LCALL DISP ;调用显示字符串到LCM子程序SJMP $ ;程序动态停机LINE1: DB ,00H ;第一行字符串LINE2: DB 1602A ,00H ;第二行字符串INITIAL: MOV A,#38H ;启动LCM子程序LCALL WRITE_COMMOV A,#0EHLCALL WRITE_COMMOV A,#06HLCALL WRITE_COMRETCHECK_BUSY: PUSH ACC ;查询忙碌信号子程序BUSY_LOOP: CLR LCM_ESETB LCM_RWCLR LCM_RSSETB LCM_EMOV A,LCM_DataCLR LCM_EJB ACC.7,BUSY_LOOPPOP ACCLCALL DELRETWRITE_COM: LCALL CHECK_BUSY;写指令到LCM子程序 CLR LCM_ECLR LCM_RSCLR LCM_RWSETB LCM_EMOV LCM_Data,ACLR LCM_ERETWRITE_DATA: LCALL CHECK_BUSY ;写数据到LCM子程序CLR LCM_ESETB LCM_RSCLR LCM_RWSETB LCM_EMOV LCM_Data,ACLR LCM_ERETCLS: MOV A,#01H ;清除LCM子程序LCALL WRITE_COMRETDEL: MOV R6,#5 ;2.7ms延时子程序D1: MOV R7,#248DJNZ R7,$DJNZ R6,D1RETDISP: PUSH ACC ;将A的内容压栈DISP_LOOP: CLR A ;A清零