找回密碼
 立即注冊(cè)

QQ登錄

只需一步，快速開始

搜索
查看: 1659|回復(fù): 0
打印 上一主題 下一主題
收起左側(cè)

尋軌車，利用紅外模塊

[復(fù)制鏈接]
跳轉(zhuǎn)到指定樓層
樓主
ID:370916 發(fā)表于 2018-7-13 20:02 | 只看該作者 回帖獎(jiǎng)勵(lì) |倒序?yàn)g覽 |閱讀模式
程序簡(jiǎn)單，清晰易懂供給大家研究。

單片機(jī)源程序如下:
  1. #include <reg52.h>
  2. #define uchar unsigned char
  3. #define uint unsigned int
  4. sbit in1=P1^0;
  5. sbit in2=P1^2;
  6. uint a,b;
  7. void ys(uint z)                         //延時(shí)
  8. {
  9.         uint x,y;
  10.         for(z=x;x>0;x--)
  11.         for(y=110;y>0;y--);
  12. }

  14. void main()
  15. {
  16.         P1=0xff;                 //賦初值
  17.         P2=0x00;           //賦初值
  18.         while(1)//           循環(huán)檢測(cè)
  19.         {
  20.                                 
  21.                
  22.                 while(in1==0)        ////車子右偏，讓左邊減速
  23.                 {                        
  24.                         P2=0x00;
  25.                         P2=0x00;
  26.                         P2=0x00;
  27.                         P2=0x00;
  28.                         P2=0x00;
  29.                         P2=0x00;
  30.                         P2=0x00;
  31.                         P2=0x00;
  32.                         P2=0x00;
  33.                         P2=0x00;
  34.                         
  35.                         P2=0x90;    //發(fā)送的是C，右轉(zhuǎn)指令
  36.                         ys(50);
  37.                 }
  38.                
  39.                 while(in2==0)                //車子左偏，讓右邊減速
  40.                 {

  42.                         P2=0x00;
  43.                         P2=0x00;
  44.                         P2=0x00;
  45.                         P2=0x00;
  46.                         P2=0x00;
  47.                         P2=0x00;
  48.                         P2=0x00;
  49.                         P2=0x00;

  51.                
  52.                         P2=0x60;    //發(fā)送的是D，左轉(zhuǎn)指令
  53.                         ys(50);
  54.                 }

  56.                 P2=0xa0;
  57.                 ys(1000);
  58.                
  59.         }
  60. }

復(fù)制代碼

所有資料51hei提供下載:
實(shí)驗(yàn)13：尋軌車.zip (27.69 KB, 下載次數(shù): 8)


分享到:  QQ好友和群QQ好友和群 QQ空間QQ空間 騰訊微博騰訊微博 騰訊朋友騰訊朋友
收藏收藏 分享淘帖 頂頂 踩踩
回復(fù)

使用道具 舉報(bào)

本版積分規(guī)則

手機(jī)版|小黑屋|51黑電子論壇 |51黑電子論壇6群 QQ 管理員QQ:125739409;技術(shù)交流QQ群281945664

Powered by 單片機(jī)教程網(wǎng)

快速回復(fù) 返回頂部 返回列表