void INITIAL()
{
ADCON1=0X87； //设置PORTA口和PORTE口为数字I/O口
TRISA3=0；
TRISB0=0；
TRISE=0X00； //设置液晶的4个控制脚为输出
}
//读液晶显示器状态子程序
void LCDSTA1()
{
while(1){
TRISD=0XFF； //设置D口为输入
RB0=1； //E1=1
RA3=0； //E2=0
RE0=1； //R/W=1
RE1=0； //A0=0
if(RD7==0) break； //为忙状态，则继续等待其为空闲
}
}
//对液晶显示器发指令子程序（指令保存在TRANS寄存器中)
void TRANS1()
{
LCDSTA1()； //判断液晶是否为忙
TRISD=0X00； //D口为输出
RB0=1； //E1=1
RA3=0； //E2=0
RE0=0； //R/W=0
RE1=0； //A0=0
PORTD=TRANS； //需要写入的命令字送入数据线
RB0=0； //E1=0写入指令
RE0=1； //R/W=1
}
//对液晶显示器写数据子程序（数据保存在WRITE寄存器中）
void WRITE1()
{
TRANS=CLMADD； //设置列地址
TRANS1()；
LCDSTA1()； //查询液晶是否为空闲
TRISD=0X00； //D口为输出
RB0=1； //E1=1
RA3=0； //E2=0
RE0=0； //R/W=0
RE1=1； //A0=1
PORTD=WRITE； //需要写入的数据放入D口
RB0=0； //E1=0，写入数据
CLMADD++； //列地址加1
RE0=1； //R/W=1
}
//开E1显示子程序
void DISP1()
{
while(1) {
TRANS=0XAF；
TRANS1()； //送出控制命令
LCDSTA1()； //判断液晶是否为空闲
TRISD=0XFF； //设置D口为输入
RB0=1； //E1=1
RA3=0； //E2=0
RE0=1； //R/W=1
RE1=0； //A0=0
if(RD5==0) break； //如果液晶没被关闭，则继续关
}
}
//E1边清屏子程序
void CLEAR1()
{
PAGEADD=0xB8； //设置页地址代码
for(PAGENUM=0X04；PAGENUM>0；PAGENUM--){
TRANS=PAGEADD；
TRANS1()；
CLMADD=0x00； //设置起始列
for(CLMSUM=0X50；CLMSUM>0；CLMSUM--) {
LCDSTA1()； //判断液晶是否为空闲
WRITE=0X00；
WRITE1()； //写入00H以清屏
}
PAGEADD++； //页号增1
}
}
//关 E1显示子程序
void DISOFF1()
{
while(1) {
TRANS=0XAE；
TRANS1()； //发出控制命令
LCDSTA1()； //判断液晶是否为空闲
TRISD=0XFF； //D口设置为输入
RB0=1； //E1=1
RA3=0； //E2=0
RE0=1； //R/W=1
RE1=0； //A0=0
if(RD5==1) break； //如果液晶没被关闭，则继续关
}
}
//E1边初始化
void lcd1()
{
DISOFF1()； //关显示E1
TRANS=0XA4； //静态显示驱动
TRANS1()； //发出控制命令
TRANS=0XA9； //占空比为1/32
TRANS1()； //发出控制命令
TRANS=0XE2； //复位
TRANS1()； //发出控制命令
TRANS=0XA0； //ADC选择正常输出
TRANS1()； //发出控制命令
CLEAR1()； //清屏
LCDSTA1()； //判断液晶是否为空闲
DISP1()； //开显示
}
//E2边的处理部分
//读液晶显示器状态子程序
void LCDSTA2()
{
while(1) {
TRISD=0XFF； //设置D口为输入
RB0=0； //E1=0
RA3=1； //E2=1
RE0=1； //R/W=1
RE1=0； //A0=0
if(RD7==0) break； //为忙状态，则继续等待其为空闲
}
}
//对液晶显示器发指令子程序指令保存在TRANS寄存器中
void TRANS2()
{
LCDSTA2()； //判断液晶是否为忙
TRISD=0X00； //D口为输出
RB0=0； //E1=0
RA3=1； //E2=1
RE0=0； //R/W=0
RE1=0； //A0=0
PORTD=TRANS； //需要写入的命令字送入数据线
RA3=0； //E2=0写入指令
RE0=1； //R/W=1
}
//对液晶显示器写数据子程序（数据保存在WRITE寄存器中）
void WRITE2()
{
TRANS=CLMADD； //设置列地址
TRANS2()；
LCDSTA2()； //查询液晶是否为空闲
TRISD=0X00； //D口为输出
RB0=0； //E1=0
RA3=1； //E2=1
RE0=0； //R/W=0
RE1=1； //A0=1
PORTD=WRITE； //需要写入的数据放入D口
RA3=0； //E2=0，写入数据
CLMADD++； //列地址加1
RE0=1； //R/W=1
}
//开E2显示子程序
void DISP2()
{
while(1) {
TRANS=0XAF；
TRANS2()； //送出控制命令
LCDSTA2()； //判断液晶是否为空闲
TRISD=0XFF； //设置D口为输入
RB0=0； //E1=0
RA3=1； //E2=1
RE0=1； //R/W=1
RE1=0； //A0=0
if(RD5==0) break； //如果液晶没被关闭，则继续关
}
}
//E2边清屏子程序
void CLEAR2()
{
PAGEADD=0xB8； //设置页地址代码
for(PAGENUM=0X04；PAGENUM>0；PAGENUM--) {
TRANS=PAGEADD；
TRANS2()；
CLMADD=0x00； //设置起始列
for(CLMSUM=0X50；CLMSUM>0；CLMSUM--) {
LCDSTA2()； //判断液晶是否为空闲
WRITE=0X00；
WRITE2()； //写入00H以清屏
}
PAGEADD++； //页号增1
}
}
//关 E2显示子程序
void DISOFF2()
{
while(1) {
TRANS=0XAE；
TRANS2()； //发出控制命令
LCDSTA2()； //判断液晶是否为空闲
TRISD=0XFF； //D口设置为输入
RB0=0； //E1=0
RA3=1； //E2=1
RE0=1； //R/W=1
RE1=0； //A0=0
if(RD5==1) break； //如果液晶没被关闭，则继续关
}
}
//E2边初始化
void lcd2()
{
DISOFF2()； //关显示E1
TRANS=0XA4； //静态显示驱动
TRANS2()； //发出控制命令
TRANS=0XA9； //占空比为1/32
TRANS2()； //发出控制命令
上一页 [1] [2] [3] 下一页
本文关键字：程序 PIC单片机，单片机-工控设备 - PIC单片机
