设为首页收藏本站
开启辅助访问 切换到宽版

 找回密码
 立即注册

QQ登录

只需一步，快速开始

热门： 51单片机 | 24小时必答区 | 单片机教程 | 单片机DIY制作 | STM32 | Cortex M3 | 模数电子 | 电子DIY制作 | 音响/功放 | 拆机乐园 | Arduino | 嵌入式OS | 程序设计

搜索
»论坛 › 嵌入式/单片机论坛 › 51单片机 › 单片机远近光灯源码和仿真电路图(带距离检测)
返回列表 发新帖
查看: 3475|回复: 3
收起左侧

单片机远近光灯源码和仿真电路图(带距离检测)

[复制链接]
ID:215823 发表于 2017-6-29 15:05 | 显示全部楼层 |阅读模式
远近光灯课设实验源码及电路图

仿真原理图如下（proteus仿真工程文件可到本帖附件中下载）：

0.png 0.png 0.png 0.png

单片机源程序如下:
  1. #include <reg51.h>
  2. #include <intrins.h>
  3. #include <absacc.h>
  4. #define uchar unsigned char
  5. #define uint unsigned int

  7. sbit ADCS=P3^5;
  8. sbit ADDI=p3^7;
  9. sbit ADDO=p3^7;
  10. sbit ADCLK=p3^6;
  11. sbit control1=p3^0;
  12. sbit control2=p3^1;
  13. uchar ad_data;

  15. void delay(uint);
  16. uchar Adc0832(unsigned char channel);

  18. void main(void)
  19. {
  20.         ad_data=0;
  21.         ad_data=0;
  22.         control1=1;
  23.         while(1){
  24.                 ad_data=Adc0832(0);
  25.                 if(ad_data>=150){
  26.                                         control1=1;
  27.                                         control2=0;
  28.                                 }else
  29.                                 {
  30.                                         control1=0;
  31.                                         control2=1;

  33.                                 }
  34.                 }
  35. }

  37. void delay(uint k)
  38. {
  39.         uint i,j;
  40.         for(i=0;i<k;i++)
  41.            for(j=0;j<100;j++)
  42.         uchar Adc0832(unsigned char channel){
  43.                 uchar i=0;
  44.                 uchar j;
  45.                 uint dat=0;
  46.                 uchar ndat=0;
  47.                
  48.                 if(channel==0) channel=2;
  49.                 if(channel==1) channel=3;
  50.                 ADDI=1;
  51.                 _nop_();
  52.                 _nop_();
  53.                 ADCS=0;//1
  54.                 _nop_();
  55.                 _nop_();
  56.                 ADCLK=1;//2
  57.                 _nop_();
  58.                 _nop_();
  59.                 ADCLK=0;//3
  60.                 _nop_();
  61.                 _nop_();
  62.                 ADCLK=1;
  63.                 ADDI=channel&0x1;
  64.                 _nop_();
  65.                 _nop_();
  66.                 ADCLK=0;
  67.                 _nop_();
  68.                 _nop_();
  69.                 ADCLK=1;
  70.                 ADDI=(channel>>1)&0x1;
  71.                 _nop_();
  72.                 _nop_();
  73.                 ADCLK=1;
  74.                 ADDI=1;
  75.                 _nop_();
  76.                 _nop_();
  77.                 dat=0;
  78.                 for(i=0;i<8;i++)
  79.                 {
  80.                         dat |=ADDO;
  81.                         ADCLK=1;
  82.                         _nop_();
  83.                         _nop_();
  84.                         ADCLK=0;
  85.                         _nop_();
  86.                         _nop_();
  87.                         dat<<1;
  88.                         if(i==7)dat |=AADO;
  89.                 }
  90.                 for(i=0;i<8;i++)
  91.                 {
  92.                         j=0;
  93.                         j=j|ADDO;
  94.                         ADCLK=1;
  95.                         _nop_();
  96.                         _nop_();
  97.                         ADCLK=0;       
  98.                         _nop_();
  99.                         _nop_();
  100.                         j=j<<7;
  101.                         ndat=ndat|j;
  102.                         if(i<7)ndat>>=1;
  103.                 }
  104.                 ADCS=1;
  105. ……………………

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

所有资料51hei提供下载:
远近光灯.zip (41.4 KB, 下载次数: 57)
回复

使用道具 举报

ID:415378 发表于 2018-10-25 21:49 | 显示全部楼层
楼主啊，为什么我仿真不出来啊
回复

使用道具 举报

ID:651061 发表于 2019-11-30 09:59 | 显示全部楼层
重要事情说三遍 发表于 2018-10-25 21:49
楼主啊，为什么我仿真不出来啊

你好，红蓝灯是什么意思啊
回复

使用道具 举报

ID:116941 发表于 2022-1-8 11:03 | 显示全部楼层
坑挺多 IO口改了 继电器也不对
回复

使用道具 举报

返回列表 发新帖
高级模式
B Color Image Link Quote Code Smilies
您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

手机版|小黑屋|51黑电子论坛 |51黑电子论坛6群 QQ 管理员QQ:125739409;技术交流QQ群281945664

Powered by 单片机教程网

快速回复 返回顶部 返回列表