龙宝来了 2023-09-10 21:43 采纳率: 100%
浏览 21
已结题

求一个KST-51单片机可以实现超声波测距控制LED灯的亮灭

咱们网站有好几个类似的代码,但是烧录到KST-51单片机上不能实现目标,

  • 写回答

11条回答 默认 最新

  • yy64ll826 2023-09-12 11:25
    关注

    51单片机利用超声波测距离控制led灯的亮与灭

    #include"reg52.h"
    #include<intrins.h>
    sbit D5=P3^7;
    sbit D6=P3^6;
    sbit Trig=P2^2;
    sbit Echo=P2^3;
    
    void Delay10us()        //@11.0592MHz
    {
        unsigned char i;
    
        i = 2;
        while (--i);
    }
    void Delay300ms()        //@11.0592MHz
    {
        unsigned char i, j, k;
    
        _nop_();
        i = 3;
        j = 26;
        k = 223;
        do
        {
            do
            {
                while (--k);
            } while (--j);
        } while (--i);
    }
    
    void startHC()//开始条件,给Trig一个10us的高电平,让传感器启动
    {
        Trig=0;
        Trig=1;
        Delay10us();
        Trig=0;
    
    }
    void Timer0Init()        //500微秒@11.0592MHz
    {
        TMOD &= 0xF0;        //设置定时器模式为16位
        TMOD |= 0x01;
        TL0 = 0x00;        //设置低八位定时初值
        TH0 = 0x00;        //设置高八位定时初值
        
    }
    
    void main()
    {
        double time;
        double dis;
        Timer0Init();
        while(1)
        {
            
            Delay300ms();//让硬件稳定
            Timer0Init();//每次都初始化低八位与高八位的值
          startHC();
          while(Echo==0);//Echo由低电平变为高电平时,结束循环,硬件开发送波
            TR0 = 1;//开启计数器计数模式
          while(Echo==1);//Echo由高电平变为低电平时,结束循环,表明硬件接受到返回波
            TR0 = 0;//关闭计数器计数模式
            time=(TH0 * 256 + TL0)*1.085;//计算次数,乘以一次的时间1.085us,得到来回的总时间
            dis=0.034 * time/2; //速度是340m/s=0.034cm/us
        if(dis<10.00)//距离小于10,D5灯亮,D6灯灭
            {
            D5=0;
            D6=1;
          }
        else距离大于10,D6灯亮,D5灯灭
        {
            D5=1;
            D6=0;
        }
    
     }
    
    }
    
    
    
    本回答被题主选为最佳回答 , 对您是否有帮助呢?
    评论
查看更多回答(10条)

报告相同问题?

问题事件

  • 系统已结题 9月20日
  • 已采纳回答 9月12日
  • 赞助了问题酬金15元 9月10日
  • 创建了问题 9月10日

悬赏问题

  • ¥15 soildworks装配体的尺寸问题
  • ¥100 有偿寻云闪付SDK转URL技术
  • ¥30 基于信创PC发布的QT应用如何跨用户启动后输入中文
  • ¥20 非root手机,如何精准控制手机流量消耗的大小,如20M
  • ¥15 远程安装一下vasp
  • ¥15 自己做的代码上传图片时,报错
  • ¥15 Lingo线性规划模型怎么搭建
  • ¥15 关于#python#的问题,请各位专家解答!区间型正向化
  • ¥15 unity从3D升级到urp管线,打包ab包后,材质全部变紫色
  • ¥50 comsol温度场仿真无法模拟微米级激光光斑