trhai_co
16-04-2013, 10:25 AM
16 Led sáng dồn
ORG 00H
MAIN:
MOV P1,#00H
MOV R0,#00H
MOV R1,#00H
LAP:
MOV DPTR,#DATA1
MOV A,R1
MOVC A,@A+DPTR
MOV P1,A
MOV R3,P1
INC R1
MOV DPTR,#DULIEU
MOV A,R0
MOVC A,@A+DPTR
MOV P0,A
INC R0
LCALL DELAY
CJNE A,#0FFH,LAP
SJMP MAIN
;*********************************************
DELAY:
PUSH 00H
MOV R0,#50
MOV TMOD,#01H
LOOP2:
MOV TH0,#HIGH(-5000)
MOV TL0,#LOw(-5000)
SETB TR0
JNB TF0,$
CLR TR0
CLR TF0
DJNZ R0,LOOP2
POP 00H
RET
DULIEU:
DB 00H,01H,02H,04H,08H,10H,20H,40H,80H,00H,00H,00H,00 H,00H,00H,00H,00H
DB 01H,02H,04H,08H,10H,20H,40H,80H,00H,00H,00H,00H,00 H,00H,00H
DB 01H,02H,04H,08H,10H,20H,40H,80H,00H,00H,00H,00H,00 H,00H
DB 01H,02H,04H,08H,10H,20H,40H,80H,00H
DB 00H,00H,00H,00H
DB 01H,02H,04H,08H,10H,20H,40H,80H,00H,00H
DB 00H,00H,00H
DB 01H,02H,04H,08H,10H,20H,40H,80H,00H
DB 00H,00H,01H,02H,04H,08H,10H,20H,40H,80H,00H
DB 01H,02H,04H,08H,10H,20H,40H,80H,00H
DB 01H,02H,04H,08H,10H,20H,40H,80H
DB 81H,82H,84H,88H,90H,0A0H,0C0H
DB 0C1H,0C2H,0C4H,0C8H,0D0H,0E0H,0E1H,0E2H,0E4H,0E8H, 0F0H
DB 0F1H,0F2H,0F4H,0F8H,0F9H,0FAH,0FCH,0FDH,0FEH,0FFH
;************************************************* ****
DATA1:
DB 00H,00H,00H,00H,00H,00H,00H,00H,00H,01H,02H,04H,08 H,10H,20H,40H,80H
DB 80H,80H,80H,80H,80H,80H,80H,80H,81H,82H,84H,88H,90 H,0A0H,0C0H
DB 0C0H,0C0H,0C0H,0C0H,0C0H,0C0H,0C0H,0C0H,0C1H,0C2H, 0C4H,0C8H,0D0H,0E0H
DB 0E0H,0E0H,0E0H,0E0H,0E0H,0E0H,0E0H,0E0H,0E1H
DB 0E2H,0E4H,0E8H,0F0H
DB 0F0H,0F0H,0F0H,0F0H,0F0H,0F0H,0F0H,0F0H,0F1H
DB 0F2H,0F4H,0F8H
DB 0F8H,0F8H,0F8H,0F8H,0F8H,0F8H,0F8H,0F8H,0F8H,0F9H
DB 0FAH,0FCH,0FCH,0FCH,0FCH,0FCH,0FCH,0FCH,0FCH,0FCH, 0FDH,0FEH
DB 0FEH,0FEH,0FEH,0FEH,0FEH,0FEH,0FEH,0FFH
DB 0FFH,0FFH,0FFH,0FFH,0FFH,0FFH,0FFH,0FFH,0FFH,0FFH, 0FFH,0FFH,0FFH,0FFH,0FFH
DB 0FFH,0FFH,0FFH,0FFH,0FFH,0FFH,0FFH,0FFH,0FFH,0FFH, 0FFH
DB 0FFH,0FFH,0FFH,0FFH,0FFH,0FFH,0FFH,0FFH,0FFH,0FFH, 0FFH,0FFH,0FFH,0FFH,0FFH,0FFH,0FFH,0FFH,0FFH,0FFH, 0FFH
END
ORG 00H
MAIN:
MOV P1,#00H
MOV R0,#00H
MOV R1,#00H
LAP:
MOV DPTR,#DATA1
MOV A,R1
MOVC A,@A+DPTR
MOV P1,A
MOV R3,P1
INC R1
MOV DPTR,#DULIEU
MOV A,R0
MOVC A,@A+DPTR
MOV P0,A
INC R0
LCALL DELAY
CJNE A,#0FFH,LAP
SJMP MAIN
;*********************************************
DELAY:
PUSH 00H
MOV R0,#50
MOV TMOD,#01H
LOOP2:
MOV TH0,#HIGH(-5000)
MOV TL0,#LOw(-5000)
SETB TR0
JNB TF0,$
CLR TR0
CLR TF0
DJNZ R0,LOOP2
POP 00H
RET
DULIEU:
DB 00H,01H,02H,04H,08H,10H,20H,40H,80H,00H,00H,00H,00 H,00H,00H,00H,00H
DB 01H,02H,04H,08H,10H,20H,40H,80H,00H,00H,00H,00H,00 H,00H,00H
DB 01H,02H,04H,08H,10H,20H,40H,80H,00H,00H,00H,00H,00 H,00H
DB 01H,02H,04H,08H,10H,20H,40H,80H,00H
DB 00H,00H,00H,00H
DB 01H,02H,04H,08H,10H,20H,40H,80H,00H,00H
DB 00H,00H,00H
DB 01H,02H,04H,08H,10H,20H,40H,80H,00H
DB 00H,00H,01H,02H,04H,08H,10H,20H,40H,80H,00H
DB 01H,02H,04H,08H,10H,20H,40H,80H,00H
DB 01H,02H,04H,08H,10H,20H,40H,80H
DB 81H,82H,84H,88H,90H,0A0H,0C0H
DB 0C1H,0C2H,0C4H,0C8H,0D0H,0E0H,0E1H,0E2H,0E4H,0E8H, 0F0H
DB 0F1H,0F2H,0F4H,0F8H,0F9H,0FAH,0FCH,0FDH,0FEH,0FFH
;************************************************* ****
DATA1:
DB 00H,00H,00H,00H,00H,00H,00H,00H,00H,01H,02H,04H,08 H,10H,20H,40H,80H
DB 80H,80H,80H,80H,80H,80H,80H,80H,81H,82H,84H,88H,90 H,0A0H,0C0H
DB 0C0H,0C0H,0C0H,0C0H,0C0H,0C0H,0C0H,0C0H,0C1H,0C2H, 0C4H,0C8H,0D0H,0E0H
DB 0E0H,0E0H,0E0H,0E0H,0E0H,0E0H,0E0H,0E0H,0E1H
DB 0E2H,0E4H,0E8H,0F0H
DB 0F0H,0F0H,0F0H,0F0H,0F0H,0F0H,0F0H,0F0H,0F1H
DB 0F2H,0F4H,0F8H
DB 0F8H,0F8H,0F8H,0F8H,0F8H,0F8H,0F8H,0F8H,0F8H,0F9H
DB 0FAH,0FCH,0FCH,0FCH,0FCH,0FCH,0FCH,0FCH,0FCH,0FCH, 0FDH,0FEH
DB 0FEH,0FEH,0FEH,0FEH,0FEH,0FEH,0FEH,0FFH
DB 0FFH,0FFH,0FFH,0FFH,0FFH,0FFH,0FFH,0FFH,0FFH,0FFH, 0FFH,0FFH,0FFH,0FFH,0FFH
DB 0FFH,0FFH,0FFH,0FFH,0FFH,0FFH,0FFH,0FFH,0FFH,0FFH, 0FFH
DB 0FFH,0FFH,0FFH,0FFH,0FFH,0FFH,0FFH,0FFH,0FFH,0FFH, 0FFH,0FFH,0FFH,0FFH,0FFH,0FFH,0FFH,0FFH,0FFH,0FFH, 0FFH
END