0809模数转换原码.asm

0809模数转换原码。ADC0809虽然是一款比较旧的芯片

												 ORG 000H
AJMP ST
ORG 0003H
AJMP UNTIR
ST: CLR 20H.0
CLR 20H.1
MOV SP,#65H
MOV IE,#81H
MOV TCON,#01H
ST0: MOV DPTR,#0CF00H
MOVX @DPTR,A
JNB 20H.0,$
CLR 20H.0
MOVX A,@DPTR
MOV 30H,A
;------------整数算法---------------------------
MOV A,30H
MOV B,#51
DIV AB
MOV 31H,B
MOV R3,A
;MOV DPTR,#TAB
;MOV A,R3
;MOVC A,@A+DPTR
;MOV P3,A
;*************CHU 5 ******************* 
MOV A,31H
MOV B,#5
DIV AB
MOV R4,B
JZ SS
CJNE R4,#0,SS
DEC A
SS: MOV 32H,A
MOV A,R4
MOV B,#10
MUL AB
MOV B,#5
DIV AB
CJNE A,#0,GG
MOV A,#10
GG: DEC A
MOV 33H,A
;------------XIANSHI---------
MOV DPTR,#TAB
MOV A,32H
MOVC A,@A+DPTR
MOV P3,A
MOV DPTR,#TAB
MOV A,33H
MOVC A,@A+DPTR
MOV P1,A
AJMP ST0
UNTIR: PUSH ACC
PUSH PSW
SETB 20H.0
POP PSW
POP ACC
RETI
DELAY: MOV 10H,#100
DE1: MOV 11H,#20
DE2: MOV 12H,#248
DE3: DJNZ 12H,DE3
DJNZ 11H,DE2
DJNZ 10H,DE1
RET
TAB: DB 0C0H,0F9H,0A4H,0B0H,99H,92H,82H
DB 0F8H,80H,90H,88H,83H,0C6H
DB 0A1H,86H,8EH 
END