电子发烧友App

硬声App

0
  • 聊天消息
  • 系统消息
  • 评论与回复
登录后你可以
  • 下载海量资料
  • 学习在线课程
  • 观看技术视频
  • 写文章/发帖/加入社区
会员中心
创作中心

完善资料让更多小伙伴认识你,还能领取20积分哦,立即完善>

3天内不再提示
电子发烧友网>电子资料下载>电子资料>基于Arduino的警报

基于Arduino的警报

2022-11-29 | zip | 0.03 MB | 次下载 | 免费

资料介绍

描述

该项目是一个基于 Arduino 的警报,用于监控计算机是否正常工作。万一电脑死机,它会发出警告声信号

该项目由两部分组成:在计算机上运行的程序和连接在 USB 端口中的 Arduino。

计算机程序以 1 秒的间隔向 Arduino 发送一个预定义的字符。Arduino 从计算机发送的数据中读取数据。如果它在 10 秒内没有收到任何字符,它会从连接到引脚 10 的蜂鸣器发出声音。

计算机程序是用 Visual Basic 编写的。它是一个简单的 Windows 窗体应用程序,包含一个窗体 (Form1)、一个标签 (Label1) 和一个计时器 (Timer1)。

Timer1 间隔设置为 1000 ms。

计算机程序的源代码:

Imports System.IO.Ports
Public Class Form1
   Dim port As SerialPort
   Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load
       port = New SerialPort("COM4", 9600) 'Set your board COM
       port.Open()
   End Sub
   Private Sub Form1_FormClosing(sender As Object, e As FormClosingEventArgs) Handles MyBase.FormClosing
       port.Close()
   End Sub
   Private Sub Timer1_Tick(sender As Object, e As EventArgs) Handles Timer1.Tick
       On Error GoTo error1
       port.Write("1") 'character to send to COM port, wich the Arduino will expect.
       Label1.Text = Now() & " - Sent ""1"" on COM4 baud 9600 - Success!"
       Exit Sub
error1:
       Label1.Text = Now() & " - " & ErrorToString()
   End Sub
End Class

Arduino程序源代码:

char incomingChar = 0; // for incoming serial data
int NoSignalCounter = -60; // delay to allow for computer startup time
void setup() {
 Serial.begin(9600); // opens serial port, sets data rate to 9600 bps
}
void loop() {
 while (Serial.available() > 0) {
   NoSignalCounter = 0;
   incomingChar = Serial.read();
   if (incomingChar == '1') { // '1' is the character expected from the computer
     noTone(10);
   }
   else {
     tone(10, 2400); // alarm: the character sent from the computer is different from the expected character
   }
 }
 NoSignalCounter++;
 if (NoSignalCounter >= 10) { // alarm: no character was received from the computer in the last 10 seconds
   NoSignalCounter = 0;
   tone(10, 2400); //(pin,frequency)
 }
 delay(1000);
}
pYYBAGOFewCATl-XAA2LlM4TejU818.jpg
 

 


下载该资料的人也在下载 下载该资料的人还在阅读
更多 >

评论

查看更多

下载排行

本周

  1. 1山景DSP芯片AP8248A2数据手册
  2. 1.06 MB  |  532次下载  |  免费
  3. 2RK3399完整板原理图(支持平板,盒子VR)
  4. 3.28 MB  |  339次下载  |  免费
  5. 3TC358743XBG评估板参考手册
  6. 1.36 MB  |  330次下载  |  免费
  7. 4DFM软件使用教程
  8. 0.84 MB  |  295次下载  |  免费
  9. 5元宇宙深度解析—未来的未来-风口还是泡沫
  10. 6.40 MB  |  227次下载  |  免费
  11. 6迪文DGUS开发指南
  12. 31.67 MB  |  194次下载  |  免费
  13. 7元宇宙底层硬件系列报告
  14. 13.42 MB  |  182次下载  |  免费
  15. 8FP5207XR-G1中文应用手册
  16. 1.09 MB  |  178次下载  |  免费

本月

  1. 1OrCAD10.5下载OrCAD10.5中文版软件
  2. 0.00 MB  |  234315次下载  |  免费
  3. 2555集成电路应用800例(新编版)
  4. 0.00 MB  |  33566次下载  |  免费
  5. 3接口电路图大全
  6. 未知  |  30323次下载  |  免费
  7. 4开关电源设计实例指南
  8. 未知  |  21549次下载  |  免费
  9. 5电气工程师手册免费下载(新编第二版pdf电子书)
  10. 0.00 MB  |  15349次下载  |  免费
  11. 6数字电路基础pdf(下载)
  12. 未知  |  13750次下载  |  免费
  13. 7电子制作实例集锦 下载
  14. 未知  |  8113次下载  |  免费
  15. 8《LED驱动电路设计》 温德尔著
  16. 0.00 MB  |  6656次下载  |  免费

总榜

  1. 1matlab软件下载入口
  2. 未知  |  935054次下载  |  免费
  3. 2protel99se软件下载(可英文版转中文版)
  4. 78.1 MB  |  537798次下载  |  免费
  5. 3MATLAB 7.1 下载 (含软件介绍)
  6. 未知  |  420027次下载  |  免费
  7. 4OrCAD10.5下载OrCAD10.5中文版软件
  8. 0.00 MB  |  234315次下载  |  免费
  9. 5Altium DXP2002下载入口
  10. 未知  |  233046次下载  |  免费
  11. 6电路仿真软件multisim 10.0免费下载
  12. 340992  |  191187次下载  |  免费
  13. 7十天学会AVR单片机与C语言视频教程 下载
  14. 158M  |  183279次下载  |  免费
  15. 8proe5.0野火版下载(中文版免费下载)
  16. 未知  |  138040次下载  |  免费