基于avr的pwm自动调光实现

前段时间因为一些原因用了一下avrmega16，在网上找资料的时候发现相对来说还是挺少的。恰好今天有时间，就把我做的一个根据温度自动调节小灯亮度的程序贴出来，和大家共享一下，如有不对的地方，欢迎指正。

avr我自己了解也不多，所以话不多说，直接上代码：

#include <iom16v.h>
#include <macros.h>
#include "delay.h"  
#include "display.h"
#include "18B20.h"
//是对PA5进行操作
#define DQ_IN   DDRA&=~BIT(5)
#define DQ_OUT  DDRA|=BIT(5)
#define DQ_SET  PORTA|=BIT(5)
#define DQ_CLR  PORTA&=~BIT(5)
#define DQ_R    PINA&BIT(5)  

#define  uchar unsigned char
#define  uint  unsigned int

uchar table1[]="0123456789";
uchar table2[]="auto_light";
uchar table3[]="temperature:";
uchar table4[]=".";
uint temperture;//读取温度值变量
uchar flag = 0;//模式标志位，0 自动 ，1 手动
uchar tmppt = 35;//预设温度报警值
uint vpwm = 500;  //PWM 匹配值



void delay(unsigned int ms) //延时函数
{
        unsigned int i,j;
for(i=0;i<ms;i++)
  {
  for(j=0;j<1141;j++);
       }
}
 
void write_com(uchar com)//向 1602 写命令
{
 /*
 这里的时序逻辑参照 1602数据手册
 只要按着这个时序来就好
 */
       PORTA&=~BIT(0);
  PORTA&=~BIT(1);
  PORTB=com;
  PORTA|=BIT(2);
  delay(1);
  PORTA&=~BIT(2);
}

void write_dat(uchar dat)//向 1602 写数据
{     
       PORTA|=BIT(0);
  PORTA&=~BIT(1);
  PORTB=dat;
  PORTA|=BIT(2);
  delay(1);
  PORTA&=~BIT(2);
}
void LCD_init()// 1602 初始化
{ 
   DDRB=0XFF;
 DDRA|=BIT(0)|BIT(1)|BIT(2);
 PORTD&=~BIT(6);
 
 write_com(0X38);
 delay(5);
 write_com(0X01);
 delay(5);
 write_com(0X0C);
 delay(5);
 write_com(0X06);
 delay(5);
 
}
void display()  //换算显示温度值
{
   uint i;
 
write_com(0X80+0);
delay(5);
   for(i=0;i<12;i++)
 {
    write_dat(table3[i]);
delay(5);
 } 
 
  write_com(0X80+12);
 delay(5);
 write_dat(table1[temperture/100%10]);   //温度值十位
 delay(5);
   write_com(0X80+13);
 delay(5);
 write_dat(table1[temperture/10%10]);   //温度值个位
 delay(5);
  write_com(0X80+14);
 delay(5);
 write_dat(table4[0]);
 delay(5);
  write_com(0X80+15);
 delay(5);
 write_dat(table1[tempezrture%10]);    //温度值小数位
 delay(5);
 
 write_com(0X80+0X40);
 delay(5);
   for(i=0;i<11;i++)
 {
    write_dat(table2[i]);
delay(5);
 }   
}
//DS18B20初始化程序
uchar ds18b20_reset()
{
    unsigned char errTime=0;//用于循环计数
   
 DQ_OUT;//先设置成输出
DQ_CLR;//总线拉低  
 Delay_Us(500);//保持500us(最小为480us,最大为960us)
DQ_IN;//1
_NOP();
while(DQ_R)//探测IO引脚上是上升沿
{
  Delay_Us(6);//5.15us
  errTime++;
  if(errTime>20)
  return(0x00); //如果等待大于约 5.15us*20就返回0x00，报告复位失败（实际上只要等待15-60us）
    
}
errTime=0;
while(!(DQ_R))//注意(DQ_R)与DQ_R不同
{
  Delay_Us(6);//5.15us
  errTime++;
  if(errTime>50)
  return(0x00); //如果等待大于约 5.15us*50就返回0x00，报告复位失败（实际上只要等待60-240us）
}
return(0xff);
}

