ORG 00H
MAIN:
CALL CTA; sang dan qua trai
CALL CTB; sang dan qua phai
JMP MAIN
;*****************************************
CTA:
MOV R0,#00H ;Bien dem so trang thai hien thi
MOV DPTR,#MALED ;Nap di chi vung du lieu
LABEL:
MOV A,R0 ; Chuyen gia tri thanh ghi R0 vao thanh ghi A
MOVC A,@A+DPTR ; Lay du lieu tu vung nho
MOV P2,A ;Hien thi
CALL DELAY
INC R0 ; Lay du lieu ke tiep
CJNE R0,#9,LABEL ; Kiem tra so du trang thai hien thi
RET
;*****************************************
CTB:
MOV R0,#00H
MOV DPTR,#MALED1
LABEL1:
MOV A,R0
MOVC A,@A+DPTR
MOV P2,A
CALL DELAY
INC R0
CJNE R0,#9,LABEL1
RET
;******************************************
MALED: DB 00H,01H,03H,07H,0FH,1FH,3FH,7FH,0FFH; co 9 ma led CTA
;00000000b,00000001b,00000011b,………
MALED1: DB 00H,80H,0C0H,0E0H,0F0H,0F8H,0FCH,0FEH,0FFH; 9 ma led CTB
;----Chuong trinh tao thoi gian tre-----
DELAY:
MOV R3,#200
LOOP:
MOV R2,#250
LOOP1:
NOP
DJNZ R2,LOOP1
DJNZ R3,LOOP
RET
END
