V
vamanan
Guest
Aš sąsajos LCD modulis su 8051.When Aš vykdančioji programa, duomenų Esu siuntimas yra tik matoma LCD
Modulis ir tuoj viskas virsta pilnas black.When Aš pereiti prie duomenų teisę Matoma tik vėl
LCD metu ir tada everythings eiti į blank.Can kas nors man padėti išgydyti mano galvos skausmas.
Mano programa
; Vystomi
$ MOD51
DATALCD kongresas P2, duomenų uoste 2
LT kongresas P3.4;
RW kongresas P3.5; LT, R / W, RS SIGNALAI
RS kongresas P3.6;
CHRNUM kongresas 10H skaičius; simbolių eilutė (16 ženklų ty. 10H)
ORG 0000H
KVIETIMAS INIT; INITIALISE LCD MODULE
KVIETIMAS aiškus; CLEAR LCD MODULE
MOV DPTR, # Wiersz1;
MOV R1, # CHRNUM;
MOV A, # 00h; KASDIENĖ TO DISPLAY
MOV R2, # 00h; pirmoje eilutėje
WRTL1: MOVC, @ DPTR; iš lentelės paieškos
KVIETIMAS PUTTXT;
INC R2;
MOV A, R2;
DJNZ R1 WRTL1;
KVIETIMAS NEWLN
MOV DPTR, # line2;
MOV R1, # CHRNUM;
MOV A, # 00h; KASDIENĖ TO DISPLAY
MOV R2, # 00h; antroji eilutė
WRTL2: MOVC, @ DPTR; iš lentelės paieškos
KVIETIMAS PUTTXT;
INC R2;
MOV A, R2;
DJNZ R1 WRTL2;
SJMP $INIT: SETB LT
CLR RS
CLR RW
MOV DATALCD, # 38h
CLR LT
Laukti skambučio
SETB LT
CLR RS
CLR RW
MOV DATALCD, # 0EH
CLR LT
Laukti skambučio
SETB LT
CLR RS
CLR RW
MOV DATALCD, # 06H
CLR LT
Laukti skambučio
RET
Atviras: SETB LT
CLR RS
CLR RW
MOV DATALCD, # 01H
CLR LT
Laukti skambučio
RET
NEWLN: SETB LT
CLR RS
CLR RW
MOV DATALCD, # 0C0H
CLR LT
Laukti skambučio
RET
PUTTXT: SETB LT
SETB RS
CLR RW
MOV DATALCD,
CLR LT
Laukti skambučio
RET
PALAUKITE: SETB LT
CLR RS
SETB RW
MOV DATALCD, # 0FFH; PORT2 režimo įvedimo
MOV, DATALCD
JB ACC.7 palaukti
CLR LT
CLR RW
RET
;;;;;;;;;; "FFFFFFFFFFFFFFFF"
Linija 1: DB "xxxxxxxx"
Line2: DB "xxxxxxxx"
PABAIGA
Modulis ir tuoj viskas virsta pilnas black.When Aš pereiti prie duomenų teisę Matoma tik vėl
LCD metu ir tada everythings eiti į blank.Can kas nors man padėti išgydyti mano galvos skausmas.
Mano programa
; Vystomi
$ MOD51
DATALCD kongresas P2, duomenų uoste 2
LT kongresas P3.4;
RW kongresas P3.5; LT, R / W, RS SIGNALAI
RS kongresas P3.6;
CHRNUM kongresas 10H skaičius; simbolių eilutė (16 ženklų ty. 10H)
ORG 0000H
KVIETIMAS INIT; INITIALISE LCD MODULE
KVIETIMAS aiškus; CLEAR LCD MODULE
MOV DPTR, # Wiersz1;
MOV R1, # CHRNUM;
MOV A, # 00h; KASDIENĖ TO DISPLAY
MOV R2, # 00h; pirmoje eilutėje
WRTL1: MOVC, @ DPTR; iš lentelės paieškos
KVIETIMAS PUTTXT;
INC R2;
MOV A, R2;
DJNZ R1 WRTL1;
KVIETIMAS NEWLN
MOV DPTR, # line2;
MOV R1, # CHRNUM;
MOV A, # 00h; KASDIENĖ TO DISPLAY
MOV R2, # 00h; antroji eilutė
WRTL2: MOVC, @ DPTR; iš lentelės paieškos
KVIETIMAS PUTTXT;
INC R2;
MOV A, R2;
DJNZ R1 WRTL2;
SJMP $INIT: SETB LT
CLR RS
CLR RW
MOV DATALCD, # 38h
CLR LT
Laukti skambučio
SETB LT
CLR RS
CLR RW
MOV DATALCD, # 0EH
CLR LT
Laukti skambučio
SETB LT
CLR RS
CLR RW
MOV DATALCD, # 06H
CLR LT
Laukti skambučio
RET
Atviras: SETB LT
CLR RS
CLR RW
MOV DATALCD, # 01H
CLR LT
Laukti skambučio
RET
NEWLN: SETB LT
CLR RS
CLR RW
MOV DATALCD, # 0C0H
CLR LT
Laukti skambučio
RET
PUTTXT: SETB LT
SETB RS
CLR RW
MOV DATALCD,
CLR LT
Laukti skambučio
RET
PALAUKITE: SETB LT
CLR RS
SETB RW
MOV DATALCD, # 0FFH; PORT2 režimo įvedimo
MOV, DATALCD
JB ACC.7 palaukti
CLR LT
CLR RW
RET
;;;;;;;;;; "FFFFFFFFFFFFFFFF"
Linija 1: DB "xxxxxxxx"
Line2: DB "xxxxxxxx"
PABAIGA