void ds18b20_write_byte(uchar value)//18B20写一个字节的程序
{
    uchar i;
for(i=0;i<8;i++)//1个字节有8位,1位1位的传输
  {
 DQ_OUT;//先设置成输出
DQ_CLR;//总线拉低 
Delay_Us(10);//按照写1时序,在15us中完成所以延时10us
if(value&0x01)//判断此时写入的值是1还是0
{
DQ_SET;//如果是1,总线拉高,使得18B20能采样
}
else DQ_CLR;
Delay_Us(100);//如果是0(低电平)就不用管，继续延时(15+15+30=60us,100us足够)
DQ_SET;//释放总线
value=value>>1;//每次传输完后移位
  }
}
uint ds18b20_read_byte(void)//18B20读一个字节的程序
{
 uint i,value;
 
for(i=0;i<8;i++)
{
 value=value>>1;//移位,最后一次读正好是最高位
 DQ_OUT;//先设置成输出
 DQ_CLR;//总线拉低 
 Delay_Us(10);//>1us,<15us控制器读1时序
 DQ_SET;//总线释放准备采样
 DQ_IN;//采样,设置成输入
 if(DQ_R)//如果读到的值是1
 {
  value|=0x80;//从低位开始读取
 }
 Delay_Us(50);//>45us
}
return value;
}
//读取温度值先读取暂存器的值在进行温度转换否则会意外出错
unsigned int readTempDS18B20(void)
{
    unsigned char tempL,tempH;
unsigned int temp;
//开始读取温度
    ds18b20_reset();//18B20复位
    ds18b20_write_byte(0xcc);//跳过ROM
ds18b20_write_byte(0xbe);//命令读取暂存器
tempL=ds18b20_read_byte();//从暂存器中读取数据
    tempH=ds18b20_read_byte();//从暂存器中读取数据
temp=(tempH<<8)|tempL;//总值为高位*256+低位
temp=temp*0.625;//为了保留1位小数,最小单位为0.0625
ds18b20_reset();//18B20初始化
ds18b20_write_byte(0xcc);//对ROM进行操作,因为只接了1个器件所以写跳过指令
ds18b20_write_byte(0x44);//启动温度转换
Delay_ms(1);//给硬件一点时间让其进行转换
return(temp);
}
void pwm()
{
 	 DDRD|= 0X20;//设置PD5 为输出模式
	 TCCR1A = 0XA2; //设置相位修正 PWM
	 TCCR1B = 0X11;   //设置 PWM 分频 (1 分频)
	 ICR1  = 1000;   //设置 TOP 值
	 OCR1A = vpwm;    //匹配值
}
/*按键判断程序*/
void key()
{
 if ((PINC & (1 << PC0)) == 0)  //判断按键状态
 {	
 	Delay_ms(10);//延时消抖
	if ((PINC & (1 << PC0)) == 0)  //判断按键状态
 	{	
 	 	if(flag == 1)//手动，自动模式切换
		{
		 flag = 0;
		}
		else
		{
		 flag = 1;
		}
	}
 }
 
 if ((PINC & (1 << PC1)) == 0) //判断按键状态
 {
	Delay_ms(10);//延时消抖
	if ((PINC & (1 << PC1)) == 0)  /*判断按键状态*/
 	{	
 	 	tmppt++;//预警温度值加一
	}
 }
		
 if ((PINC & (1 << PC2)) == 0) //判断按键状态
 {
	Delay_ms(10);//延时消抖
	if ((PINC & (1 << PC2)) == 0)  /*判断按键状态*/
 	{	
 	 	tmppt--;  //预警温度值减一
	}
 }
 if ((PINC & (1 << PC3)) == 0) //判断按键状态
 {
	Delay_ms(10);//延时消抖
	if ((PINC & (1 << PC3)) == 0)  /*判断按键状态*/
 	{	
		if(flag == 1)//判断是否为手动模式
		{
		 if(vpwm < 1000)
		 {
		  vpwm += 10;//PWM 匹配值加 10
		  OCR1A = vpwm;    //更新匹配值
		 }
		}
	}
 }
		
 if ((PINC & (1 << PC4)) == 0) //判断按键状态
 {
	Delay_ms(10);//延时消抖
	if ((PINC & (1 << PC4)) == 0)  /*判断按键状态*/
 	{	
		if(flag == 1)//判断是否为手动模式
		{
		 if(vpwm > 0)
		 {
		  vpwm -= 10 ;     //PWM 匹配值减 10
		  OCR1A = vpwm;    //更新匹配值
		 }
		}
	}
 }
} 
void  main()
{  
   	  uchar tt;  //临时变量
      LCD_init();//1602液晶初始化
	  pwm();  //pwm 初始化
	  while(1)
	  {   
	  	  temperture=readTempDS18B20();  //读取 18b20 温度值
		  if(flag == 0) //判断是否为自动模式
		  {
		   tt = temperture/10; //取得温度值整数部分
		   if(tt >= tmppt) //判断是否大于预警值
		   {
		   	OCR1A = 0;   //更新匹配值
		   }
		   else
		   {
		   	OCR1A = (int)(tt*1000/tmppt);   //更新匹配值
		   }
		  }
		  display();//调用显示函数
		  key();   //调用按键检测函数
	  }
}

以上是主函数，解释性的话就不说了，代码里注释很多，相信应该都可以看懂的。