基于STC15F104E的白光控制器

goodcode

谢谢 bin 的资料 看样参考n型热电偶是没错的
目前测试放大电路和ad部分是能用的 后面打算输出T12的加热时间与温度的曲线看看

测试用的国产头 感觉国产头目前最大的问题就是尾部热, 也就是冷端热,

bin

我很久之前用4位半台式表加上原装白光191测温仪用最最原始的方法来测过t12的热电偶分度值，直接加24v,他的实际分度值要和N型的要低很多。记忆中烙铁头(K头)450度时的热电偶电压(尾端直测)才十几mv,太久了资料不知丢那里去了，公司有原装942,951二十几台，(以后估计还会再采购,目前不怎么够用了)那天有空将他拆了用示波器看看他的加热时间和检测时间和频率,可惜公司没有逻辑分析仪，只有泰克和普源示波器

goodcode

我很久之前用4位半台式表加上原装白光191测温仪用最最原始的方法来测过t12的热电偶分度值，直接加24v,他的实 ...
bin 发表于 2012-3-19 09:12 https://www.yleee.com.cn/images/common/back.gif

   

goodcode

有一阵子没弄了 洞洞板上都是灰了


更新电路图 这个电路图是可以用的了 驱动部分也测试过
主要修改R2,C3的位置, 之前的电路图会导致C3泄放慢最后就...

Protel Schematic.pdf (22.31 KB, 下载次数: 1037)

2012-3-28 22:18 上传

点击文件名下载附件

从室温到恒温到放水里




主要测试代码

1. #include<STC15F104E_PLUS.H>
   
2. #include <stdio.h>
   
3. #include <intrins.h>
   
4. #include "main.h"
   
5. #include "delay.h"
   
6. #include "uart.h"
   
7. 
   
8. //定义串转并端口可位寻址
   
9. UCHAR bdata PORT1, PORT2;
   
10. sbit RA1=P3^3; //电容充放电
    
11. sbit RA0=P3^2; //比较器电平
    
12. sbit LED=P3^4;
    
13. sbit CTRL=P3^5; //T12加热控制
    
14. bit ADCResultOk;
    
15. unsigned int ADCResult;
    
16. 
    
17. void main (void)
    
18. {
    
19.         //char buf[32];
    
20. 
    
21.         //将T12口设置为推挽输出 最高输出20ma 否则需要上拉电阻
    
22.         P3M1 = P3M1 & 0x1F;
    
23.         P3M0 = P3M0 | 0x20;
    
24.         CTRL = 0;
    
25. 
    
26.     //串口初始化
    
27.     UartInit();
    
28.         ADC_init();                                           //初始化AD相关 定时器1
    
29.     EA = 1;
    
30. 
    
31.     while(1)
    
32.     {
    
33.                
    
34.                 //UART_SendString( "ReadAd\r\n");
    
35.                 CTRL = 0; //关闭加热
    
36.                 LED = 1;
    
37.                 delayms( 5);
    
38.                 do
    
39.                 {
    
40.                         GetADCResult();
    
41.                         if (ADCResult <= 0x7FFF)
    
42.                         {
    
43.                                 UART_SendByte(0xff);
    
44.                                 UART_SendBuf( &ADCResult, 2);
    
45.                                 UART_SendByte(0xff);
    
46.                                 break;
    
47.                         }
    
48.                         else
    
49.                         {
    
50.                                 delayms( 5);
    
51.                         }
    
52.                 }
    
53.                 while ( 1 );  //超过设定温度
    
54.             //sprintf(buf," %u\r\n",ADCResult);
    
55.                 //UART_SendString( buf);
    
56. 
    
57.                 //LED = ~LED;;
    
58.                 LED = 0;
    
59.                 CTRL = 1;  //开始加热
    
60.                 delayms( 200);          
    
61.     }
    
62. }
    
63. 
    
64. void ADC_init(unsigned char mode)
    
