ORG 0000H
MAIN: MOV SP,#70H
	MOV A,#03H;把控制命令放到a中
	MOV DPTR,#0FF20H;控制命令地址
	MOVX @DPTR,A;把對應的控制命令放到81c55
LOOP2:MOV R1,#0FEH;用于一位作用
	MOV R0,#30H;6個數字所在的首地址
LOOP1:MOV DPTR,#TABLE;將要查的數方到dptr中
	MOV A,@R0;把r0的數放到a中
	MOVC A,@A+DPTR;轉碼所得數方到a中
	MOV DPTR,#0FF22H;把pb口地址方到dptr中
	MOVX @DPTR,A;把要顯示的數放到pb口上
	MOV A,R1;把位控制方到a中
	MOV DPTR,#0FF21H;把pa口地址放到dptr中
	MOVX @DPTR,A
	RL A;左移一位
	MOV R1,A;把移位的數方到r1中
	CALL YANCHI;調用延遲程序
	INC R0
	CJNE R0,#36H,LOOP1
	JMP LOOP2
TABLE:DB 0CFH,0F9H,0A4H,0B0H,99H,92H,82H,0F8H,80H,90H 
YANCHI:
	MOV R6,#0FFH
	MOV A,#0FFH
LOOP:
LOOP3: DEC R6
	MOV R5,A
	MOV A,R6
	CJNE A,00H,LOOP3
	MOV A,R5
	DEC A
	CJNE A,00H,LOOP
RET
END