Hiển thị led 7 đoạn đơn giản (8951)

ORG 0000H
 
MAIN:
 
MOV R0,#00; khoi tao bien dem
 
LAP:
 
CALL CTHT; goi chuong trinh hien thi
 
INC R0; tang bien dem
 
CJNE R0,#10,LAP; kiem tra đã đếm đến 9
 
JMP MAIN
 
 
 
CTHT:; Chuong trinh hien thi led 7 đoan
 
MOV R7,#1; vong lap quet
 
QUAY:
 
MOV A,R0
 
MOV B,#10
 
DIV AB
 
MOV DPTR,#MALED
 
MOVC A,@A+DPTR
 
MOV P2,A
 
CALL DELAY
 
MOV A,B
 
MOVC A,@A+DPTR
 
MOV P3,A
 
CALL DELAY
 
DJNZ R7,QUAY
 
RET
 
 
 
MALED: DB 0C0H,0F9H,0A4H,0B0H,99H,92H,82H,0F8H,80H,90H
 
 
 
DELAY:
 
MOV R4,#150
 
LOOP:
 
MOV R5,#200
 
LOOP1:
 
DJNZ R5,LOOP1
 
DJNZ R4,LOOP
 
RET
 
END