国产免费AV|泡泡玛特欧洲总部将设在伦敦|中文天堂网www新版资源在线|一本久道综合在线中文|国精产品一二三产区的使用方法|香蕉鱼在线观看|www.27eee

ELEOK

標題: 51單片機和pt100測溫度Proteus仿真程序 [打印本頁]

---

作者: coolice    時間: 2020-1-29 23:36
標題: 51單片機和pt100測溫度Proteus仿真程序
LCD1602+AD623+MAX1240+pt100+51單片機
程序及仿真文件 Pt100.zip (784.97 KB, 售價: 5 E幣)

2020-1-29 23:34 上傳

點擊文件名下載附件
售價: 5 E幣  [記錄]  [購買]

1. #include <reg52.h>
   
2. #include <string.h>
   
3. #include <math.h>
   
4. #include "intrins.h"
   
5. 
   
6. #define ROW1 0x80
   
7. #define ROW2 0xC0
   
8. #define Ts_CONST 1                //AD采樣時間系數，采樣時間為0.1xTs_CONST(s)
   
9. 
   
10. #define NOACT 0
    
11. #define FC 1
    
12. #define Start_AD 2
    
13. #define Cal_Temperature 3
    
14. 
    
15. #define Kpt 0.02732644         //AD芯片max1240的采樣值到溫度值的轉化系數
    
16. 
    
17. 
    
18. void LCD_Init(void);
    
19. void ClearDisp(unsigned char Row);
    
20. void Display(unsigned char Addr, unsigned char *pstr);
    
21. void DecToASC(unsigned int Dec,unsigned char *p, unsigned char n);
    
22. void Disp_Initize(void);
    
23. void Write_CMD(unsigned char CMD);
    
24. 
    
25. unsigned int AD_MAX1240(void);
    
26. 
    
27. sbit RS=P2^2;
    
28. sbit RW=P2^1;
    
29. sbit E=P2^0;
    
30. 
    
31. sbit SDA=P1^5;
    
32. sbit SCL=P1^6;
    
33. sbit CS=P1^7;
    
34. 
    
35. sbit Key=P3^5;
    
36. sbit up=P3^6;
    
37. sbit down=P3^7;
    
38. 
    
39. 
    
40. 
    
41. unsigned char DispBuf[16];
    
42. 
    
43. unsigned char RunState=NOACT;
    
44. unsigned int AD_Reslut,tsflag,ts=1;
    
45. 
    
46. 
    
47. float  fz,tmp,tmp1,Pt;
    
48. 
    
49. void delay(unsigned int j)//延時jms
    
50. {
    
51.     unsigned int m,n;
    
52.     for(n=0;n<j;n++)
    
53.       {
    
54.        for(m=0;m<120;m++);
    
55.        }
    
56. }
    
57. 
    
58. 
    
59. void main(void)
    
