pic16f676 ad.txt

PIC16F676 用于感烟探测器中的AD采样程序。两次采样

/******************************************************************** 
*  文 件 名: PIC16F676.asm 
*  文件描述: 感烟探测器中的AD采样。用RA0采样
*  芯    片: PIC16F676
*  编 译 器: MPLAB8.01
*  创建日期: 2009年01月12日
*  版 本 号: V1.0  
*  修改记录: 
* 
********************************************************************/
AD_DONE
        BSF    PORTC,VT    ;//运放供电
        CALL IntDelay17Ins2ms
INITIALIZEAD        
        BSF    STATUS,RP0
        MOVLW  B'00110000' ;//FRC,TAD=6US
        MOVWF  ADCON1
        MOVLW  B'00000011' ;//RA0 RA1设置为模拟脚。RA1可以不必
        MOVWF  ANSEL
        BCF    STATUS,RP0
        
        MOVLW  B'00000001' ;//AD ON
        MOVWF  ADCON0
        BCF    PIR1,ADIF
        BSF    ADCON0,GO
        BTFSC PIR1,ADIF
        GOTO $-1
        MOVF   ADRESH,W    ;//静态点采样
        BSF    PORTC,IR    ;//IR OUT,300US后采集数据
        BSF    ADCON0,GO   ;//START A/D CONVERSION
        BCF    PORTC,IR    ;//IR OUT,300US后采集数据
        MOVWF  Y_STATIC    ;//静态工作点 保存静态点采样在Y_STATIC
        BCF    PORTC,VT    ;//关闭运放
        BCF  ADCON0,ADON    ;//TURN OFF A/D
        
        MOVF   ADRESH,W
        MOVWF  Y_SIGNAL    ;//保存采样值。采样值- 静态点采样 即为烟浓度值。
        RETURN