0802液晶屏驱动源程序

0802液晶屏驱动源程序

察看本站的产品全家福和网站介绍本站产品正式流水线工艺生产情况庆祝本站5年来首页点击量突破500万！

如果您在学习中遇到任何问题清参加51单片机学习网（深圳学林电子有限公司）论坛讨论，让更多的朋友帮助你！

12232驱动程序 12832驱动程序 12864驱动源程序 1602 驱动程序 0802 液晶驱动程序回液晶主页

;0802液晶显示CHINA-SZ LOVE8051
;***************************************************************************
;* E-mail:sxj1974@163.com (51c51 test web) 51单片机学习网（深圳学林电子有限公司），自学单片机的网站 *
;* tel:13714407535 石学军 www.51c51.com www.8951.com 51单片机学习网（深圳学林电子有限公司）系列自学单片机例程 *
;***************************************************************************
RS EQU P2.0
RW EQU P2.1
E EQU P2.2
MOV P0,#01H ;清除屏幕
ACALL ENABLE
MOV P0,#38H ;8位点阵
ACALL ENABLE
MOV P0,#0FH ;显示开
ACALL ENABLE
MOV P0,#06H ;移动光标
ACALL ENABLE
MOV P0,#80H ;显示位置
ACALL ENABLE
mov dptr,#table3
call write1
mov p0,#0c0h
call enable
mov dptr,#table2
call write1
mov p0,#0c2h
call enable
jmp $
ENABLE: ;送命令
CLR RS
CLR RW
CLR E
ACALL DELAY
SETB E
RET
write1: ;写一段话
mov r1,#00h
a1:mov a,r1
movc a,@a+dptr
call write2
inc r1
cjne a,#00h,a1
ret
write2: ;写一个字节
mov p0,a
setb rs
clr rw
clr e
call delay
setb e
ret
delay: ;延时子程序。
mov r7,#255
d1:mov r6,#255
d2:djnz r6,d2
djnz r7,d1
ret
table3: db"CHINA-SZ"
table2: db"LOVE8051"
end