rs equ p3.0 ;h=data,l=com
rw equ p3.1 ;h=read,l=write
e equ p3.2 ;
com equ 30h ;控制字暂存单元
dat equ 31h ;显示数据暂存单元
coder equ 32h ;字符代码暂存单元
addr equ 33h ;地址暂存单元
org 0000h
ajmp main
org 0030h
main:
mov sp,#60h
mov p3,#0f8h
lcall del_20ms
lcall del_20ms
lcall ini ;进入初始化子程序
mov addr,#80h
mov dptr,#wel_1
lcall w_line
mov addr,#90h
mov dptr,#wel_2
lcall w_line
mov addr,#88h
mov dptr,#wel_3
lcall w_line
mov addr,#98h
mov dptr,#wel_4
lcall w_line
lcall del_1500ms
mov addr,#80h
mov dptr,#wel_5
lcall w_line
mov addr,#90h
mov dptr,#wel_6
lcall w_line
mov addr,#88h
mov dptr,#wel_7
lcall w_line
mov addr,#98h
mov dptr,#wel_8
lcall w_line
lcall del_1500ms
mov addr,#80h ;
mov dptr,#hz_1 ;
lcall w_line
mov addr,#90h ;
mov dptr,#hz_2 ;
lcall w_line
mov addr,#88h ;
mov dptr,#hz_3 ;
lcall w_line
mov addr,#98h ;
mov dptr,#hz_4 ;
lcall w_line
lcall del_1500ms ;延时后显示下一页
mov addr,#80h ;
mov dptr,#hz_5 ;
lcall w_line
mov addr,#90h ;
mov dptr,#hz_6 ;
lcall w_line
mov addr,#88h ;
mov dptr,#hz_7 ;
lcall w_line
mov addr,#98h ;
mov dptr,#hz_8 ;
lcall w_line
lcall del_1500ms
ljmp main
ini:
mov com,#30h ;功能设定,基本指令
lcall wcom
mov com,#30h ;基本指令,8-bit 模式,基本指令
lcall wcom
mov com,#0ch ;显示开,游标关,反白关
lcall wcom
mov com,#01h ;清除显示
lcall wcom
mov com,#06h ;进入设定点,游标7 右移,画面不移动
lcall wcom
ret
w_line: ;写入一行8 汉字子程序
mov com,addr ;
lcall wcom ;
mov r2,#16 ;16 个循环,连续写入8 个汉字或是16 个西文字符
w_l1:
mov a,#00h
movc a,@a+dptr
mov coder,a
lcall wcode
inc dptr
djnz r2,w_l1
ret
wcom: ;写指令子程序
clr rs
setb rw
wc1:
mov p1,#0ffh
setb e
mov a,p1
clr e
jb acc.7,wc1 ;查忙
clr rw
mov p1,com
setb e
clr e
ret
wcode: ;写代码子程序
clr rs
setb rw
wco1:
mov p1,#0ffh
setb e
mov a,p1
clr e
jb acc.7,wco1
setb rs
clr rw
mov p1,coder
setb e
clr e
ret
del_20ms:
mov r0,#20
d2:
mov r1,#200
d1:
nop
nop
nop
djnz r1,d1
djnz r0,d2
ret
del_100ms:
lcall del_20ms
lcall del_20ms
lcall del_20ms
lcall del_20ms
lcall del_20ms
ret
del_500ms:
lcall del_100ms
lcall del_100ms
lcall del_100ms
lcall del_100ms
lcall del_100ms
ret
del_1500ms:
lcall del_500ms
lcall del_500ms
lcall del_500ms
ret
wel_1:
db "欢迎"
wel_2:
db "www.yulemao.com"
wel_3:
db "86-0755-00000000"
wel_4:
db "128x64 全点阵显示"
wel_5:
db "图形以及字符显示"
wel_6:
db "可显示8x4 个中文"
wel_7:
db "内带标准中文字库"
wel_8:
db "含8192 个中文字型"
hz_1:
db "昨夜星辰昨夜风,"
hz_2:
db "画楼西畔桂堂东。"
hz_3:
db "身无彩凤双飞翼,"
hz_4:
db "心有灵犀一点通。"
hz_5:
db "隔座送钩春酒暖,"
hz_6:
db "分曹射覆蜡灯红。"
hz_7:
db "嗟余听鼓应官去,"
hz_8:
db "走马兰台类转蓬。"
end