Chương trình:
ORG 00H
MOV P1,#0FFH
MAIN:

TEST_1:
MOV P2,#11100011B
JB P3.1,TEST_2
LCALL CT1
JMP MAIN

TEST_2:
MOV P2,#11100111B
JB P3.1,TEST_3
LCALL CT2
JMP MAIN

TEST_3:
MOV P2,#11101011B
JB P3.1,TEST_4
LCALL CT3
JMP MAIN

TEST_4:
MOV P2,#11101111B
JB  P3.1,TEST_5
LCALL CT4
JMP MAIN

TEST_5:
MOV P2,#11110011B
JB  P3.1,TEST_6
LCALL CT5
JMP MAIN

TEST_6:
MOV P2,#11110111B
JB P3.1,TEST_7
LCALL CT6
JMP MAIN

TEST_7:
MOV P2,#11111011B
JB P3.1,TEST_8
LCALL CT7
JMP MAIN

TEST_8:
MOV P2,#11111111B
JB P3.1,MAIN      
LCALL CT8
JMP MAIN


CT1:
MOV P1,#11111110B
CALL DELAY
MOV P1,#0FFH
RET

CT2:
MOV P1,#11111101B
CALL DELAY
MOV P1,#0FFH
RET

CT3:
MOV P1,#11111011B
CALL DELAY
MOV P1,#0FFH
RET

CT4:
MOV P1,#11110111B
CALL DELAY
MOV P1,#0FFH
RET

CT5:
MOV P1,#11101111B
CALL DELAY
MOV P1,#0FFH
RET

CT6:
MOV P1,#11011111B
CALL DELAY
MOV P1,#0FFH
RET

CT7:
MOV P1,#10111111B
CALL DELAY
MOV P1,#0FFH
RET

CT8:
MOV P1,#01111111B
CALL DELAY
MOV P1,#0FFH
RET

DELAY:
MOV R1,#250
STOP1:MOV R2,#250
STOP2:
DJNZ R2,STOP2
DJNZ R1,STOP1
RET
END

Nguồn: Blog Điện Tử | Tin Học - Chia sẻ kiến thức - Kết nối đam mê điện tử

Lập trình phím bấm với 74HC151

Đăng nhận xét

Đăng nhận xét

Author Name



Tôi là Ngọc Anh. Tôi đến từ Nghệ An. Tôi tốt nghiệp một trường đại học tại Sài Gòn. Hiện tôi đang phát triển công ty riêng. Liên lạc với tôi qua:






Biểu mẫu liên hệ

Tên

Email *

Thông báo *

Được tạo bởi Blogger.