1602字符液晶6800时序8位并口样例程序由清达光电技术部提供，清达光电专业设计生产液晶模块，OLED模块，TFT模块等，产品齐全，供货快捷。
#include<reg51.h>
#include<intrins.h>
#include<stdio.h>
#define uchar unsigned char
#define uint unsigned int
sbit RS = P3^3;
sbit RW = P3^1;
sbit E = P3^0;
unsigned char X,Y;
/*-----------建立自定义演示用字符库-----------*/
code unsigned int CGTAB[9][8]={
/*
横向取模 ，先上后下
*/
0x08,0x0f,0x12,0x0f,0x0a,0x1f,0x02,0x02, /* "↓"代码=0 */
0x0f,0x09,0x0f,0x09,0x0f,0x09,0x11,0x00, /* "月"代码=1 */
0x1f,0x11,0x11,0x1f,0x11,0x11,0x1f,0x00, /* "日"代码=2 */
0x11,0x0a,0x04,0x1f,0x04,0x1f,0x04,0x00, /* "￥"代码=3 */
0x0e,0x00,0x1f,0x0a,0x0a,0x0a,0x13,0x00, /* "元"代码=4 */
0x18,0x18,0x07,0x08,0x08,0x08,0x07,0x00, /* "℃"代码=5 */
0x04,0x0a,0x15,0x04,0x04,0x04,0x04,0x00, /* "↑"代码=6 */
0x17,0x15,0x15,0x15,0x15,0x15,0x17,0x00, /* "10"代码=7 */
0x04,0x04,0x04,0x04,0x15,0x0a,0x04,0x00, /* "↓"代码=8 */
};
/*-----------自定义字符显示用字库-----------*/
void delay(unsigned int t)
{ unsigned int i,j;
for(i=0;i<t;i++)
for(j=0;j<10;j++)
;
}
void busy(void)
{ P1=0xff;
RS=0;
RW=1;
E=1;
while((P1&0x80)==0x80);
E=0;
}
void writecom(unsigned char com)
{ RS=0;
RW=0;
P1=com;
E=1;
_nop_();
E=0;
}
void lcdwc(unsigned char com)
{
busy();
writecom(com);
}
void lcdwd(unsigned char dat)
{
busy();
RS=1;
RW=0;
P1=dat;
E=1;
_nop_();
E=0;
}
/*****************************************************
定义地址ddram显示范围
****************************************************/
void lcdpos(void)
{
X&=0x0f; ///16列
Y&=0x03; ///2行
if(Y==0x00)
lcdwc(X|0x80);//**行ddram
else if(Y==0x01)
lcdwc((X+0x40)|0x80); //**行ddram
}
/*****************************************************
初始化函数
****************************************************/
void lcdreset()
{ delay(150); writecom(0x38);
delay(50); writecom(0x38);
delay(50); writecom(0x38);
lcdwc(0x38); //8位数据 显示2行 5*7字符
lcdwc(0x08); //关显示 光标关 闪烁关
lcdwc(0x01); //
lcdwc(0x06); //光标右移 画面不动
lcdwc(0x0c); //开显示 光标关 闪烁关
}
/***************************************
全部写入
***************************************/
void lcdfill(unsigned char n)
{
for(Y=0;Y<2;Y++)
for(X=0;X<16;X++)
{ lcdpos(); ///定义起始地址
lcdwd(n); }
}
/***************************************
全部写入隔点
***************************************/
void lcdgraphic(unsigned char m)
{
for(Y=0;Y<2;Y++)
for(X=0;X<16;X++)
{ lcdpos();
lcdwd(m);
lcdwd(~m); }
}
/*****************************************
字符串写入
*******************************************/
void lcdwda(unsigned char x,unsigned char y,unsigned char *s)
{
Y=y;
for(X=x;X<16;X++)
{
lcdpos();
lcdwd(*s);
s++;
delay(400);
}
}
/**************************/
/* 建立自���义函数 */
/**************************/
CGRAM()
{
uchar dat;
unsigned char i,j;
lcdwc(0x40); /* 设置CGRAM地址 */
/* 调写指令函数 */
for(i=0;i<9;i++)
{
for(j=0;j<8;j++)
{
dat=CGTAB[i][j]; /* 取字模 */
lcdwd(dat); /* 调写数据函数 */
}
}
}
/*****************************************
主函数
*******************************************/
main()
{
unsigned char i,j;
E=0;
lcdreset();
while(1)
{
// lcdreset();
lcdfill(0xff);
delay(2000);
lcdfill(0x55);
delay(2000);
lcdfill(0xaa);
delay(2000);
lcdgraphic(0xff);
delay(2000);
lcdgraphic(0x00);
delay(2000);
lcdgraphic(0x55);
delay(2000);
lcdgraphic(0xaa);
delay(2000);
for(i=0x30;i<=0x3a;i++)
{ lcdfill(i);
delay(3500);//显示0-9数字
}
lcdfill(' ');
delay(2000);
lcdwda(0,0,"ABCDEFGHIJKLMNOPQRSTUVWXYZ");
lcdwda(0,1,"ZYXWVUTSRQPONMLKJIHGFEDCBA");
delay(2000);
lcdfill(' ');
/*------------CGRAM显示段--------------*/
CGRAM(); /* 调自定义字符库函数 */
lcdwc(0x80); /* 设置DDRAM地址**行显示 */
// lcdwc(0xc0); /* 设置DDRAM地址**行显示 */
/* 调写指令函数 */
for(i=0;i<9;i++)
{
/* 取字符代码 */
lcdwd(i); /* 调写数据函数 */
}
delay(4000); lcdfill(' ');
}
}