標(biāo)題: DS1621溫度傳感器單片機(jī)代碼+Proteus仿真實(shí)驗(yàn) [打印本頁(yè)]
作者: 555ikk    時(shí)間: 2018-12-13 11:41
標(biāo)題: DS1621溫度傳感器單片機(jī)代碼+Proteus仿真實(shí)驗(yàn)
DS1621溫度傳感器仿真原理圖如下（proteus仿真工程文件可到本帖附件中下載）


單片機(jī)源程序如下:
  1. /***************   writer:shopping.w   ******************/
  2. #include <reg52.h>
  3. #include <intrins.h>
  4. #define uint unsigned int
  5. #define uchar unsigned char
  6. bit I2C_Busy, NO_Ack,Bus_Fault,point;

  8. uchar bdata a;
  9. sbit LSB = a^0;
  10. sbit MSB = a^7;
  11. sbit SDA = P3^3;
  12. sbit SCL = P3^2;
  13. uchar Array[] = {'0','1','2','3','4','5','6','7','8','9'};
  14. uchar command_data[]=
  15. {
  16.         0xac,0x00,0xee,0xa1,0x00,0x00,0xa2,0x00,0x00,0xaa
  17. };
  18. uchar Prompt[]="Waiting for a while...\r";
  19. uchar i;
  20. void DelayMS(uint ms)
  21. {
  22.         uchar i;
  23.         while(ms--)
  24.         {
  25.                  for(i=0;i<120;i++);
  26.         }
  27. }

  29. void SendStop()
  30. {
  31.         SDA = 0;
  32.         SCL = 1;
  33.         _nop_();
  34.         SDA = 1;
  35.         I2C_Busy = 0;
  36. }

  38. void SendByte(uchar wd)
  39. {
  40.         uchar i;
  41.         a = wd;
  42.         for(i=0;i<8;i++)
  43.         {
  44.                  SCL = 0;
  45.                 _nop_();
  46.                 _nop_();
  47.                 SDA = MSB;
  48.                 a <<= 1;
  49.                 _nop_();
  50.                 _nop_();
  51.                 SCL = 1;
  52.                 _nop_();
  53.                 _nop_();
  54.                 SCL = 0;
  55.         }
  56.         SDA = 1;
  57.         SCL = 1;
  58.         _nop_();
  59.         _nop_();

  61.         if(!SDA)
  62.         {
  63.                  SCL = 0;
  64.                 _nop_();
  65.                 _nop_();
  66.         }
  67.         else
  68.         {
  69.                  NO_Ack = 1;
  70.                 SCL = 0;
  71.                 _nop_();
  72.                 _nop_();
  73.         }
  74. }

  76. void Master(uchar slave_addr)
  77. {

  79.         I2C_Busy = 1;
  80.         NO_Ack = 0;
  81.         Bus_Fault = 0;
  82.         if(!SCL || !SDA)
  83.                 Bus_Fault = 1;
  84.         else
  85.         {
  86.                  SDA = 0;
  87.                 _nop_();
  88.                 _nop_();
  89.                 SCL = 0;
  90.                 _nop_();
  91.                 _nop_();
  92.                 SendByte(slave_addr);
  93.         }
  94. }

  96. uchar RecvByte(uchar cnt)
  97. {
  98.         uchar i,rcv_data;
  99.         for(i=0;i<8;i++)
  100.         {
  101.                  SDA = 1;
  102.                 SCL = 1;
  103.                 _nop_();
  104.                 LSB = SDA;
  105.                 if(i<7)
  106.                         a <<= 1;
  107.                 _nop_();
  108.                 SCL = 0;
  109.                 _nop_();
  110.         }
  111.        
  112.         if(cnt == 1)
  113.                 SDA = 1;
  114.         else
  115.                 SDA = 0;
  116.         SCL = 1;
  117.         _nop_();
  118.         SCL = 0;
  119.         SDA = 1;
  120.         _nop_();
  121.         rcv_data = a;
  122.         return rcv_data;       
  123. }

  125. void SendData(uchar slave_address,uchar start,uchar end)
  126. {
  127.         Master(slave_address);
  128.         for(i=start;i<=end;i++)
  129.                 SendByte(command_data[i]);       
  130.         SendStop();
  131. }

  133. void InitialiseSerialPort()
  134. {
  135.         TMOD = 0x20;
  136.         TH1  = 0xfd;
  137.         SCON = 0x50;
  138.         TR1  = 1;
  139. }

  141. void SendCharToSerialPort(uchar ch)
  142. {
  143.         SBUF = ch;
  144.         while(!TI);
  145.         TI = 0;
  146. }

  148. void SendTemperatureToSerialPort(uchar val)
  149. {
  150.         if(val>200)
  151.         {
  152.                  val = 255-val;
  153.                 SendCharToSerialPort('-');
  154.                 if(!point)
  155.                         val+=1;
  156.         }
  157.         SendCharToSerialPort(Array[(val/10)/10]);
  158.         SendCharToSerialPort(Array[(val/10)%10]);
  159.         SendCharToSerialPort(Array[val%10]);
  160.         SendCharToSerialPort('.');
  161.         if(point)
  162.                 SendCharToSerialPort('5');
  163.         else
  164.                 SendCharToSerialPort('0');
  165.         SendCharToSerialPort(' ');
  166.         SendCharToSerialPort('C');
  167.         SendCharToSerialPort('\r');       
  168. }

  170. void SetTemperatureLimit(uchar HI,uchar LO)
  171. {
  172.         command_data[4] = HI;
  173.         command_data[5]        = 0;
  174.         command_data[7] = LO;
  175.         command_data[8] = 0;
  176.         SendData(0x90,3,5);
  177.         DelayMS(10);
  178.         SendData(0x90,6,8);       
  179. }

  181. void StartConversion()
  182. {
  183.         SendData(0x90,2,2);
  184.         DelayMS(750);
  185. }

  187. uchar ReadTemp()
  188. {
  189.         uchar d;
  190.         SendData(0x90,9,9);
  191.         Master(0x91);
  192.         d = RecvByte(0);
  193.         point = RecvByte(1)>>7;
  194.         SendStop();
  195.         return d;
  196. }

  198. void WriteConfig(uchar c)
  199. {
  200.         command_data[1] = c;
  201.         SendData(0x90,0,1);               
  202. }

  204. void main()
  205. {
  206.         uchar i;
  207.            InitialiseSerialPort();
  208.         while(Prompt[i]!='\0')
  209.                 SendCharToSerialPort(Prompt[i++]);
  210.         WriteConfig(0x02);
  211.         StartConversion();
  212.         SetTemperatureLimit(40,35);
  213.         while(1)
  214.         {
  215.                  DelayMS(50);
  216.                 SendTemperatureToSerialPort(ReadTemp());
  217.         }       
  218. }
復(fù)制代碼

所有資料51hei提供下載:
溫度傳感器實(shí)驗(yàn)（DS1621）.rar (40.67 KB, 下載次數(shù): 78)


作者: cj6    時(shí)間: 2019-6-5 11:35
protues 沒(méi)有大圖嗎
作者: zzjay    時(shí)間: 2019-7-1 13:16
仿真全打不開(kāi)

作者: 18224630007    時(shí)間: 2019-7-1 15:06
學(xué)習(xí)~感謝樓主~



歡迎光臨 (http://www.torrancerestoration.com/bbs/) Powered by Discuz! X3.1