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

 找回密码
 立即注册

QQ登录

只需一步，快速开始

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

搜索
»论坛 › 嵌入式/单片机论坛 › 51单片机 › 基于51单片机的声光控延时灯程序Proteus仿真图
返回列表 发新帖
查看: 1388|回复: 2
收起左侧

基于51单片机的声光控延时灯程序Proteus仿真图

[复制链接]
ID:818537 发表于 2024-6-30 06:11 | 显示全部楼层 |阅读模式
基于51的声光控延时灯
仿真图protues 8.0程序编译器：keil 4/keil 5程序 仿真原理图 单片机AT89S521）光控功能，?天光线较强，有声音灯不亮；光线较暗，有声音时灯点亮。2）声控功能：傍晚光线变暗后，?动进?待机状态，有声音时，通电亮灯，延时 30 秒后?动断电；无声音时不点亮；3）灯在点亮时如有新的声音，灯应该重新点亮 30 秒。4）用 PROTEUS 或 MULTISIM 软件进行仿真调试实现

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

单片机源程序如下:
  1. #include "main.h"

  3. bit sflag=0;
  4. bit heitian=0;
  5. bit baitian=0;

  7. unsigned int Countdown=0;

  9. void baitian_run();
  10. void InitTimer0(void);


  13. void main() //0通道光
  14. {
  15.         
  16.         InitTimer0();
  17.         SW=1;
  18.         UartInit();
  19.         while(1)
  20.         {
  21.                 baitian_run();  
  22.         }
  23. }

  25. void Timer0Interrupt(void) interrupt 1 //12T@10ms
  26. {
  27.         static u16 timecount=0;
  28.         static u8 keycount=0;
  29.         TH0 = 0x0FC;
  30.   TL0 = 0x18;
  31.         timecount++;
  32.         keycount++;
  33.         if(timecount==1000)
  34.         {
  35.                 timecount=0;
  36.                 sflag=1;
  37.         }
  38.                
  39. }

  41. void baitian_run()
  42. {
  43.         unsigned long d=100000;
  44.         u8 adc,voltage1,voltage2;
  45.         adc = ADC_read_data(0);//读取adc光值
  46.         voltage1 = adc * 500.0 / 255;//将adc值换算成电压
  47.         adc = ADC_read_data(1);//读取adc光值
  48.         voltage2 = adc * 500.0 / 255;//将adc值换算成电压
  49.         
  50.         UART_SendNum(voltage2);
  51.         while(d--);
  52.         
  53.         if(voltage1<LS)
  54.         {
  55.                 heitian=1;
  56.         }
  57.         else
  58.         {
  59.                 heitian=0;
  60.         }
  61.         if(heitian==1)
  62.         {
  63.                         if(voltage2>SS)
  64.                 {
  65.                         baitian=1;
  66.                 }
  67.         }
  68.         if(baitian==1)
  69.         {
  70.                
  71.                 if(voltage2>SS)
  72.                 {
  73.                         Countdown=0;
  74.                 }
  75.                 SW=0;
  76.                 if(sflag==1)
  77.                 {
  78.                         sflag=0;
  79.                         Countdown++;
  80.                         if(Countdown==Timeout)
  81.                         {
  82.                                 Countdown=0;
  83.                                 baitian=0;
  84.                         }
  85.                 }
  86.         }
  87.         else
  88.         {
  89.                 SW=1;
  90.         }
  91.         
  92.         
  93. }

  95. void InitTimer0(void)
  96. {
  97.     TMOD = 0x01;
  98.     TH0 = 0x0FC;
  99.     TL0 = 0x18;
  100.     EA = 1;
  101.     ET0 = 1;
  102.     TR0 = 1;
  103. }
复制代码
下载:
基于51单片机的声光控延时灯.7z (1.9 MB, 下载次数: 12)

评分

参与人数 1黑币 +50 收起 理由
admin + 50 共享资料的黑币奖励！

查看全部评分

回复

使用道具 举报

ID:1127891 发表于 2024-7-2 14:36 | 显示全部楼层
有点看不懂
回复

使用道具 举报

ID:818537 发表于 2024-9-26 00:12 | 显示全部楼层
yunyun66 发表于 2024-7-2 14:36
有点看不懂

哪里看不懂，我跟你说一下
回复

使用道具 举报

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

本版积分规则

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

Powered by 单片机教程网

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