單片機論壇

 找回密碼
 立即注冊

QQ登錄

只需一步,快速開始

搜索
查看: 933|回復: 1
打印 上一主題 下一主題
收起左側

韩国足球曼联: 基于單片機金屬探測器Proteus仿真+程序

[復制鏈接]
跳轉到指定樓層
樓主
基于單片機金屬探測仿真原理圖如下(proteus仿真工程文件可到本帖附件中下載)


單片機源程序如下:
  1. #include<reg51.h>
  2. //**************端口定義*******************
  3. sbit k1 = P1^0; //傳感器
  4. sbit buzeer = P3^6; //聲光報警
  5. //**************變量定義*******************
  6. char temp1 = 0;
  7. /*******************定時器T0初始化********************/
  8. void T0_init()
  9. {
  10.           TMOD = TMOD | 0x01; //設T0為方式1
  11.           TH0 = (65535-50000)/256; //計數50000個
  12.           TL0 = (65535-50000)%256;
  13.           EA = 1; //開啟總中斷         
  14.           ET0 = 1; //允許T0中斷
  15.           //TR0 = 1; //啟動
  16. }
  17. //**************主函數*********************
  18. void main()
  19. {
  20.   T0_init(); //定時器0初始化
  21.   P0 = 0xff; //關閉指示燈
  22.   while(1)
  23.   {
  24.         if(k1 == 0) //檢測單金屬  
  25.                 {
  26.                    TR0 = 1;
  27.                 }  
  28.                 else //沒有檢測單金屬
  29.                 {
  30.                    TR0 = 0;
  31.                    P0 = 0xff; //關閉指示燈
  32.                    buzeer = 1; //關閉蜂鳴器
  33.                 }
  34.   }
  35. }
  36. /**************************定時器T0中斷服務函數************************************/
  37. void T0_time() interrupt 1   
  38. {
  39.       TH0 = (65535-50000)/256; //計數50000個
  40.           TL0 = (65535-50000)%256;
  41.           temp1 += 1;
  42.           if(temp1 >= 20)
  43.           {
  44.              temp1 = 0;
  45.                  buzeer = ~buzeer;
  46.              P0 = ~P0;
  47.           }
  48. }
復制代碼

所有資料51hei提供下載:
基于單片機金屬探測.rar (172.56 KB, 下載次數: 42)


評分

參與人數 1黑幣 +50 收起 理由
admin + 50 共享資料的黑幣獎勵!

查看全部評分

沙發
pst 發表于 2019-7-18 19:21 | 只看該作者
學習!
您需要登錄后才可以回帖 登錄 | 立即注冊

本版積分規則

QQ|手機版|小黑屋|單片機論壇 |51黑電子論壇單片機 聯系QQ:125739409;技術交流QQ群582644647

Powered by 曼联vs曼城

快速回復 曼联vs曼城 返回列表