奇思妙想了很久，终于在一天临睡觉前那一秒来了灵感，特殊探测头解决了，实现几乎0电压检测，不用传统的高频高压，源代码上传，探测仪的探测头不方便说了，后面还会加颜色识别仪，用来配合探头作比较处理。功能基本上能用于生产线了，2018年最后的单片 狂想曲。
制作出来的实物图如下：
单片机源程序如下:
- void main()
- {
- uchar j;
- LCD12864_Init();
- Delay1s(1);
-
- for(j=1;j>0;j-- )
- {
- LCD12864_WPoss(0,0,"全智能接头测试仪");//第1行显示表1 ≈≈∝≠
- LCD12864_WPoss(1,1,"");//第1行显示表1 ≈≈∝≠
- LCD12864_WPoss(2,0," ");//第1行显示表1 ≈≈∝≠
- LCD12864_WPoss(3,0,"苏州宝兴电线电缆");//第1行显示表1 ≈≈∝≠
- Delay1s(5);
- LCD12864_WPoss(0,0," ");//第1行显示表1 ≈≈∝≠
- LCD12864_WPoss(1,0," ");//第1行显示表1 ≈≈∝≠
- LCD12864_WPoss(2,0," ");//第1行显示表1 ≈≈∝≠
- LCD12864_WPoss(3,0," ");//第1行显示表1 ≈≈∝≠
- Delay1s(1);
- LCD12864_WPoss(0,0,"");//第1行显示表1 ≈≈∝≠
- LCD12864_WPoss(1,1,"启动检测中--");//第1行显示表1 ≈≈∝≠
- LCD12864_WPoss(2,2,"");//第1行显示表1 ≈≈∝≠
- LCD12864_WPoss(3,0,"");//第1行显示表1 ≈≈∝≠
- Delay1s(9);
- LCD12864_WPoss(0,0," ");//第1行显示表1 ≈≈∝≠
- LCD12864_WPoss(1,0," ");//第1行显示表1 ≈≈∝≠
- LCD12864_WPoss(2,0," ");//第1行显示表1 ≈≈∝≠
- LCD12864_WPoss(3,0," ");//第1行显示表1 ≈≈∝≠
- Delay1s(1);
- }
- Disp_img(logo); //显示一幅画面
- Delay1s(20);
- LCD12864_Init(); //再次初始化用于返回
- Delay1s(1);
- LCD12864_WPoss(0,2,"检测启动");//第1行显示表1
- Delay1s(1);
- LCD12864_WPoss(3,2,"报警复位");//第1行显示表1
- bb=1;//关一下声音
- stop=1; //停机信号
- cls=1;//计量清除
- pcls=1;//报警清除
-
- Delay1s(1);
-
- HH = IapReadByte(0x00);//开机时从EEPROM中读取H高8位参数
- HL = IapReadByte(0x01);//开机时从EEPROM中读取H的低8位参数
- H=HH*256+HL;//读出温度上限值
-
-
- LH = IapReadByte(0x02);//开机时从EEPROM中读取L高8位参数
- LL = IapReadByte(0x03);//开机时从EEPROM中读取L的低8位参数
- L=LH*256+LL;//读出温度下限值
-
-
- while(1)
- {
-
- keyscan();//矩阵报警轮检测
-
- display1(H);//显示报警接头数量
-
-
- }
- }
- ……………………
- …………限于本文篇幅 余下代码请从51黑下载附件…………
所有资料51hei提供下载:
128显STC12电线接头检测仪OK1.zip
(56.89 KB, 下载次数: 13)
|