60. {        LCD_Init();
    
61.         ClearDisp(ROW1);
    
62. 
    
63.         Disp_Initize();
    
64. 
    
65.         CS=1;
    
66.         SDA=1;
    
67.         SCL=0;
    
68. 
    
69.         TMOD=0x11;
    
70.         TF0=0;                //開始程序前先延時65ms，等待max1240上電，以保證AD采樣準確
    
71.                                 
    
72.         TH0=0;
    
73.         TL0=0;
    
74.         TR0=1;
    
75.         while(!TF0);
    
76.         TF0=0;
    
77.         TR0=0;
    
78. 
    
79.         TH0=0x3C;                //12M晶振時延時50ms
    
80.         TL0=0xB0;
    
81.         ET0=1;
    
82.         TR0=1;
    
83. 
    
84.         EX1=1;
    
85.         IT1=1;
    
86. 
    
87.         EA=1;
    
88. 
    
89.         while(1)
    
90.                 switch(RunState)
    
91.                 {        case NOACT:
    
92.                                 break;
    
93.                         case FC:        //F0計算及顯示
    
94.                                 fz=pow(10,(tmp-121.0000)/10);
    
95.                                 DecToASC(fz,DispBuf,1);
    
96.                                 DispBuf[1]='.';
    
97.                                 DecToASC((fz-(unsigned int)fz)*1000,DispBuf+2,3);
    
98.                                 DispBuf[5]='\0';
    
99.                                 Display(0x80+11,DispBuf);
    
100.                                        
     
101.                                 
     
102. 
     
103.                                 RunState=NOACT;
     
104.                                 break;
     
105.                         case Start_AD:                          //開始AD采樣
     
106. 
     
107.                                 AD_Reslut=AD_MAX1240();
     
108. 
     
109.                                 RunState=Cal_Temperature;
     
110.                                 break;
     
111.                         case Cal_Temperature:                                     //將AD值轉化為溫度并進行線性化
     
112.                         {
     
113.                                 
     
114.                                 Pt=AD_Reslut*Kpt;
     
115.                                 Pt+=100;          //溫度值
     
116.                                        
     
117. 
     
118.                                 tmp=Pt/100;
     
119.                                 tmp=1-tmp;
     
120.                                 tmp=2.31e-6L*tmp;
     
121.                                 tmp+=1.527480889e-5L;
     
122.                                 tmp=sqrt(tmp);
     
123.                                 tmp+=-3.9083e-3L;
     
124.                                 tmp/=-1.155e-6L;//AD采樣值線性化修正
     
125.                                 tmp1=tmp;
     
126.                                 tmp=(tmp+tmp1)/2;//取平均溫度
     
127.                                 tmp=((float)((unsigned int)(tmp*10)))/10 ;
     
128. 
     
129.                                 DecToASC(tmp,DispBuf,3);
     
130.                                 DispBuf[3]='.';
     
131.                                 DecToASC((tmp-(unsigned int)tmp)*10,DispBuf+4,1);
     
132.                                 DispBuf[5]='\0';
     
133.                                 Display(0xC0+2,DispBuf); //顯示函數
     
134.                           }
     
135.         
     
136.                                 RunState=NOACT;
     
137.                                 break;
     
138.                 }
     
139. }
     
140. /*******************************************************************************/
     
141. unsigned int AD_MAX1240(void)        //讀取AD，AD芯片為串口數據形式
     
142. {        unsigned int adtmp=0;        
     
143.         unsigned char i;
     
144. 
     
145.         CS=0;
     
146.         while(!SDA);
     
147. 
     
148.         SCL=1;
     
149.         adtmp<<=1;
     
150.         SCL=0;
     
151. 
     
152.         for(i=0;i<12;i++)
     
153.         {        SCL=1;
     
154.                 adtmp<<=1;
     
155.                 if(SDA==1)adtmp++;
     
156.                 SCL=0;
     
157.         }
     
158. 
     
159.         CS=1;
     
160. 
     
161.         return adtmp;
     
162. }
     
163. /*******************************************************************************/
     
164. void Disp_Initize(void)                                //LCD初始化，將Ts，F0，t等提示字符顯示在屏幕上
     
165. {        //unsigned char *p;
     
166. 
     
167.         
     
168.         
     
169.         DispBuf[0]='T';        
     
170.         DispBuf[1]='s';
     
171.         DispBuf[2]='=';
     
172.         DecToASC(ts,DispBuf+3,2);
     
173.         DispBuf[5]='s';
     
174.         
     
175.         DispBuf[8]='f' ;
     
176.         DispBuf[9]='0'        ;
     
177.         DispBuf[10]='='        ;
     
178.         DispBuf[16]='\0';
     
179.         Display(0x80,DispBuf);
     
180.         DispBuf[0]='t';
     
181.         DispBuf[1]='=';
     
182.         DispBuf[2]='\0';
     
183.         Display(0xc0,DispBuf);
     
184. }
     
185. /*******************************************************************************/
     
186. void INT1_ISR(void) interrupt 2                          //切換采樣時間的中斷函數，用于開關量識別和改變Ts（采樣時間）
     
187. {        
     
188.         EA=0;
     
189.         TR0=0;
     
190.         ET0=0;
     
191.         strcpy(DispBuf,"     ");
     
192.         Display(0x80+11,DispBuf);
     
193. 
     
194.         while(1)
     
195.         {
     
196.                
     
197.                 if(up==0)
     
198.                 {
     
199.                         delay(100);
     
200.                         if(up==0)
     
201.                         ts++;
     
202. 
     
203.                 }
     
204. 
     
205.                
     
206.                 if(down==0)
     
207.                
     
208.                 {   delay(100);
     
209.                         if(down==0)
     
210.                         ts--;
     
211.                 }
     
212.                
     
213.                 if(ts>60)
     
214.                 ts=1;                        
     
215.                 if(ts<=0)
     
216.                 ts=60;
     
217.                 DecToASC(ts,DispBuf,2);
     
218.                 DispBuf[2]='s';
     
219.                 DispBuf[3]='\0';
     
220.                 Display(0x80+3,DispBuf);
     
221.                 if(Key==0)
     
222.                 break;
     
223. 
     
224.         }
     
225.         EA=1;
     
226.         TR0=1;
     
227.         ET0=1;
     
228.         
     
229. }
     
