[求助]请教lcd高手
用89c51接字符型lcd,间接连接方法,8位连接,用如下程序可点不亮,想请高手老师指点!!!!!!!急!
RS EQU P3.3
RW EQU P3.4
E EQU P3.5
ORG 00H
JMP ST
ST: MOV SP,#50H
ACALL INT
ACALL LOOP
PR0: PUSH ACC
SETB P1.7
P11: CLR RS
SETB RW
SETB E
NOP
MOV A,P1
CLR E
JB ACC.7,P11
POP ACC
RET
PR1: ACALL PR0
MOV P1,A
CLR RS
CLR RW
SETB E
NOP
CLR E
RET
PR2: ACALL PR0
MOV P1,A
SETB RS
CLR RW
NOP
CLR E
RET
PR3: MOV P1,#0FFH
ACALL PR0
SETB RS
SETB RW
SETB E
NOP
MOV A,P1
CLR E
RET
INT:PUSH ACC
MOV A,#38H
ACALL PR1
MOV A,#38H
ACALL PR1
MOV A,#38H
ACALL PR1
MOV A,#38H
ACALL PR1
MOV A,#0FH
ACALL PR1
MOV A,#01H
ACALL PR1
MOV A,#06H
ACALL PR1
POP ACC
RET
DELAY: MOV R6,#50
MOV R7,#50
DELAY1:DJNZ R7,DELAY1
DJNZ R6,DELAY1
RET
LOOP:MOV A,#06H
ACALL PR1
MOV A,#80H
ACALL PR1
MOV DPTR,#TAB
MOV R2,#13H
MOV R3,#00H
LOOP1:MOV A,R3
MOVC A,@A+DPTR
MOV 21H,A
ACALL PR2
INC R3
ACALL DELAY
DJNZ R2,LOOP1
AJMP $
TAB:DB 43H,75H,72H,73H,6FH,72H,20H
DB 52H,69H,67H,68H,74H,20H
DB 53H,63H,72H,6FH,6CH,6CH
END
发表时间:2003年11月12日18:35:49