PIC16F873 ADC & PWM & EEPROM

/共6个按键分别定义为：1-6;利用RA0作为ADC模拟采样转换;将5V电源均分成6等分
//当相应键按下时,数码管会显示键值，RC2/CCP1会输出相应脉宽的PWM波形，一直到有其他键按下改变其值为止
//当芯片启动，没按过键的情况下，RC2/CCP1输出0.5脉宽的PWM波形

#include

unsigned char vh,vl;

void adc_init(void);
void pwm_init(void);
void interrupt adc(void);
void numbers(unsigned char o);
void eepromwrite(unsigned char addr,unsigned char value);
unsigned char eepromread(unsigned char addr);

void main()
{
unsigned int i,v;
unsigned char j1,j2,a1,a2;
TRISB=0x00;
PORTB=0x7E;
adc_init();
pwm_init();
j1=eepromread(0x11);
vl=eepromread(0x12);
vh=eepromread(0x13);
CCPR1L=vh; CCP1CON=vl;
numbers(j1);
GIE=1;
while(1)
{
vh=CCPR1L;
vl=CCP1CON;
a1=vl; a2=vh;

ADGO=1; //启动A/D转换启动兼状态位,手册上写作GO/DONE
while(ADGO); //等待转换完成
for(i=500;i!=0;i--) ; //保证采样延时

if(a1!=vl||a2!=vh)
{
j1=0;
a1=vl; a2=vh;
a1>>=5; v=vh;
v<<=2; v+=a1;
for(i=1;i<11;i++)
if(v>102*i) j1++;
if(j1!=10)
{
if(j1==1) j2=1;
if(j1==2) j2=2;
if(j1==4) j2=3;
if(j1==5) j2=4;
if(j1==7) j2=5;
if(j1==9) j2=6;
numbers(j2); j2=j1;
CCPR1L=vh; CCP1CON=vl;
eepromwrite(0x11,j2);
eepromwrite(0x12,vl);
eepromwrite(0x13,vh);
}
}
}
}

void adc_init(void)
{
ADCON0=0x41; //第7-6位ADCS<1:0>:01,频率为f/8;第5-3位CHS<2:0>:000,选择通道RA0/AN0；
//第2位A/D转换启动兼状态位ADGO=0;0位ADON=1,A/D转换器开关位
ADCON1=0x0E; //ADMF=0,ADRESH用于存放A/D转换结果的高8位,ADRESL用于存放A/D转换结果的低2位，
//只有RA0/AN0作为模拟通道，其余均为数值通道
TRISA0=1; //定义RA0口作为输入，其余RA口作为输出
PIR1=0x00; //6位ADC模块中断标志位ADIF=0;
PIE1=0x40; //6位ADC模块中断使能位ADIE=1;
INTCON=0x40; //7位全局中断标志位GIE=0;6位外部中断标志位PEIE=1;
}

void pwm_init(void)
{
CCP1CON=0x3C; //第5位与第4位CCP1X=CCP1Y=1;CCP1M<3:0>=1100:CCP1工作于PWM工作模式
CCPR1L=0x7f; //PWM脉宽=CCPR1L:CCP1CON<5:4>×T×TMR2的预分频值
PR2=0xff; //设置PWM的工作周期=(PR2+1)×4T×TMR2的预分频值,即为T2CKPS<1:0>值
TRISC2=0;
T2CON=00000100; //TIMER2控制寄存器,第6-3位TOUTPS<3:0>=0000=1:1后分频比;2位计数器Timer2全能位TMR2ON=1;
//第2-0位T2CKPS<1:0>=00，TMR2的预分频比为1; 等同于T2CON=0b00000100=0x04
}

void interrupt adc(void)
{
if(ADIF==1)
{
CCP1Y=0;
CCP1X=0; //ADC结果高低位寄存器ADRESH,ADRESL
vl|=((ADRESL&0xc0)>>2);
vh=ADRESH;
ADIF=0;
}
}

void numbers(unsigned char o)
{
switch(o)
{
case 0: PORTB=0x7E; break; //0
case 1: PORTB=0x0C; break; //1
case 2: PORTB=0xB6; break; //2
case 3: PORTB=0x9E; break; //3
case 4: PORTB=0xCC; break; //4
case 5: PORTB=0xDA; break; //5
case 6: PORTB=0xFA; break; //6
case 7: PORTB=0x0E; break; //7
case 8: PORTB=0xFE; break; //8
case 9: PORTB=0xDE; break; //9
case 10: PORTB=0xEE; break; //A
case 11: PORTB=0xF8; break; //B
case 12: PORTB=0x72; break; //C
case 13: PORTB=0xBC; break; //D
case 14: PORTB=0xF2; break; //E
case 15: PORTB=0xE2; break; //F
default: PORTB=0x40; //-
}
}

void eepromwrite(unsigned char addr,unsigned char value)
{
EEADR=addr; //给地址
EEDATA=value; //给数据
EEPGD=0; //选择EEPROM 存储器
WREN=1; //使能写
GIE=0; //禁止中断
EECON2=0x55;
EECON2=0xAA; //写规定例程
WR=1; //开始写
while(WR); //等待写完
GIE=1; //恢复中断
WREN=0; //禁止写
}

unsigned char eepromread(unsigned char addr)
{
unsigned char evlaue;
GIE=0;
EEADR=addr;
EEPGD=0;
RD=1; //开始读
evlaue=EEDATA;
GIE=1;
return(evlaue);
}
//EECON1:<7>EEPGD存储器选择位,=1选择程序存储器,=0选择数据存储器;<3>WRERR EEPROM写错误标志,=1写提前结束,=0写完成;
// <2>WREN EEPROM写使能位,=1允许重复写,=0不可写;<1>WR写控制位,=1正在写,=0写完成;<0>RD读控制位,=1正在读,=0读完成
//EECON2:仅是一个逻辑上的寄存器，而不是一个物理上存在的寄存器，读出时将总是为零。它只
//在写操作时起作用。