Anh em ơi ! giúp mình với , hiện giờ mình đang định viết code để làm cái đồng hồ trên con 8051 , mà ta có thể ngắt bất cứ lúc nào , ứng dụng để làm đồng hồ cho trận đấu bóng đá . Anh em nào có giải thuật nào ngắn , và có thể hướng dẫn sơ sơ cho mình không , vì mình gà trong vụ này lắm , đừng viết code dùm mình nha
Thông báo
Collapse
No announcement yet.
Code đồng hồ
Collapse
X
-
Nguyên văn bởi anhhung001 Xem bài viếtAnh em ơi ! giúp mình với , hiện giờ mình đang định viết code để làm cái đồng hồ trên con 8051 , mà ta có thể ngắt bất cứ lúc nào , ứng dụng để làm đồng hồ cho trận đấu bóng đá . Anh em nào có giải thuật nào ngắn , và có thể hướng dẫn sơ sơ cho mình không , vì mình gà trong vụ này lắm , đừng viết code dùm mình nha
Comment
-
Nguyên văn bởi anhhung001 Xem bài viếtMục đích là mình sẽ làm một cái đồng hồ mà muốn dừng là dừng , khi tác động ngắt ngoài , mà mình không thể vẽ mạch được , anh em giúp mình với ?
Comment
-
org 0000h
mov tmod,#11h
EN bit p3.4
RS bit p3.5
sda equ p1.1
scl equ p1.0
call start
mov a,#0d0h
call sent
mov a,#00h
call sent
mov a,#00h
call sent
loop1:acall start
mov a,#0d0h
call sent
mov a,#00h
call sent
call start
mov a,#0d1h
call sent
call receive
call stop
call hienthi_lcd
call delay
sjmp loop1
delay:
mov r0,#20
loop:mov tl1,#low(-25000)
mov th1,#high(-25000)
setb tr1
jnb tf1,$
clr tf1
clr tr1
djnz r0,loop
ret
start:
setb scl
setb sda
nop
nop
nop
nop
nop
clr sda
nop
nop
nop
nop
nop
ret
stop:
clr sda
nop
nop
nop
nop
nop
setb scl
nop
nop
nop
nop
nop
setb sda
nop
nop
nop
nop
nop
ret
sent:
push 07h
push acc
mov r7,#8
loop2:clr scl
nop
nop
nop
nop
nop
rlc a
mov sda,c
nop
nop
nop
setb scl
nop
nop
nop
nop
nop
djnz r7,loop2
clr scl
nop
nop
nop
nop
nop
setb scl
nop
nop
nop
nop
nop
;jb sda,$
clr scl
nop
nop
nop
nop
nop
pop acc
pop 07h
ret
receive:
push 07h
push acc
mov r7,#8
loop3:clr scl
nop
nop
nop
nop
nop
nop
setb scl
nop
nop
nop
nop
nop
nop
mov c,sda
rlc a
clr scl
nop
nop
nop
nop
nop
nop
djnz r7,loop3
clr scl
nop
nop
nop
nop
nop
nop
clr sda
setb scl
nop
nop
nop
nop
nop
nop
;jnb sda,$
clr scl
nop
nop
nop
nop
nop
nop
mov 40h,a
pop acc
pop 07h
ret
hienthi_lcd:
call init_lcd
call clear_lcd
mov a,40h
anl a,#0f0h
swap a
clr c
add a,#30h
mov 41h,a
mov a,40h
anl a,#0fh
clr c
add a,#30h
mov 42h,a
;call init_lcd
;call clear_lcd
mov p0,41h
call write_data
mov p0,42h
call write_data
;call clear_lcd
ret
init_lcd:
mov p0,#38h
call write_fc
mov p0,#0ch
call write_fc
mov p0,#06h
call write_fc
ret
write_fc:
clr RS
setb EN
mov p2,#80h
clr p3.6
setb p3.6
clr EN
call wait_lcd
ret
write_data:
setb EN
setb RS
mov p2,#80h
clr p3.6
setb p3.6
clr EN
call wait_lcd
ret
wait_lcd:
mov tl0,#low(-3000)
mov th0,#high(-3000)
setb tr0
jnb tf0,$
clr tf0
clr tr0
ret
clear_lcd:
setb EN
clr RS
mov p0,#01h
mov p2,#80h
clr p3.6
setb p3.6
clr EN
call wait_lcd
ret
end
*************************************
may dai ca oi!em viet code nhu the nay thay no dem cung "hoi dung" vi no lau lau lai lap lai so hien thi tren lcd vi du 14-14-15-16-16-17....dai khai nhu vay.lcd thi nhap nhay chu ko dung yen,may dai ca help e voi.
Comment
Bài viết mới nhất
Collapse
-
bởi tungdqEm cần tìm sơ đồ mạch một số Main máy tính đời cao như Asrock B560M-HDV, các cao nhân chỉ giúp với. Thank!
-
Channel: Các mạch điện ứng dụng
hôm nay, 08:27 -
-
Trả lời cho Kiểm tra biến ápbởi lamvu0677nhân tiện cho mình hỏi thêm về cái phần test hipot (cao áp),là để kiểm tra độ bền cách điện giưa các cuộn dây,mà thấy thông số test thường ở mức 4kvac,vậy nếu mấy con fail đó xài bình thường vẫn dduocj phải không ạ,vì điện mình làm gì lên tới mức đó
-
Channel: Điện tử dành cho người mới bắt đầu
10-11-2024, 08:52 -
-
Trả lời cho Kiểm tra biến ápbởi lamvu0677máy đo số vòng thì cty có ,mà nó to quá,tưởng có máy nào gọn gọn bỏ túi được thì tiện hơn,vì đi lại nhiều...
-
Channel: Điện tử dành cho người mới bắt đầu
10-11-2024, 08:47 -
-
bởi tmcodonMình thấy diễn đàn có chuyên mục quảng cáo rồi mà. Bạn đóng góp để mở luồng riêng
-
Channel: Hướng dẫn sử dụng diễn đàn
09-11-2024, 13:36 -
-
bởi Nicole08Xin chào mọi người, tôi đã sử dụng Flashforge Inventor 2 được gần 5 năm và rất hài lòng với nó, nhưng tuần trước đã xảy ra sự cố. Có vẻ như động cơ bước đưa sợi in vào đầu nóng đã bị hỏng. Mọi thứ khác có vẻ ổn trên máy...
-
Channel: Điện tử dành cho người mới bắt đầu
09-11-2024, 12:55 -
Comment