quet led

[tientdhk9]

các anh giúp em cái phần này với: viết ct đếm từ 00 đến 99 dùng phương pháp quét led...em viết tn nhưng hai led bị nhấp nháy chả biết sửa t nữa..mong mọi người chỉ giáo giúp e với..thắc mắc quá à:
$Include(reg51.inc)
org 0000h
main:
mov r4,#0

loop:
mov a,r4
mov b,#10
div ab
mov r0,b
mov r1,a
mov dptr,#bangled
mov a,r0
movc a,@a+dptr
mov p0,a
setb p3.7
clr p3.6
call delay
mov a,r1
mov dptr,#bangled
movc a,@a+dptr
mov p0,a
clr p3.7
setb p3.6
call delay
inc r4
cjne r4,#100,loop
sjmp main
delay: mov r5,#5
mov tmod,#01h
x2: mov th0,#3ch
mov tl0,#0b0h
setb tr0
jnb tf0,$
clr tf0
clr tr0
djnz r5,x2
ret

bangled:
db 0C0H, 0F9H, 0A4H, 0B0H, 99H, 92H, 82H, 0F8H, 80H, 90H
end

[kdt_khanh]

Chắc là cũng gặp vấn đề như t!
http://www.dientuvietnam.net/forums/...huc-te-178100/

[caonhan_2004]

không phải đâu bạn. chắc chắn chỗ nào chưa được thui. mình quét rùi , . nhưng bằng C, không hề nháy nhé.! còn ASM thì mình khổng rành.

[No_Limit]

Trời dùng code ASM. Code này ít người thông thạo để hỗ trợ lắm. Bạn chuyển sang dùng code C đi.

[hoangnam555]

nháy thì giảm delay xuống.

[ve0sau91]

them lenh xoa led vao ban oi

[hoangnam555]

them lenh xoa led vao ban oi

có rồi đó chứ.

[01642555134]

các anh giúp em cái phần này với: viết ct đếm từ 00 đến 99 dùng phương pháp quét led...em viết tn nhưng hai led bị nhấp nháy chả biết sửa t nữa..mong mọi người chỉ giáo giúp e với..thắc mắc quá à:
$Include(reg51.inc)
org 0000h
main:
mov r4,#0

loop:
mov a,r4
mov b,#10
div ab
mov r0,b
mov r1,a
mov dptr,#bangled
mov a,r0
movc a,@a+dptr
mov p0,a
setb p3.7
clr p3.6
call delay
mov a,r1
mov dptr,#bangled
movc a,@a+dptr
mov p0,a
clr p3.7
setb p3.6
call delay
inc r4
cjne r4,#100,loop
sjmp main
delay: mov r5,#5
mov tmod,#01h
x2: mov th0,#3ch
mov tl0,#0b0h
setb tr0
jnb tf0,$
clr tf0
clr tr0
djnz r5,x2
ret

bangled:
db 0C0H, 0F9H, 0A4H, 0B0H, 99H, 92H, 82H, 0F8H, 80H, 90H
end

bạn đừng lấy 2 con led 7 đoạn rời, bạn lấy 2 con led 7 đoạn dính chung nhau ra 10 chân. là sẽ hết chớp

[hoangnam555]

bạn đừng lấy 2 con led 7 đoạn rời, bạn lấy 2 con led 7 đoạn dính chung nhau ra 10 chân. là sẽ hết chớp

do delay thôi bác ơi,hoặc là dùng tran để mở dòng (thay bằng cổng NOT) chứ e dùng rời hay chung cũng vậy thôi,đã là quét thì sẽ có nháy (nháy nhiều hay ít mà mắt người thấy hay ko thấy thôi).

[JACSION]

các anh giúp em cái phần này với: viết ct đếm từ 00 đến 99 dùng phương pháp quét led...em viết tn nhưng hai led bị nhấp nháy chả biết sửa t nữa..mong mọi người chỉ giáo giúp e với..thắc mắc quá à:
$Include(reg51.inc)
org 0000h
main:
mov r4,#0

loop:
mov a,r4
mov b,#10
div ab
mov r0,b
mov r1,a
mov dptr,#bangled
mov a,r0
movc a,@a+dptr
mov p0,a
setb p3.7
clr p3.6
call delay
mov a,r1
mov dptr,#bangled
movc a,@a+dptr
mov p0,a
clr p3.7
setb p3.6
call delay
inc r4
cjne r4,#100,loop
sjmp main
delay: mov r5,#5
mov tmod,#01h
x2: mov th0,#3ch
mov tl0,#0b0h
setb tr0
jnb tf0,$
clr tf0
clr tr0
djnz r5,x2
ret

bangled:
db 0C0H, 0F9H, 0A4H, 0B0H, 99H, 92H, 82H, 0F8H, 80H, 90H
end

org 0000h
chuc equ 30h
dvi equ 31h
ma7chuc equ 32h
ma7dvi equ 33h
main:
mov r5,#0
ttiep:
call hienthi
INC r5
cjne r5,#99,ttiep
sjmp main
hienthi:
mov a,r5
mov b,#10
div ab
mov chuc,a
mov dvi,b
mov dptr,#ma7doan
mov a,chuc
movc a,@a+dptr
mov ma7chuc,a
mov a,dvi
movc a,@a+dptr
mov ma7dvi,a
mov r3,#15
qtiep:
mov p0,ma7chuc
clr p2.0
call delay
setb p2.0
mov p0,ma7dvi
clr p2.1
call delay
setb p2.1
djnz r3,qtiep
ret
delay:
mov tmod,#1
veday:
mov th0,#high(-8000)
mov tl0,#low(-8000)
setb tr0
jnb tf0,$
clr tf0
clr tr0
ret
ma7doan: db 0c0h,0f9h,0a4h,0b0h,99h,92h,82h,0f8h,80h,90h
end