65. {
    
66.         /*功能: 初始化AD相关*/
    
67.         RA1 = 1; //电容放电
    
68. 
    
69.         TMOD |= 0x10; //定时器1 计数模式 工作模式1
    
70.         AUXR = AUXR | 0x40; //设置定时器1 工作在1T模式
    
71.         TR1=0;          //关闭计时器
    
72.         ET1 = 0; //不允许中断
    
73. 
    
74.         //将电容放电口设置为推挽输出 最高输出20ma 否则需要上拉电阻
    
75.         P3M1 = P3M1 & 0x30;
    
76.         P3M0 = P3M0 | 0x08;
    
77. 
    
78.         //中断模式
    
79.         if (mode)
    
80.         {
    
81.                 IT0 = 0;                          //设置 INT0 的中断触发方式 (1:Falling only 0:Rising & Falling)
    
82.                 //使用串口测试时忽略
    
83.                 PX0 = 1;                                                   //高中断优先级
    
84.                 EX0 = 1;                          //允许INT0 中断
    
85.         }       
    
86. }
    
87. 
    
88. void GetADCResult(void)
    
89. {
    
90.         /*
    
91.         功能:
    
92.         读取ADC并返回结果 模式 检测端口电平
    
93.         通过LM258比较器实现AD
    
94.         定时器溢出时间计算 单位ms 设系统时钟 SYSclk = 22118400
    
95.         1T模式
    
96.         1000/(22118400/65536)          = 2.96
    
97.         12T模式
    
98.         1000/(22118400/12/65536)  = 35.55
    
99.         Multisim 仿真结果
    
100.         103 充电到2.5v 约0.952ms  T1下更高速度
     
101.         223 充电到2.5v 约2.104ms  T1下更高精度
     
102.         104 充电到2.5v 约9.947ms  T12模式
     
103.         */
     
104. 
     
105.         //检测基准电压
     
106.         EA = 0;   //关闭全部中断
     
107. 
     
108.         TF1=0;    //清溢出位
     
109.         TH1=0x0;  //给定初值
     
110.         TL1=0x0;
     
111.         RA1 = 0; //电容充电
     
112.         TR1=1; //开始计数
     
113.         //等待电容电压与基准电压相同或者定时器溢出
     
114.         while(!RA0 && !TF1);
     
115. 
     
116.         TR1=0;          //关闭计时器
     
117.         EA = 1;   //开启全部中断
     
118.         RA1 = 1; //电容放电
     
119. 
     
120.         ADCResult = ((unsigned int)TH1 << 8) | TL1;
     
121.         if (TF1)
     
122.         {
     
123.                 //定时器溢出 基准电压太高? 电容充电电压太低? 电容太大?
     
124.                 ADCResult = 0xfffe;
     
125.         }
     
126.         delayms( 2); //等待电容放电完成 如果不是连续调用可以注释掉
     
127. 
     
128.         //放电延迟 数值范围
     
129.         //1ms 4
     
130.         //2ms 5
     
131.         //3ms 6
     
132.         //5ms 7
     
133.         //20ms 9
     
134.         //100ms 7
     
135. 
     
136.         //输入电压=参考电压*输入电压计时器值/参考电压计时器值
     
137.         //V1=Vref*T2/T1
     
138. }
     

复制代码

目前来看效率可能还不如模拟控制板

zhyzsn

又有得玩了！不知道我还有没有STC15F104E

goodcode

玩具版 电路图,固件,上位机程序


T12Ctrl.rar (265.32 KB, 下载次数: 1038)

2012-3-30 19:35 上传

点击文件名下载附件

控制板每加热500ms向串口发送一次数据

调零方法: 在T12常温时 点设置后看日志AD: xxx 这个值在最小的时候为调零值
ad对应电压: 为每ad值对应的电压值 需要先设置好调零值 T12放入开水 并且设置正确水温和冷端温度 点设置后看日志
----> SetMode AD: 347 对应电压: xxxxuv
这里对应电压值就是ad对应电压
设置完毕后点开始加热就可以使用了

可以看到每加热500ms的温度增量

在不增加硬件的情况下好像也就只能这么校正数值了

nickelzhang

大哥，请教一下，为啥要设计电容放电，第二级直接做跟随不行嘛？

goodcode

104e没ad的 电容充放电完成ad的功能

sbiyou

强大啊！！！

jaychou

学习了，感谢分享！！！