标题: 单片机超声波测距仪Proteus7.5仿真程序 数码管显示 [打印本页]

作者: coco25312    时间: 2021-3-31 11:27
标题: 单片机超声波测距仪Proteus7.5仿真程序 数码管显示
采用51单片机+超声波模块
提供了另外一种超声波测速及其程序仿真文件

仿真原理图如下(proteus仿真工程文件可到本帖附件中下载)


超声波模块电路连接
Trig -------  P2^1;
Echo -------  P2^0;
VCC  -------- +5v
GND  -------- GND

void Conut(void)   //距离数据处理函数
        {
         time=TH0*256+TL0;
         TH0=0;
         TL0=0;
        
         S=(time*1.7)/100;     //算出来是CM
         if((S>=700)||flag==1) //超出测量范围显示“-”
         {         
          flag=0;
         
          DisplayOneChar(0, 1, ASCII[11]);
          DisplayOneChar(1, 1, ASCII[10]);        //显示点
          DisplayOneChar(2, 1, ASCII[11]);
          DisplayOneChar(3, 1, ASCII[11]);
          DisplayOneChar(4, 1, ASCII[12]);        //显示M
         }
         else
         {
          disbuff[0]=S%1000/100;
          disbuff[1]=S%1000%100/10;
          disbuff[2]=S%1000%10 %10;
          DisplayOneChar(0, 1, ASCII[disbuff[0]]);
          DisplayOneChar(1, 1, ASCII[10]);        //显示点
          DisplayOneChar(2, 1, ASCII[disbuff[1]]);
          DisplayOneChar(3, 1, ASCII[disbuff[2]]);
          DisplayOneChar(4, 1, ASCII[12]);        //显示M
         }
        }

//中断函数
void zd0() interrupt 1                  //T0中断用来计数器溢出,超过测距范围
  {
    flag=1;                                                         //中断溢出标志
  }


//主函数
void main(void)
{

         TMOD=0x01;                   //设T0为方式1,GATE=1;
         TH0=0;
         TL0=0;         
         ET0=1;             //允许T0中断
         EA=1;                           //开启总中断        

        InitLcd1602();
        LcdShowStr(0,0,PuZh);
        while(1)
        {
                 StartModule();
             while(!Echo);                //当RX为零时等待
             TR0=1;                            //开启计数
             while(Echo);                        //当RX为1计数并等待
             TR0=0;                                //关闭计数
         Conut();                        //计算
                 delayms(80);
        }
                        
}


LCD1602显示函数

void Read_Busy()           //忙检测函数,判断bit7是0,允许执行;1禁止
{
    unsigned char sta;      //
    LCD1602_DB = 0xff;
    LCD1602_RS = 0;
    LCD1602_RW = 1;
    do
    {
        LCD1602_EN = 1;
        sta = LCD1602_DB;
        LCD1602_EN = 0;    //使能,用完就拉低,释放总线
    }while(sta & 0x80);
}

void Lcd1602_Write_Cmd(unsigned char cmd)     //写命令
{
    Read_Busy();
    LCD1602_RS = 0;
    LCD1602_RW = 0;
    LCD1602_DB = cmd;
    LCD1602_EN = 1;
    LCD1602_EN = 0;   
}

void Lcd1602_Write_Data(unsigned char dat)   //写数据
{
      Read_Busy();
      LCD1602_RS = 1;
      LCD1602_RW = 0;
      LCD1602_DB = dat;
      LCD1602_EN = 1;
      LCD1602_EN = 0;
}

void LcdSetCursor(unsigned char x,unsigned char y)  //坐标显示
{
    unsigned char addr;
    if(y == 0)
        addr = 0x00 + x;
    else
        addr = 0x40 + x;

    Lcd1602_Write_Cmd(addr|0x80);
}

//按指定位置显示一个字符
void DisplayOneChar(unsigned char X, unsigned char Y, unsigned char DData)
{
        Y &= 0x1;
        X &= 0xF; //限制X不能大于15,Y不能大于1
        if (Y) X |= 0x40; //当要显示第二行时地址码+0x40;
        X |= 0x80; //算出指令码
        Lcd1602_Write_Cmd(X); //发命令字
        Lcd1602_Write_Data(DData); //发数据
}


void LcdShowStr(unsigned char x,unsigned char y,unsigned char *str)     //显示字符串
{
    LcdSetCursor(x,y);      //当前字符的坐标
    while(*str != '\0')
    {
        Lcd1602_Write_Data(*str++);
    }
}

void InitLcd1602()              //1602初始化
{
    Lcd1602_Write_Cmd(0x38);    //打开,5*8,8位数据
    Lcd1602_Write_Cmd(0x0c);
    Lcd1602_Write_Cmd(0x06);
    Lcd1602_Write_Cmd(0x01);    //清屏   
}



全部资料51hei下载地址:
仿真代码.7z (156.31 KB, 下载次数: 146)


作者: 蓝精灵.    时间: 2021-4-11 15:58
楼主右下角那个是什么?

作者: coco25312    时间: 2021-4-21 11:48
蓝精灵. 发表于 2021-4-11 15:58
楼主右下角那个是什么?

超声波模块


作者: coco25312    时间: 2021-4-21 11:49
蓝精灵. 发表于 2021-4-11 15:58
楼主右下角那个是什么?

超声波模块,按键控制距离
作者: 且以深情共白头    时间: 2021-5-19 22:33
楼主可以给个Proteus8.0的仿真吗? 压缩包的这个dsn文件只能用7.5版本的打开,,而我只安装了8.0的软件

作者: john0317    时间: 2021-5-25 19:01
楼主,超声波模块那个怎么设置起始距离?我这怎么一开机就是200多CM

作者: 局外人R    时间: 2022-11-22 16:21
楼主 HC-SR04.hex文件的作用是什么?
作者: q2789456123    时间: 2022-11-28 17:12
且以深情共白头 发表于 2021-5-19 22:33
楼主可以给个Proteus8.0的仿真吗? 压缩包的这个dsn文件只能用7.5版本的打开,,而我只安装了8.0的软件

兄弟你的解决了没有,我也是这,要是解决了的话发我一份呗




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