标题: 电涡流传感器实现金属检测 同厚金属板材质分辨单片机源码与仿真 [打印本页]
作者: tianxianyan    时间: 2018-4-8 21:07
标题: 电涡流传感器实现金属检测 同厚金属板材质分辨单片机源码与仿真
用电涡流传感器+51单片机来实现的金属检测原件清单：


同厚金属板材质分辨的proteus仿真原理图如下（proteus仿真工程文件可到本帖附件中下载）


单片机源程序如下:
  1. #include <STC15F2K60S2.H>
  2. #include <ADC.h>
  3. #include <math.h>
  4. #define IRON         93
  5. #define        COPPER        86
  6. #define ALUM        84
  7. sbit get_init=P0^0;
  8. sbit switch_mode=P0^1;
  9. sbit resolution=P0^2;
  10. //数码管变量区
  11. unsigned char code Table[]={
  12. 0x3f,0x06,0x5b,0x4f,
  13. 0x66,0x6d,0x7d,0x07,
  14. 0x7f,0x6f,0x77,0x7c,
  15. 0x39,0x5e,0x79,0x71};
  16. unsigned char code Wei_Table[]={
  17. 0xef,0xdf,0xbf,0x7f};
  18. unsigned char Screen_Table[4],wei;

  20. unsigned char number=0;        //物质编号
  21. unsigned char standard,current,texture;
  22. void Delay50ms()                //@11.0592MHz
  23. {
  24.         unsigned char i, j, k;

  26.         _nop_();
  27.         _nop_();
  28.         i = 3;
  29.         j = 26;
  30.         k = 223;
  31.         do
  32.         {
  33.                 do
  34.                 {
  35.                         while (--k);
  36.                 } while (--j);
  37.         } while (--i);
  38. }
  39. void Timer0Init(void)                //2毫秒@11.0592MHz
  40. {
  41.         AUXR &= 0x7F;                //定时器时钟12T模式
  42.         TMOD &= 0xF0;                //设置定时器模式
  43.         TL0 = 0xCD;                //设置定时初值
  44.         TH0 = 0xF8;                //设置定时初值
  45.         TF0 = 0;                //清除TF0标志
  46.         TR0 = 1;                //定时器0开始计时
  47.         ET0 = 1;
  48.         EA  = 1;
  49. }

  51. void main()
  52. {
  53.         ADC_Init();
  54.         Timer0Init();
  55.         Screen_Table[0]=0;
  56.         P2M1=0x00;
  57.         P2M0=0xff;
  58.         while(1)
  59.         {
  60.                 if(get_init==0)                                   //获取无介质时初始值
  61.                 {
  62.                         standard=GetADC(0);
  63.                         P31=0;                                        //获取成功标志
  64.                 }
  65.                 if(resolution==0)                        //获取介质值并运算
  66.                 {
  67.                         current=GetADC(0);
  68.                         texture=(unsigned char)(((float)current*100/standard));
  69.                         if(texture>90)
  70.                                 Screen_Table[1]=Screen_Table[0];
  71.                         else if(texture>85)       
  72.                                 Screen_Table[2]=Screen_Table[0];
  73.                         else if(texture>80)       
  74.                                 Screen_Table[3]=Screen_Table[0];
  75.                 }
  76.                 if(switch_mode==0)                         //设置被检测物体编号
  77.                 {
  78.                         Delay50ms();
  79.                         if(switch_mode==0)
  80.                         {
  81.                                 Screen_Table[0]=number;
  82.                                 number++;
  83.                                 if(number==4)
  84.                                         number=0;
  85.                                 while(switch_mode==0);
  86.                                 Delay50ms();
  87.                                 while(switch_mode==0);
  88.                         }
  89.                 }                                       
  90.         }
  91. }
  92. ……………………

  94. …………限于本文篇幅 余下代码请从51黑下载附件…………
复制代码

所有资料51hei提供下载:
金属材质检测-.zip (93.16 KB, 下载次数: 96)


作者: admin327    时间: 2019-5-30 21:07
这个用的全部电路图在哪里
作者: admin327    时间: 2019-5-30 21:08
求大神解答一下啊
作者: yyzf998    时间: 2020-6-3 16:30
不错的思路。好好学习了，谢谢楼主！



欢迎光临 (http://www.51hei.com/bbs/) Powered by Discuz! X3.1