/*********************《 LCD1602驱动程序 》******************************

说明：此程序基于开发板HC151_V1.5开发的源程序，其它开发板只需修改引脚即可

跳线JP3：为避免相互干扰，JP3跳线帽可取下不接

LCD1602插入U7端口

晶振12MHz

——晖创电子制作——

*************************************************** —www.schuitron.com—*/

#include<reg52.h>

#define uchar unsigned char

#define uint unsigned int

sbit E=P1^0;//1602使能引脚

sbit RW=P1^1;//1602读写引脚

sbit RS=P1^2;//1602数据/命令选择引脚

/********************************************************************

* 名称 : delay()

* 功能 : 延时,延时时间大概为140US。

* 输入 : 无

* 输出 : 无

***********************************************************************/

void delay()

{

int i,j;

for(i=0; i<=100; i++)

for(j=0; j<=20; j++)

;

}

/********************************************************************

* 名称 : enable(uchar del)

* 功能 : 1602命令函数

* 输入 : 输入的命令值

* 输出 : 无

***********************************************************************/

void enable(uchar del)

{

P0 = del;

RS = 0;

RW = 0;

E = 0;

delay();

E = 1;

delay();

}

/********************************************************************

* 名称 : write(uchar del)

* 功能 : 1602写数据函数

* 输入 : 需要写入1602的数据

* 输出 : 无

***********************************************************************/

void write(uchar del)

{

P0 = del;

RS = 1;

RW = 0;

E = 0;

delay();

E = 1;

delay();

}

/********************************************************************

* 名称 : L1602_init()

* 功能 : 1602初始化，请参考1602的资料

* 输入 : 无

* 输出 : 无

***********************************************************************/

void L1602_init(void)

{

enable(0x01);

enable(0x38);

enable(0x0c);

enable(0x06);

enable(0xd0);

}

/********************************************************************

* 名称 : L1602_char(uchar hang,uchar lie,char sign)

* 功能 : 改变液晶中某位的值，如果要让第一行，第五个字符显示"b" ，调用该函数如下

L1602_char(1,5,'b')

* 输入 : 行，列，需要输入1602的数据

* 输出 : 无

***********************************************************************/

void L1602_char(uchar hang,uchar lie,char sign)

{

uchar a;

if(hang == 1) a = 0x80;

if(hang == 2) a = 0xc0;

a = a + lie - 1;

enable(a);

write(sign);

}

/********************************************************************

* 名称 : L1602_string(uchar hang,uchar lie,uchar *p)

* 功能 : 改变液晶中某位的值，如果要让第一行，第五个字符开始显示"ab cd ef" ，调用该函数如下

L1602_string(1,5,"ab cd ef;")

* 输入 : 行，列，需要输入1602的数据

* 输出 : 无

***********************************************************************/

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;

enable(a);

while(1)

{

if(*p == '\0') break;

write(*p);

p++;

}

}

/********************************************************************

* 名称 : Main()

* 功能 : 主函数

* 输入 : 无

* 输出 : 无

***********************************************************************/

void Main()

{

uchar i = 48;

L1602_init();

L1602_char(1,5,'b');

L1602_string(1,1," 0123456789 ");

L1602_string(2,1," ABCDEDGHIJ ");

while(1);

}