Tweet
MÌNH ĐANG VIẾT CÁI NÀY MÀ HOÀI KHÔNG XONG
điều khiển = 2 nút ấn
ân nút thứ nhất chạy từ 0>>9 và dừng ở 9
ấn nút thứ 2 chạy từ 9>>0 và dừng ở không
pro nào biết thì giúp với nha , mail coffe_alone_vn@yahoo.com
$include(reg51.inc)
ORG 0000H ; Kh?i d?u t? thanh ghi 0000h
tien:
jb p3.4,tien
LCALL DEMTIEN
lui:
jb p3.5,lui
LCALL DEMLUI
DEMTIEN:
K:
MOV DPTR,#0800H
MOV R1,#0AH
K1:
CLR A
MOVC A,@A+DPTR
MOV P0,A
LCALL DELAY
INC DPTR
DJNZ R1,K1
JMP K
RET
DEMLUI:
K4:
MOV DPTR,#0600H
MOV R2,#0A0H
K3:
MOVC A,@A+DPTR
MOV P0,A
LCALL DELAY
INC DPTR
DJNZ R2,K3
JMP K
RET
delay:
mov r5,#200
de: mov r6,#200
djnz r6,$
djnz r5,de
ret
org 0800h
db 0C0H,0F9H,0A4H,0B0H,099H,092H,082H,0F8H,080H,090H
org 0600h
DB 090H,080H,0F8H,082H,092H,099H,0B0H,00A4H,0F9H,0C0H
end
điều khiển = 2 nút ấn
ân nút thứ nhất chạy từ 0>>9 và dừng ở 9
ấn nút thứ 2 chạy từ 9>>0 và dừng ở không
pro nào biết thì giúp với nha , mail coffe_alone_vn@yahoo.com
$include(reg51.inc)
ORG 0000H ; Kh?i d?u t? thanh ghi 0000h
tien:
jb p3.4,tien
LCALL DEMTIEN
lui:
jb p3.5,lui
LCALL DEMLUI
DEMTIEN:
K:
MOV DPTR,#0800H
MOV R1,#0AH
K1:
CLR A
MOVC A,@A+DPTR
MOV P0,A
LCALL DELAY
INC DPTR
DJNZ R1,K1
JMP K
RET
DEMLUI:
K4:
MOV DPTR,#0600H
MOV R2,#0A0H
K3:
MOVC A,@A+DPTR
MOV P0,A
LCALL DELAY
INC DPTR
DJNZ R2,K3
JMP K
RET
delay:
mov r5,#200
de: mov r6,#200
djnz r6,$
djnz r5,de
ret
org 0800h
db 0C0H,0F9H,0A4H,0B0H,099H,092H,082H,0F8H,080H,090H
org 0600h
DB 090H,080H,0F8H,082H,092H,099H,0B0H,00A4H,0F9H,0C0H
end
Comment