các bác ơi em tăng delay lên gấp đôi rồi nhưng hok chạy
các bác xem lại code giúp em
các bác xem lại code giúp em
;***************************************************
;CHUONG TRINH DIEU KHIEN LCD HIEN THI DONG CHU 1 DICH CHUYEN, DONG CHU 2 DUNG YEN
;***************************************************
;RS -> P0.0, RW -> P0.1, E -> P0.2
;DATA BUS -> PORT 1
;***************************************************
EN BIT P0.2
RW BIT P0.1
RS BIT P0.0
DATABUS EQU P1
;***************************************************
ORG 0000H
call ktao_lcd
tudau:
call hthi_dong1
call delay1s
call hthi_dong2
call delay1s
jmp tudau
ktra_co:
setb databus.7
clr rs
setb rw
cho:
clr en
nop
nop
setb en
nop
nop
jb databus.7,cho
ret
ktao_lcd:
mov a,#38h
call ghi_lenh
mov a,#0eh
call ghi_lenh
mov a,#01h
call ghi_lenh
mov a,#06h
call ghi_lenh
ret
ghi_lenh:
call ktra_co
mov databus,a
clr rs
clr rw
setb en
nop
nop
nop
nop
clr en
ret
ghi_dulieu:
call ktra_co
mov databus,a
setb rs
clr rw
setb en
nop
nop
nop
nop
clr en
ret
delay100ms:
mov 51h,#200
doi:
mov 52h,#250
djnz 52h,$
djnz 51h,doi
ret
delay1s:
mov r7,#5
nhay:
call delay100ms
djnz r7,nhay
ret
hthi_dong1:
mov a,#80h
call ghi_lenh
mov dptr,#dong1
call hienthi
ret
hthi_dong2:
mov a,#0c0h
call ghi_lenh
mov dptr,#dong2
call hienthi
ret
hienthi:
mov a,#0
movc a,@a+dptr
cjne a,#99h,h
ret
h:
mov databus,a
call ghi_dulieu
inc dptr
jmp hienthi
dong1:
db 'lop hoc vdk '
db 99h
dong2:
db ' truong dh cntp '
db 99h
end
Comment