1602a.asm

MCS－51 单片机运行1602LCD的实例

 	;
;********************************************************************************
;1602液晶显示一个A *
;********************************************************************************
;p00-p07  D0-D7
;********************************************************************************
RS EQU P2.0
RW EQU P2.1
E EQU P2.2
DB8 EQU P0

ORG 0000H

MOV DB8,#01H ;清屏
CALL ENABLE
MOV DB8,#0FH	;显示器ON p117.
ACALL ENABLE
MOV DB8,#01H ;清屏
CALL ENABLE

MOV DB8,#088H 
CALL ENABLE

MOV DB8,#041H ;ASCII码  A

SETB RS
CLR RW
CLR E
ACALL DELAY2
SETB E
AJMP $


DELAY2: 
		MOV DB8,#0FFH	; 读取P口上的数据
		CLR RS
		SETB RW
		CLR E
		NOP
		SETB E
		JB DB8.7,DELAY2 ;判断忙标志
		RET
DELAY: 
		MOV DB8,#0FFH
		CLR RS
		SETB RW
		CLR E
		NOP
		SETB E
		JB DB8.7,DELAY ;判断忙标志
		RET
ENABLE: 
		CLR RS ;送命令
		CLR RW
		CLR E
		ACALL DELAY2
		SETB E
		RET
END