mình đang học về 8051 và thử viết đoạn chương trình đồng hồ số nhưng không hiểu sao lúc chạy thử thì nó chỉ hiện lên toàn số 00.00.00
Thông báo
Collapse
No announcement yet.
gúp mình với
Collapse
X
-
Nguyên văn bởi qkhanh Xem bài viếtmình đang học về 8051 và thử viết đoạn chương trình đồng hồ số nhưng không hiểu sao lúc chạy thử thì nó chỉ hiện lên toàn số 00.00.00
org 00h
ljmp main
org 03h
ljmp ngat_ngoai0
org 1bh
ljmp ngat_t1
org 30h
mov p1,#0ffh
mov p2,#00h
mov p3,#0ffh
mov p0,#0ffh
gio equ 31h
phut equ 32h
giay equ 33h
ptgiay equ 34h
mov sp,60h
main:
mov tmod,#01h
clr tf1
mov ie,#89h
mov th1,#-1000
mov tl1,#-100
setb tr1
xoa_gio:
mov gio,#0
xoa_phut:
mov phut,#0
xoa_giay:
mov giay,#0
xoa_ptgiay:
mov ptgiay,#00h
lap:
lcall hien_thi
mov a,ptgiay
cjne a,#64h,lap
mov a,giay
inc a
da a
mov giay,a
cjne a,#60,xoa_ptgiay
mov a,phut
inc a
da a
mov phut,a
cjne a,#60,xoa_giay
mov a,gio
inc a
da a
mov gio,a
cjne a,#24,xoa_phut
ljmp xoa_gio
hien_thi:
mov a,giay
mov b,#10
div ab
mov 44h,a
mov 45h,b
mov a,phut
mov b,#10
div ab
mov 42h,a
mov 43h,b
mov a,gio
mov b,#10
div ab
mov 40h,a
mov 41h,b
mov r1,#01h
mov r0,#40h
lap_quet:
mov a,@r0
mov dptr,#ma7doan
movc a,@a+dptr
mov p1,a
mov a,r1
mov dptr,#ma_quet
movc a,@a+dptr
mov p2,a
acall delay
inc r1
inc r0
mov a,r0
cjne a,#39h,lap_quet
ret
ngat_t1:
clr tr1
inc ptgiay
mov th1,#-1000
mov tl1,#-100
setb tr1
reti
ngat_ngoai0:
lcall hien_thi
chinh_giay:
jb p3.4,chinh_phut
acall tre_nut_an
jb p3.3,$
acall tre_nut_an
mov giay,#00h
mov giay,#00h
sjmp chinh_giay
chinh_phut:
jb p3.4,chinh_gio
jb p3.3,$
mov a,phut
inc a
mov phut,a
sjmp chinh_phut
chinh_gio:
jb p3.4,thoat
jb p3.3,$
mov a,gio
inc a
mov gio,a
sjmp chinh_gio
thoat:
reti
delay:
mov r7,#10
del:mov r6,#10
djnz r6,$
djnz r7,del
ret
tre_nut_an:mov r4,#10
t1:mov r5,#200
t2:djnz r5,t2
djnz r4,t1
ret
ma7doan:
db 018h,0deh,034h,094h,0d2h,091h,011h,0dch,010h,090h
ma_quet:db 80h,40h,20h,10h,08h,4h,2h,1h
end
Bài viết mới nhất
Collapse
-
bởi nguyendinhvanSau bao năm nghiên cứu cái dtvn. Tôi phát hiện công thức này. Các anh em xem đúng bao nhiêu phần trăm nhé !
Chập thì thay. Cháy thì tháo
Làm thì láo. Báo thì hay
May thì khoe. Rủi thì bỏ
Thành tích nhỏ. Báo thành to
Làm cho có. Báo chi li
Sai cả li. Báo...-
Channel: Tâm tình dân kỹ thuật
hôm nay, 00:35 -
-
Trả lời cho Xin hỏi về màn hình laptopbởi yname11có chắc ko b, màn lcd phải có cao áp mới sáng, màn led thì ko có, ko có cáp chuyển đổi thì lắp thế nào đc ??...
-
Channel: Thiết bị điện tử cá nhân
Hôm qua, 22:31 -
-
Trả lời cho Xin hỏi về màn hình laptopbởi mèomướpDạ ý chú là màn oled ấy ạ. Cùng chuẩn lvds cùng độ phân giải thì cắm được ạ. Còn nó mà khác thì hơi khó vì oled các điểm ảnh nó tự phát sáng chứ ko dùng đèn nền như lcd. Cháu chỉ biết đến vậy thôi ạ. Chú muốn nghịch phải tự tìm hiểu kỹ trước khi mua thôi, khó mà ông thợ nào tư vấn vụ này...
-
Channel: Thiết bị điện tử cá nhân
Hôm qua, 22:14 -
-
Trả lời cho Tự làm máy đo Cuộn cảmbởi bacthoHay đấy bạn ạ. Đây có thể hiểu là máy đo cuộn dây. Tiện đây xin cho hỏi bạn có hiểu rõ về máy nạp rôm pcb 45 của hãng thiên minh không giúp mình cách cài fw của nó với vì mình vừa được anh bạn cho nhưng lại không biết cài fw nên chưa dùng được. Nếu có thể thì bạn giúp mình với...
-
Channel: Điện tử dành cho người mới bắt đầu
Hôm qua, 21:48 -
-
Trả lời cho Xin hỏi về màn hình laptopbởi yname11màn của mình là LCD , giờ m muốn mua màn LED để thay thế (ko muốn dùng màn LCD nữa) , lên muốn hỏi xem có cáp chuyển đổi nào có thể cắm đc màn LED vào ko , tất nhiên phải có cùng số chân pin với màn cũ rồi . VD: màn cũ là lcd mỏng , 40 pin...
-
Channel: Thiết bị điện tử cá nhân
Hôm qua, 21:43 -
-
Trả lời cho các bạn giúp mình về file HEX với!!!bởi bacthoBạn vào trang phuclanshop.com ,tìm đến góc kỹ thuật. Tác giả vương khánh hưng nói rất rõ về điều bạn tìm...
-
Channel: Vi điều khiển họ 8051
Hôm qua, 21:21 -
-
Trả lời cho Xin hỏi về màn hình laptopbởi mèomướpDạ màn hình lcd đều có thể lai cấy cho nhau được hết ạ. Các loại cáp, bo mạch chuyển đổi lvds rất nhìu, với dòng sony còn phải nhổ cả chip nhớ của main cũ đưa lên gỗ thì mới lắp sang máy khác đc, chưa kể các bệnh về màu... ngay cả...
-
Channel: Thiết bị điện tử cá nhân
Hôm qua, 20:43 -
-
Trả lời cho Xin hỏi về màn hình laptopbởi yname11Màn của e là LCD , e muốn thay thế bằng màn led thì có cáp chuyển đổi nào thực hiện đc việc đó ko nhỉ, nếu có bác mách e với....
-
Channel: Thiết bị điện tử cá nhân
Hôm qua, 16:34 -
-
bởi bqvietServo cuối cùng vẫn chỉ là điều chỉnh tốc độ và đọc phản hồi vị trí
Qua cổng song song LPT cổ
https://www.electronicsforu.com/elec...eed-controller
Qua cổng USB - xem thêm đám FT232RL-
Channel: Điện tử công nghiệp
22-11-2024, 15:56 -
Comment