|
RS EQU P2.0
RW
EQU P2.1
E
EQU P2.2
ORG
0000H
MOV
P0,#00000001B ;清屏
ACALL
ENABLE
MOV
P0,#00000001B ;清屏
ACALL
ENABLE
MOV
P0,#00111000B ;显示功能
ACALL
ENABLE
MOV
P0,#00001111B ;显示开关控制
ACALL ENABLE
MOV
P0,#00000110B ;输入模式
ACALL
ENABLE
MOV
P0,#0C0H
;数据存贮器地址
ACALL
ENABLE
mov
p0,#01000001b ;ASCII码
SETB RS
CLR
RW
CLR
E
|
ACALL
DELAY
SETB
E
AJMP
$
ENABLE: CLR RS
;送命令
CLR
RW
CLR
E
ACALL
DELAY
SETB
E
RET
DELAY: MOV P0,#0FFH
CLR
RS
SETB
RW
CLR
E
NOP
SETB
E
JB
P0.7,DELAY ;判断忙标志
RET
END
|