//程序實現A/D轉換功能，A/D采用中斷方式。該程序通過pic單片機p18f458的RA2模擬通道送入一直流電壓，
//當送入的直流電壓大于2.5V時，與PORTD口相連的8個發光二極管閃動，當直流電壓恢復到
//http://www.izizhuan.cn單片機網提供此ad轉換程序，有問題請聯系本站。
//2.5V以下時，發光二極管停止閃動，且只有低四個發光。

#include "p18f458.h"

union  adres
{
 int  y1;
 unsigned  char  adre[2];
}adresult;     //定義一個共用體，用于存放A/D轉換的結果

unsigned   char i;
unsigned   int j;

void InterruptHandlerHigh(void);

//系統各I/O口初始化子程序
void initial()
{
 TRISD=0X00;   //D口為輸出
 i=0x00;
}

//A/D轉化初始化子程序
void adinitial()
{
 INTCON=0X00;  //禁止總中斷和外圍中斷
 ADCON0=0x51;  //選擇A/D通道為RA2，打開A/D轉換器
          //在工作狀態，且使A/D轉換時鐘為8tosc
 ADCON1=0X80;  //轉換結果右移，及ADRESH寄存器的高6位為"0"
                    //且把RA2口設置為模擬量輸入方式
 PIR1bits.ADIF=0;  //清除A/D轉換標志
 PIE1bits.ADIE=1;  //A/D轉換中斷允許
 INTCONbits.PEIE=1;  //外圍中斷允許
 IPR1bits.ADIP=1;  //B口變位中斷高優先級
 RCONbits.IPEN=1;  //使能中斷優先級
 PORTAbits.RA2=1;  //設置RA2為輸入方式
}

//延時子程序
void delay()
{
 for(j=5535;--j;) continue;
}

//報警子程序
void alarm()
{
 i=i^0xFF;     //通過異或方式每次把i的各位值取反 
 PORTD=i;    //D口輸出i的值
}

//高優先級中斷向量，
#pragma code InterruptVectorHigh=0x08
void InterruptVectorHigh (void)
{
  _asm
    goto InterruptHandlerHigh   //跳到中斷程
  _endasm
}

//高優先級中斷服務程序
#pragma code
#pragma interrupt InterruptHandlerHigh
void InterruptHandlerHigh ()
{
 PIR1bits.ADIF=0;   //清除中斷標志
 adresult.adre[0]=ADRESL;
 adresult.adre[1]=ADRESH;  //讀取并存儲A/D轉換結果，A/D轉換的結果通過共
       //用體的形式放入了變量y1中  
 if(adresult.y1>0x200)
 {
 alarm();     //如果輸入的模擬量大于2.5V(對應數字量
       //0X200h)，則調用報警子程序
 delay();     //調用延時子程序，使電壓檢測不要過于頻繁
 }
 else PORTD=0XF0 ;  //如果輸入的模擬量小于2.5V，則與D口相連的
       //8個發光二極管的低4個發亮，表示系統正常
 ADCON0bits.GO=1;   //啟動下一次A/D轉換
} 

//主程序
main()
{
 adinitial();     //A/D轉換初始化
 initial();     //系統各I/O口初始化 
 INTCONbits.GIE=1;   //總中斷允許
 ADCON0bits.GO=1;   //啟動A/D轉換
 while(1)
 {
  ;
 }      //等待中斷，在中斷中循環檢測外部電壓
}