;****************************************************************
;*      ★★★          1602液晶模塊測(cè)試程序           ★★★   *
;* 『電子驛站單片機(jī)實(shí)驗(yàn)板、開發(fā)板配套例程，程序轉(zhuǎn)載請(qǐng)著明出處』 *
;*  E-mail: support@ourmpu.com     QQ留言：451338254 476485321  *
;*  編程：ourmpu  http://www.ourmpu.com/ 更多例程請(qǐng)登陸網(wǎng)站     *
;****************************************************************
;*    在1602液晶模塊第一行第1個(gè)字符位置顯示字母“A”程序          *
;****************************************************************

	RS 	EQU 	P2.0 
	RW 	EQU 	P2.1 
	E  	EQU 	P2.2
	LCD 	EQU 	P0
	
	ORG 	0000H
	AJMP	START
	
	ORG	0033H
START:	MOV	SP,#60H
	
MAIN:	
	LCALL	DELAY		;判斷液晶忙狀態(tài)？
	ACALL 	ENABLE
	MOV 	LCD,#00000001B	;寫指令01H,清屏
	ACALL 	ENABLE
	MOV 	LCD,#00111000B	;寫指令38H,設(shè)定LCD為16*2顯示，5*7點(diǎn)陣，8位數(shù)據(jù)接口
	ACALL	ENABLE
	MOV	LCD,#00001111B	;寫指令0FH,顯示ON,光標(biāo)ON,閃爍ON
	ACALL	ENABLE
	MOV	LCD,#00000110B	;寫指令06H,文字不動(dòng)，光標(biāo)自動(dòng)右移
	ACALL	ENABLE
	MOV	LCD,#80H	;第一行第1個(gè)字符地址
	ACALL	ENABLE
	MOV	LCD,#01000001B	;字母A的代碼(#41H)
	SETB 	RS		;RS=1
	CLR	RW		;RW=0
	CLR	E		;E=0
	ACALL	DELAY		;判斷液晶忙狀態(tài)？
	SETB	E 		;E=1
	AJMP	$
	;-----------------
ENABLE: CLR	RS		;寫入控制命令的子程序
	CLR	RW
	CLR	E 
	ACALL	DELAY
	SETB	E
	RET
	;-----------------
DELAY: 	MOV	LCD,#0FFH	;判斷液晶顯示器是否忙的子程序
	CLR	RS
	SETB	RW
	CLR	E
	NOP
	SETB	E
;	JB	P0.7,DELAY	;如果為高電平表示忙就循環(huán)等待
	
	LCALL	YS10MS
	LCALL	YS10MS
	
	RET

;********** 10ms延時(shí)程序 ***********
YS10MS:	MOV	R7,#128
DL1:	MOV	R6,#0FFH
DL0:	DJNZ	R6,DL0
	DJNZ	R7,DL1
	RET	
	
	END