cùng nhau thi tốt môn vi xử lí nào các bác. ai có bài nào hay về lập trình bằng ngôn ngữ asembly thì post lên cho anh em cùng tham khảo. ở trường em chỉ học lập trình bằng asembly thôi, lên đừng bác nào cho C vào đây nhé.chúc các bác thi tốt môn này
phục vụ thi cử 8051
Collapse
X
-
em có bài tập như này:viết chương trình điều khiển 8 đèn LED sáng từ trái qua phải , sau đó tắt rồi lặp lại.
chương trình như sau:
ORG 0000H
LAP:
MOV P2,#00000000H ;TẮT 8 ĐÈN
ACALL DELAY ;TẠO TRỄ
MOV P2,#00000001H ;SÁNG ĐÈN 1
ACALL DELAY
MOV P2,#00000011H ;SÁNG ĐÈN 2
ACALL DELAY
MOV P2,#00000111H ;SÁNG ĐÈN 3
ACALL DELAY
MOV P2,#000001111H ;SÁNG ĐÈN 4
ACALL DELAY
MOV P2,#00011111H ;SÁNG ĐÈN 5
ACALL DELAY
MOV P2,#00111111H ;SÁNG ĐÈN 6
ACALL DELAY
MOV P2,#01111111H ;SÁNG ĐÈN 7
ACALL DELAY
MOV P2,#11111111H ;SÁNG ĐÈN 8
ACALL DELAY
SJMP LAP
DELAY: MOV R1,#250
DL1: NOP
NOP
DJNZ R1, DL1
RET
end
-
Mình có chương trình này đóng góp với các bạn nha:
ORG 000H
Begin:
Mov P0,#0h ;8 led P0 tat tuc la muc 0
Lap:
LCall Delay ;Goi chuong trinh con Delay
SetB C ;Set co C len muc 1
Mov A,P0
RRC A ;quay phai thanh ghi A
Mov P0,A ;===>>>> xuat ra led
JNC Lap ;Nhay ve nhan "Lap" neu co C=0
SETB C
RLC A
Sjmp Begin ;Thuc hien lai tu dau
Delay:
Mov R7,#0FFH
test2: Mov R6,#0FFH
test1: Djnz R6,test1
Djnz R7,test2
Ret
End
vào proteus lấy 8 con led nối vào P0 rồi chạy thử nha!
Comment
Bài viết mới nhất
Collapse
There are no results that meet this criteria.

Comment