第三讲：AD+XS用于测试电路板.docVIP

；本程序用于测试电路板：;AD+XS ;----------------------------------- ;AD转换---控制0809进行一次转换，并将结果送入 ADJG 单元 。 ;显示-----在右面4位数码管上显示采集数字，无小数点。 ;----------------------- ;程序修改要求 ： ;1、进行键值采集 ;2、当按1＃键进入保持，再按1＃键退出保持 。 ;3、正确显示小数点 ;----------- XSDY EQU 60H ;显示单元60H～65H ,由低－－高 ADJG EQU 50H ;存AD采集结果 ADTD EQU 52H ;AD采集的通道号0～7 BAOCHI_F BIT 00H ;保持显示标志 ＝1 保持 eoc BIT p3.2 ;AD 结束标志 ORG 0000H LJMP STAR ORG 0100H STAR: MOV IE,#00H MOV PSW,#00H MOV SP,#70H MAIN: MOV 60H,#8FH ;全部显示小数点 MOV 61H,#8FH MOV 62H,#8FH MOV 63H,#8FH MOV 64H,#8FH MOV 65H,#8FH M_1: LCALL ADZH LCALL XS SJMP M_1 org 0200h ADZH: CLR P3.3 ；选通AD0809 nop JB BAOCHI_F,ad2 ; 如果是保持，不进行AD转换 。 mov a,ADTD ;送转换通道 mov p1,#00h ;设置0通道 P1.6， P1.5， P1.4=000 mov r0,#00h movx @r0,a ;启动转换，r0 的内容可为任意值， ad1: ；ADC0809的eoc端已加反向器， jb eoc,ad1 ；故eoc=1时转换未结束。 movx a,@r0 ；读AD结果 mov adjg,a lcall szzh ;数值转换 ad2: ret ;----------------------- ;数值转换 ;将AD结果转换为显示数值, 0.001v ，即以毫伏为单位显示。 ;单位AD数值对应19.6mV ; Y=X*19.6=X*196/10 ;具体步骤： ;1、求 Y＝X * 196 ,结果为双字节二进制数--R2R3 ;2、将 Y转换为十进制数, 最大是一个5位的十进制数 ;3、去掉十进制数的最低位，相当于除10 ;----------------------- szzh: nop ;求Y＝X * 196 mov a,adjg mov b,#196 mul ab mov r2,b mov r3,a ;---- ;Y转换为十进制数, ;将R2R3的16位二进制数转换为三字节的压缩BCD 码 ，? ;存入R4R5R6中 ;B=b15*2^15+b14*2^14+...+b2*2^2+b1*2^1+b0*2^0 ;D==(...(b15*2+b14)*2+b13)*2+......+)*2+b0 ; ibtd: clr a ;0--R4R5R6 mov r4,a mov r5,a mov r6,a mov r7,#16 ibtd2: clr c ;R2R3左移一位，移出的最高位-- CY mov a,r3 rlc a mov r3,a mov a,r2 rlc a mov r2,a mov a,r6 ;(R4R5R6)*2+CY--R4R5R6 addc a,r6 ;=R6+R6+CY da a ;十进制调整 mov r6,a mov a,r5 addc a,r5 da a mov r5,a mov a,r4 addc a,r4 da a mov r4,a djnz r7,ibtd2 ;---- ;去掉十进制数的最低位！ ;将最终结果送入显示单元 mov r0,#XSDY mov a,r6 anl a,#0f0h ;去掉第5位，相当于除10 swap a mov @r0,a ;个位（右1） inc r0 mov a,r5 anl a,#0fh mov @r0,a ;十位（右2） inc r0 mov a,r5 anl a,#0f0h swap a mov @r0,a ;百位（右3） inc r0 mov a,r4 anl a,#0fh mov @r0,a ;千位（右4） ret ;-------