ORG 00H 
LJMP INIT 
ORG 30H 
INIT: 
MOV SP,#070H 
MOV P2,#0FFH 
;以下为查表程序 
MOV DPTR,#LED_TABLE 
LIGHT: 
MOV R7,#42 
LOOP: 
MOV A, #42 
SUBB A,R7 
MOVC A,@A+DPTR 
MOV P2,A 
USING 0 
PUSH AR7 
LCALL DELAY 
USING 0 
POP AR7 
DJNZ R7,LOOP 
SJMP LIGHT 
;延时子程序 
DELAY: 
MOV R7,#3H 
DELAY1: 
MOV R6,#7FH 
DELAY2: 
MOV R5,#7FH 
DJNZ R5,$ 
DJNZ R6,DELAY2 
DJNZ R7,DELAY1 
RET 
;表格数据 
LED_TABLE: 
DB 0FFH 
DB 0FEH,0FDH,0FBH,0F7H,0EFH,0DFH,0BFH,07FH 
DB 0FEH,0FCH,0F8H,0F0H,0E0H,0C0H,080H,000H 
DB 080H,0C0H,0E0H,0F0H,0F8H,0FCH,0FEH,0FFH 
DB 07EH,0BDH,0DBH,0E7H,0E7H,0DBH,0BDH,07EH 
DB 07EH,03CH,018H,000H,000H,018H,03CH,07EH 
DB 000H 
END