230. /*******************************************************************************/
     
231. void T0_ISR(void) interrupt 1         //定時中斷程序
     
232. {        static unsigned char T0_CNT=Ts_CONST;
     
233.         //static bit Flag=0;
     
234. 
     
235.         TH0=0x3C;
     
236.         TL0=0xB0;
     
237. 
     
238.         //Flag=!Flag;
     
239. 
     
240.         //if(Flag)return;
     
241. 
     
242.         T0_CNT--;
     
243.         tsflag++;
     
244. 
     
245.         if(!T0_CNT)
     
246.         {        T0_CNT=Ts_CONST;
     
247.                 RunState=Start_AD; //AD采樣
     
248.         }
     
249.         if(tsflag>=ts*20)
     
250.         {
     
251.                 tsflag=0;
     
252.                 RunState =FC;           //Ts到時進行F0值運算
     
253. 
     
254. 
     
255.         }
     
256. }
     
257. /*******************************************************************************/
     
258. void DecToASC(unsigned int Dec,unsigned char *p, unsigned char n)        //將Dec變量編程可以在1602上直接顯示的ASICII值
     
259. {        unsigned char i;
     
260. 
     
261.         p+=n;
     
262.         p--;
     
263. 
     
264.         for(i=0;i<n;i++)
     
265.         {        *p=Dec%10+0x30;
     
266.                 p--;
     
267.                 Dec/=10;
     
268.         }
     
269. }
     
270. /*LCD顯示*******************************************************************************/
     
271. void Check_Busy(void)
     
272. {//        return;
     
273.         do
     
274.         {        P0=0xFF;
     
275.                 E=0;
     
276.                 RS=0;
     
277.                 RW=1;
     
278.                 E=1;
     
279. 
     
280.                 _nop_();
     
281.         }while(P0&0x80);
     
282. 
     
283.         E=0;
     
284. }
     
285. /*******************************************************************************/
     
286. void Write_CMD(unsigned char CMD)
     
287. {        
     
288.         Check_Busy();
     
289.         E=0;
     
290.         RS=0;
     
291.         RW=0;
     
292.         P0=CMD;
     
293.         E=1;
     
294.         _nop_();
     
295.         E=0;
     
296. }
     
297. /*******************************************************************************/
     
298. void Write_Data(unsigned char Data)
     
299. {
     
300.         Check_Busy();
     
301.         E=0;
     
302.         RS=1;
     
303.         RW=0;
     
304.         P0=Data;
     
305.         E=1;
     
306.         _nop_();
     
307.         E=0;
     
308. }
     
309. /*******************************************************************************/
     
310. void LCD_Init(void)
     
311. {
     
312.         Write_CMD(0x38);
     
313.         Write_CMD(0x0C);
     
314.         Write_CMD(0x06);
     
315.         Write_CMD(0x01);  //清屏
     
316. }
     
317. /*******************************************************************************/
     
318. void Display(unsigned char Addr, unsigned char *pstr)
     
319. {  
     
320.         Write_CMD(Addr);
     
321.         while(*pstr)
     
322.                 Write_Data(*pstr++);
     
323. }
     
324. /*******************************************************************************/
     
325. void ClearDisp(unsigned char Row)
     
326. {        
     
327.         strcpy(DispBuf,"                ");
     
328. 
     
329.         Display(Row,DispBuf);
     
330. }

復制代碼

---

作者: luolin    時間: 2022-6-25 01:40
作者您好！這個為什么仿真出不來呀

---

作者: coolice    時間: 2022-6-25 17:00

luolin 發表于 2022-6-25 01:40
作者您好！這個為什么仿真出不來呀

仿真沒問題呀。注意不要在壓縮包里點仿真文件，要解壓縮后，進入解壓的目錄里運行仿真文件。

---

歡迎光臨 ELEOK (http://m.afoofa.cn/)

Powered by Discuz! X5.0

感谢您访问我们的网站，您可能还对以下资源感兴趣：

国产免费AV|泡泡玛特欧洲总部将设在伦敦|中文天堂网www新版资源在线|一本久道综合在线中文|国精产品一二三产区的使用方法|香蕉鱼在线观看|www.27eee