久久久久久久999_99精品久久精品一区二区爱城_成人欧美一区二区三区在线播放_国产精品日本一区二区不卡视频_国产午夜视频_欧美精品在线观看免费

標題: TINY13+熱敏電阻做的溫度檢測與報警 [打印本頁]

作者: ekun2006 時間: 2015-5-11 14:23
標題: TINY13+熱敏電阻做的溫度檢測與報警
每次在家煤氣燒水總會因聽不到水燒開的聲音而浪費煤氣。索性做個溫度檢測，當(dāng)水溫差不多合適就報警提示，由于溫度精度要求不高，索性使用了熱敏電阻進行模糊控制。實用就行。

//ICC-AVR application builder : 2012/6/19 下午 10:43:42
// Target : T13
// Crystal: 4.8000Mhz

#include <iot13v.h>
#include <macros.h>
#define CPL  PORTB &= ~(1<<PB1)
#define CPH  PORTB |=(1<<PB1)
#define DAL  PORTB &= ~(1<<PB0)
#define DAH  PORTB |=(1<<PB0)
#define FSL  PORTB &= ~(1<<PB3)
#define FSH  PORTB |=(1<<PB3)
char dsp,tdsp;
char adcdata=0;
flash char LED[]={
            0x3F,0x06,0x5B,0x4F,0x66,0x6D,0x7D,0x07,0x7F,0x6F
//0xed,0x21,0x8f,0xab,0x63,0xea,0xee,0xa1,0xef,0xeb
};
void delay1ms(void) //誤差 0us
{
   unsigned char a,b;
for(b=4;b>0;b--)
      for(a=248;a>0;a--);
}

void delay(unsigned char i)
{
   unsigned char a,b;
for(b=2;b>0;b--)
      for(a=i;a>0;a--);
}
void delay10ms(void) //誤差 0us
{
unsigned char a,b,c;
for(c=30;c>0;c--)
      for(b=154;b>0;b--)
         for(a=2;a>0;a--);
}

void beep(void)  //蜂鳴器響一聲函數(shù)
{
  unsigned char i;
  for(i=0;i<100;i++)
{
FSH;
delay1ms();
FSL;    //BEEP取反
delay1ms();
}
for(i=0;i<100;i++)
{
FSH;
//delay1ms();
//FSL;    //BEEP取反
delay1ms();
}
}

void send(char a)
{
  char i;
  for(i=8;i>0;i--)
      {
   CPL;delay(1);
   if(a&0x80)
   {
   DAH;
   }
   else
   {
      DAL;
}

      CPH;delay(1);

   a=a<<1;
      }
}

void disp(void)
{
  //FSH;
  send(LED[dsp%100%10]+tdsp);
  send(LED[dsp%100/10]+tdsp);
  send(LED[dsp/100]+tdsp);
  //send(LED[dsp%100%10]+tdsp);
  //send(LED[dsp%100/10]+tdsp);
  //delay(255);
  //delay(255);FSL;
}

void port_init(void)
{
PORTB = 0x00;
DDRB  = 0x0B;
}
void  adcstar(char a,char b,char c)

{

      DIDR0=a;       // ADC2(PB4)禁用數(shù)字輸入緩沖;

      ADMUX=(1<<REFS0)|(0<<ADLAR)|(b<<MUX1)|(c<<MUX0);

/*

      ADMUX (ADC Multiplexer Select Register) PDF86頁

      bit7  Res                保留

      bit6  REFS0             0=VCC作為模擬參考電壓;1=片內(nèi)基準電壓

      bit5  ADLAR             0=右對齊;1=左對齊(8bit只讀ADCH即可)

      bit4:2  Res                保留

      bit1:0  MUX1,MUX0       通道選擇,00=ADC0(PB5);01=ADC1(PB2);10=ADC2(PB4);11=ADC3 (PB3)

*/

      ADCSRA=(1<<ADEN)|(1<<ADSC)|(0<<ADATE)|(0<<ADIF)|(0<<ADIE)|(1<<ADPS2)|(1<<ADPS1)|(1<<ADPS0);

/*

      ADCSRA (ADC Control and Status Register A) PDF 87頁

      bit7 ADEN ADC使能=1

      bit6 ADSC 啟動ADC開始轉(zhuǎn)換=1

      bit5 ADATE 自觸發(fā)使能

      bit4 ADIF ADC中斷標志

      bit3 ADIE ADC中斷使能

      bit2:0 ADC 預(yù)分頻選擇位

*/

}
#pragma interrupt_handler eeprom_ready_isr:iv_EE_RDY
void eeprom_ready_isr(void)//內(nèi)部EEPROM讀寫初始化
{
//eeprom ready event
}
//call this routine to initialize all peripherals
void init_devices(void)
{
//stop errant interrupts until set up
CLI(); //disable all interrupts
port_init();

MCUCR = 0x00;
TIMSK0 = 0x00; //timer interrupt sources
GIMSK = 0x00; //interrupt sources
SEI(); //re-enable interrupts
//all peripherals are now initialized
}
char key(void)
{

  if (ADCSRA&(1<<ADIF))

      {

         adcdata=ADC/4;

         ADCSRA|=(1<<ADSC)|(1<<ADIF); // ???ADC ???? ADIF?1???????1??0

      }//delay(100);
return(adcdata);
}

void main(void)
{
  char stmp,mode=0,tmp;
  init_devices();
  stmp=EEPROMread(0);//讀取EEPROM預(yù)設(shè)溫度數(shù)據(jù)
  adcstar(0x10,1,0);//溫度檢測
  dsp=key();
disp();
FSH;
while(1)
{

  adcstar(0x10,1,0);//溫度檢測
delay10ms();
if(mode==0)
{
tmp=((key()-37)/2)+10;
tdsp=0x00;
if((tmp>stmp)&&(key()>38))
{
   beep();
   }
   else
   {
   FSH;
   }
if(dsp!=tmp)
{
dsp=tmp;
disp();
}
}
delay10ms();

adcstar(0x04,0,1);//按鍵檢測
delay10ms();
//if(dsp!=key())
//{
//dsp=key();
//disp();
//}

if(key()==0)
{
mode++;
if(mode>1)
{
mode=0;
}
while(key()==0);
}

if(mode==1)
{
tdsp=0x80;
if(dsp!=stmp)
{
dsp=stmp;
disp();
}

if((key()>=104)&&(key()<=107))
{
stmp++;
if(stmp>250)
{
stmp=250;
}
EEPROMwrite(0,stmp);//向EEPROM寫入預(yù)設(shè)溫度數(shù)據(jù)
//while((key()==105)|(key()==106));
}

if((key()>=180)&&(key()<=183))
{
stmp--;
if(stmp<1)
{
stmp=1;
}
EEPROMwrite(0,stmp);//向EEPROM寫入預(yù)設(shè)溫度數(shù)據(jù)
//while((key()==180)|(key()==181));
}
  }
  delay10ms();

}
}

11.png (24.97 KB, 下載次數(shù): 238)

作者: 俠行江湖 時間: 2015-11-27 21:09
此電路仿真時，數(shù)碼管用的是 7SEG-MP1-CA嗎？

作者: ljh67 時間: 2016-3-7 02:32
請上份清晰的圖。或原仿真文件。參考一下

歡迎光臨 (http://www.zg4o1577.cn/bbs/)