找回密碼
 立即注冊(cè)

QQ登錄

只需一步，快速開始

搜索
查看: 4512|回復(fù): 0
打印 上一主題 下一主題
收起左側(cè)

糧倉溫度巡檢報(bào)警系統(tǒng) 單片機(jī)多機(jī)通訊 自動(dòng)巡檢程序和仿真

[復(fù)制鏈接]
跳轉(zhuǎn)到指定樓層
樓主
糧倉溫度巡檢報(bào)警系統(tǒng)原理圖如下

下面是溫度巡檢報(bào)警系統(tǒng)部分源程序
  1. #include <reg52.h>
  2. #include <18b20.h>
  3. /*
  4. sbit DS0=P1^0;           //define interface
  5. sbit DS1=P1^1;           //define interface
  6. sbit DS2=P1^2;           //define interface
  7. sbit DS3=P1^3;           //define interface
  8. sbit DS4=P1^4;           //define interface
  9. sbit DS5=P1^5;           //define interface
  10. */
  11. #define BIT1(x) (1<<x)
  12. #define DS P1
  13. #define NBIT1(x) ~BIT1(x)

  15. uchar No_number;
  16. //uchar DS;
  17. uint temp;             // variable of temperature
  18. void dsreset(uchar m)       //send reset and initialization command
  19. {
  20.   uint i;
  21.   DS&=NBIT1(m);
  22.     //DS&=BIT0(x);
  23.   i=103;
  24.   while(i>0)i--;//>480us,reset
  25.   DS|=BIT1(m);//keep free
  26.   i=4;
  27.   while(i>0)i--;
  28. }

  30. bit tmpreadbit(uchar m)       //read a bit
  31. {
  32.    uint i;
  33. //   uchar a;
  34.    bit dat;
  35.    DS&=NBIT1(m);i++;          //i++ for delay
  36.    DS|=BIT1(m);
  37.    //a=DS;
  38.     i++;i++;//讀時(shí)間片，要大于60us
  39.    if(DS&BIT1(m))
  40.      dat=1;
  41.     else
  42.      dat=0;
  43.    i=8;while(i>0)i--;
  44.    return (dat);
  45. }

  47. uchar tmpread(uchar m)   //read a byte date
  48. {
  49.   uchar i,j,dat;
  50.   dat=0;
  51.   for(i=1;i<=8;i++)
  52.   {
  53.     j=tmpreadbit(m);
  54.     dat=(j<<7)|(dat>>1);   //讀出的數(shù)據(jù)最低位在最前面，這樣剛好一個(gè)字節(jié)在DAT里
  55.   }
  56.   return(dat);
  57. }

  59. void tmpwritebyte(uchar dat,uchar m)   //write a byte to ds18b20
  60. {
  61.   uint i;
  62.   uchar j;
  63.   bit testb;
  64.   for(j=1;j<=8;j++)
  65.   {
  66.     testb=dat&0x01;//取最低位
  67.     dat=dat>>1;
  68.     if(testb)     //write 1
  69.     {
  70.       //DS=0;
  71.           DS&=NBIT1(m);
  72.       i++;i++;
  73.       DS|=BIT1(m);
  74.       i=8;while(i>0)i--;
  75.     }
  76.     else
  77.     {
  78.       //DS=0;       //write 0
  79.           DS&=NBIT1(m);
  80.       i=8;while(i>0)i--;//寫0要保持低電平60us
  81.       //DS=1;
  82.           DS|=BIT1(m);
  83.       i++;i++;
  84.     }

  86.   }
  87. }

  89. void tmpchange(uchar m)  //DS18B20 begin change
  90. {
  91.   dsreset(m);
  92.   delay(1);
  93.   tmpwritebyte(0xcc,m);  // address all drivers on bus
  94.   tmpwritebyte(0x44,m);  //  initiates a single temperature conversion
  95. }

  97. uint tmp(uchar m)               //get the temperature
  98. {
  99.   float tt;
  100.   uchar a,b;
  101.   dsreset(m);
  102.   delay(1);
  103.   tmpwritebyte(0xcc,m);
  104.   tmpwritebyte(0xbe,m);
  105.   a=tmpread(m);
  106.   b=tmpread(m);
  107.   temp=b;
  108.   temp<<=8;             //two byte  compose a int variable
  109.   temp=temp|a;
  110.   tt=temp*0.0625;
  111.   temp=tt*10+0.5;
  112.   return temp;
  113. }
復(fù)制代碼

多機(jī)通訊倉庫測(cè)溫.zip

82.96 KB, 下載次數(shù): 62, 下載積分: 黑幣 -5

整機(jī)電路圖 - 副本.rar

26.91 KB, 下載次數(shù): 56, 下載積分: 黑幣 -5

分享到:  QQ好友和群QQ好友和群 QQ空間QQ空間 騰訊微博騰訊微博 騰訊朋友騰訊朋友
收藏收藏4 分享淘帖 頂頂 踩踩

相關(guān)帖子
回復(fù)

使用道具 舉報(bào)

本版積分規(guī)則

小黑屋|51黑電子論壇 |51黑電子論壇6群 QQ 管理員QQ:125739409;技術(shù)交流QQ群281945664

Powered by 單片機(jī)教程網(wǎng)

快速回復(fù) 返回頂部 返回列表