lcd.asm

led by nguyen_tran viet nam

$MOD51
E BIT P3.2
RS BIT P3.1
RW BIT P3.0
ORG 00
MAIN:	LCALL	SETUP
DONG2:	MOV	DPTR,#DIS2
	SETB	E
	CLR	RS
	CLR	RW
	MOV	P1,#0C0H
	CLR	E
	LCALL	WAIT
	LCALL	XUAT_CHU 

DONG1:	MOV	DPTR,#DIS1

DICH:	LCALL	DISPLAY1
	LCALL	DELAY
	LCALL	DELAY
	INC	DPTR
	MOV	A,DPL
	CJNE	A,#LOW(DIS1+36),DICH
	MOV	A,DPH
	CJNE	A,#HIGH(DIS1+36),DICH
	SJMP	DONG1

SETUP:	SETB	E
	CLR	RS
	CLR	RW
	MOV	P1,#38H   
	CLR	E
	LCALL	WAIT

	SETB	E
	CLR	RS
	CLR	RW
	MOV	P1,#0CH   
	CLR	E
	LCALL	WAIT
	SETB	E
	CLR	RS
	CLR	RW
	MOV	P1,#06H
	CLR	E
	LCALL	WAIT
	RET

DISPLAY1:
SETB	E
CLR	RS
CLR	RW
MOV	P1,#80H
CLR	E
LCALL	WAIT

XUAT_CHU:
MOV	R1,#0

LOOP:	MOV	A,R1
	MOVC	A,@A+DPTR
	SETB	E
	SETB	RS
	CLR	RW
	MOV	P1,A
	CLR	E
	LCALL	WAIT
	INC	R1
	CJNE	R1,#20,LOOP 
	RET

WAIT:	MOV	TMOD,#10H
	MOV	TH1,#HIGH(-1000)
	MOV	TL1,#LOW(-1000)
	CLR	TF1
	SETB	TR1
	JNB	TF1,$
	CLR	TR1
	CLR	TF1
	RET

DELAY:	MOV	R0,#10
CONT:	MOV	TMOD,#10H
	MOV	TH1,#HIGH(-10000)
	MOV	TL1,#LOW(-10000)
	CLR	TF1
	SETB	TR1
	JNB	TF1,$
	CLR	TR1
	CLR	TF1
	DJNZ	R0,CONT
	RET
DIS1:
DB 'GIAO TIEP LCD VA VI DIEU KHIEN 8051          '

ORG 100H
DIS2:
DB 'THUC HIEN:NHOM 4   '
 

END