PIC单片机AD转汇编程序.docVIP

PIC单片机AD转换汇编程序 ;此汇编程序实现A/D转换功能，应用于pic单片机上，A/D采用中断方式。该程序通过单片机的RA2模拟通道送入;一直流电压，当送入的直流电压大于2.5V时，8个LED闪动，当直流电压恢复到2.5V以下;时，LED停止闪动。为了防止干扰，本程序对直流电压采样10次后再作判断，中间的采样结;果用间接寻址的方式存取。LIST P=18F458INCLUDE P18F458.INCTIMES EQU 0X20 DEY EQU TIMES+1ACCALO EQU TIMES+2 ;ACCA为双精度加数寄存器ACCAHI EQU TIMES+3ACCBLO EQU TIMES+4 ;ACCB为双精度加法的结果寄存器ACCBHI EQU TIMES+5FLAG EQU TIMES+6DEYH EQU TIMES+7DEYL EQU TIMES+9BEGFSR EQU 0X30 ;间接寻址FSR的起始值(宏定义方式给出)ORG 0X0000GOTO MAINORG 0X0008GOTO INTSERVE ;转向中断服务子程序ORG 0X30;***双字节减法子程序，入口地址ACCB-ACCA，出口地址ACCB***D_SUBCALL NEG_A ;求ACCA的补码;***双字节加法子程序，入口地址ACCB+ACCA，出口地址ACCB***D_ADDMOVF ACCALO，0 ;ACCB和ACCA低半字节相加ADDWF ACCBLOBTFSC STATUS，C ;有进位否？INCF ACCBHI ;有，ACCB高字节加1，再加ACCAHIMOVF ACCAHI，0 ;ACCA、ACCB高半字节相加ADDWF ACCBHIRETURN ;子程序返回;************** ACCA取补子程序*****************NEG_ACOMF ACCALO ;ACCALO取反加1INCF ACCALOBTFSC STATUS，Z ;低8位有进位吗？DECF ACCAHI ;有，ACCAHI减1，再取反COMF ACCAHI ;否则ACCAHI直接取反RETURN ;子程序返回;*********初始化子程序***************INITIALCLRF INTCON ;禁止总中断和外围中断MOVLW 0X51 MOVWF ADCON0 ;选择AD通道为RA2，且打开A/D转换器;在工作状态，且使AD转换时钟为8ToscMOVLW 0X80 MOVWF ADCON1 ;转换结果右移，即ADRESH寄存器的高6;位为0，且把RA2口设置为模拟量输入式;(注意后面要把RA5改成数据I/O方式，以;输出显示琐存信号) BCF PIR1，ADIF ;清除A/D转换标志BSF PIE1，ADIE ;A/D转换中断允许BSF INTCON，PEIE ;外围中断允许BSF IPR1，ADIP ;B口变位中断高优先级BSF RCON，7 ;使能中断优先级BSF TRISA，2 ;设置RA2为输入方式 BCF TRISA，5 ;置RA5为输出方式，以输出锁存信号BCF TRISC，5BCF TRISC，3 ;设置SCK与SDO为输出方式MOVLW 0XC0MOVWF SSPSTAT ;设置SSPSTAT寄存器 MOVLW 0X30MOVWF SSPCON1 ;设置SPI的控制方式，允许SSP方式，并;且时钟下降沿发送，与74HC595当其;SCLK从低到高电平跳变时，串行输入数据;(DI)移入寄存器的特点相应CLRF FLAG RETURN;*********软件延时子程序****************DELAYMOVLW 0XFFMOVWF DEYHAGAIN1 MOVLW 0XFFMOVWF DEYLAGAIN2 NOPDECFSZ DEYLGOTO AGAIN2DECFSZ DEYHGOTO AGAIN1RETURN;*************** A/D中断服务子程序*****************INTSERVEBCF PIR1，ADIF ;清除A/D转换标志MOVF ADRESH，WMOVWF INDF0 ;读取并存储A/D转换结果的高两位INCF FSR0LMOVF ADRESL，WMOVWF INDF0INCF FSR0L ;读取并存储A/D转换结果的低8位DECF TIMES，1 ;A/D转换次数减1MOVLW 0X02MOVWF DEYLOOP13 DECFSZ DEY，1GOTO LOOP13 ;给予一定的延时，