DBUF0	EQU	30H
	TEMP	EQU	40H


	ORG	0000H
START:	MOV	R0,#DBUF0
	MOV	@R0,#0AH
	INC	R0
	MOV	@R0,#0DH
        INC     R0
        MOV     @R0,#11H
        INC     R0
	MOV	DPTR,#0FEF3H;A/D
        MOV     A,#0
	MOVX	@DPTR,A
WAIT:   JNB     P3.3,WAIT
	MOVX	A,@DPTR      ;  讀入結果
	MOV	P1,A

	MOV	B,A
	SWAP	A
        ANL     A,#0FH
	XCH	A,@R0

	INC	R0
	MOV	A,B
        ANL     A,#0FH
	XCH	A,@R0
	ACALL	DISP1
        acall   delay
	AJMP	START

DISP1:
	MOV	R0,#DBUF0
	MOV	R1,#TEMP
	MOV	R2,#5
DP10:	MOV	DPTR,#SEGTAB
	MOV	A,@R0
	MOVC	A,@A+DPTR
	MOV	@R1,A
	INC	R0
	INC	R1
	DJNZ	R2,DP10
	MOV	R0,#TEMP
	MOV	R1,#5
DP12:	MOV	R2,#8
	MOV	A,@R0
DP13:	RLC	A
	MOV	0B0H,C
	CLR	0B1H
	SETB	0B1H
	DJNZ	R2,DP13
	INC	R0
	DJNZ	R1,DP12
        RET

SEGTAB:	DB	3FH,6,5BH,4FH,66H,6DH ;0，1，2，3，4，5
	DB	7DH,7,7FH,6FH,77H,7CH ;6，7，8，9，A，B
	DB	58H,5EH,79H,71H,0,00H ;C，D，E，F，-
DELAY:MOV   R4,#0FFH
AA1:  MOV   R5,#0FFH
AA:   NOP
      NOP
      DJNZ  R5,AA
      DJNZ  R4,AA1
      RET

       END