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

QQ登錄

只需一步,快速開(kāi)始

搜索
查看: 4179|回復(fù): 2
收起左側(cè)

單片機(jī)+PT100熱敏電阻測(cè)溫仿真程序小改進(jìn)

[復(fù)制鏈接]
ID:753618 發(fā)表于 2020-5-25 15:48 | 顯示全部樓層 |閱讀模式
初學(xué)者搞不清楚ADC轉(zhuǎn)換步驟設(shè)置,我把每一步的控制字做了注釋,同時(shí)把初始數(shù)組和初始值做了優(yōu)化,希望能夠幫助到列位黑友

仿真原理圖如下(proteus仿真工程文件可到本帖附件中下載)
51hei.png

單片機(jī)源程序如下:
  1. #include <reg51.h>
  2. #define Data0 P0
  3. #define Data2 P2
  4. sbit rdad = P3^7;          //IO口定義
  5. sbit wrad = P3^6;
  6. sbit csad = P3^4;
  7. sbit  DIN = P0^7;       //LED小數(shù)點(diǎn)控制
  8. unsigned char j,k,ad_data,t;
  9. unsigned char dis[4]={0x00,0x00,0x00,0x00};   //給dis[4]賦初值
  10. unsigned char code dis_7[10]={0x3f,0x06,0x5b,0x4f,0x66,0x6d,0x7d,0x07,0x7f,0x6f};
  11. unsigned char code bit_scan[4]={0xfe,0xfd,0xfb,0xf7};      // 位掃描控制字,有些程序?yàn)?xf0,與邏輯不符   
  12. /*************************************************
  13. 函數(shù)功能:軟件消抖延時(shí)(約11ms)
  14. **************************************************/
  15. void Delay(unsigned int t)  
  16. {  
  17.   for(;t>0;t--)
  18.   {
  19.     ;
  20.   }  
  21. }   
  22. /*************************************************
  23. 函數(shù)功能:四位數(shù)碼管掃描控制
  24. **************************************************/
  25. void scan()                     
  26. {  
  27.     char k;      
  28.     for(k=0;k<4;k++)     
  29.     {        
  30.         Data0 = dis_7[dis[k]];     //給P0口段碼賦初值[0000]   
  31.             if(k==1)
  32.            {
  33.                    DIN=1;                           //點(diǎn)亮小數(shù)點(diǎn)位
  34.                }        
  35.             Data2=bit_scan[k];         //P2口位碼動(dòng)態(tài)掃描
  36.             Delay(50);
  37.             Data2=0xff;                //全不亮(因?yàn)槭枪碴帢O接法)   
  38.     }   
  39. }
  40. /*************************************************
  41. 函數(shù)功能:讀取ADC0804
  42. **************************************************/
  43. void adc0804()
  44. {
  45.       P1 = 0xff;              //讀取P1口之前先給其全寫(xiě)1
  46.     csad = 0;               //選通ADC
  47.     rdad = 0;               //ADC讀使能
  48.     ad_data = P1;                    //把P1口數(shù)據(jù)數(shù)據(jù)傳給ad_data
  49.     rdad = 1;               //ADC停止讀           (以上三行為ADC讀取P1口數(shù)據(jù))
  50.     csad = 1;               //關(guān)閉ADC片選ˋDC處于鎖存狀態(tài))
  51.     wrad = 0;               //啟動(dòng)ADC輸出到單片機(jī)
  52. }
  53. /*************************************************
  54. 函數(shù)功能: 顯示數(shù)值計(jì)算, u=2.55+T/100, 2.55反映在ADC上為0x83
  55. **************************************************/
  56. void ad_compute()      
  57. {
  58.     unsigned char temp;
  59.     ad_data=ad_data-0x83;
  60.     temp=ad_data*2-4;
  61.         if(temp<=200)
  62.         {
  63.        dis[3]=temp/100;
  64.            dis[2]=temp/10-dis[3]*10;
  65.            dis[1]=temp%10;
  66.            dis[0]=t%5*2;
  67.         }
  68.         else
  69.         {
  70.            temp=256-temp;
  71.        dis[3]=11;
  72.        dis[2]=temp/10;
  73.        dis[1]=temp%10;
  74.        dis[0]=t%5*2;
  75.         }
  76. }
  77. ……………………

  78. …………限于本文篇幅 余下代碼請(qǐng)從51黑下載附件…………
復(fù)制代碼
51hei.png

所有資料51hei提供下載:
PT100電阻溫度計(jì)程序設(shè)計(jì)與仿真.zip (203.14 KB, 下載次數(shù): 79)

評(píng)分

參與人數(shù) 1黑幣 +50 收起 理由
admin + 50 共享資料的黑幣獎(jiǎng)勵(lì)!

查看全部評(píng)分

回復(fù)

使用道具 舉報(bào)

ID:709719 發(fā)表于 2020-5-29 17:02 | 顯示全部樓層
PT100電阻溫度計(jì)程序設(shè)計(jì)與仿真.zip
回復(fù)

使用道具 舉報(bào)

ID:764636 發(fā)表于 2020-5-30 12:37 來(lái)自手機(jī) | 顯示全部樓層
有圖和代碼嗎?
回復(fù)

使用道具 舉報(bào)

本版積分規(guī)則

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

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

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