本系统由STM32F103系统+LCD1602液晶显示+按键模块+DS1302时钟模块+声光报警模块组成。
1、使用LCD1602显示当前日期、时间、星期
2、具有闹钟、倒计时、计时功能,时间到达后通过声光报警模块报警
3、通过按键进行时间、日期的设置和调整
4、系统关闭以后能保持时间值不丢失
注意:只能使用Proteus8.11版本
34、基于STM32的电子时钟设计(DS1302)时钟、秒表、倒计时

倒计时:

秒表:

时间设定:

/***********************************************
***********************************************/
#include "delay.h"
#include "LCD1602.h"
#include "key.h"
#include "TIMER.h"
#include "led.h"
#include "ds1302.h"
#include "stdio.h"
#include "stdlib.h"
extern _Bool flag_timer; //定时时间到标志位
unsigned char Timer_star =0; //开始启动秒表标志位
unsigned char RRTimer_star =0; //开始启动秒表倒计时标志位
unsigned char DDhour = 0, DDmin = 0 ,DDsec = 0 ; //计时时间
extern unsigned char RRhour ; //默认倒计时
extern unsigned char RRmin ;
extern unsigned char RRSec ;
extern unsigned int RRtime;
int main(void)
{
unsigned char DDDec = 0;
unsigned char RRRec = 0;
_Bool Alarm = 0;
_Bool DDAlarm = 0;
_Bool RRAlarm = 0;
unsigned char Dis_Mode = 0;
unsigned char key_value = 0; //按键返回值
NVIC_PriorityGroupConfig(NVIC_PriorityGroup_2); //设置中断优先级分组为组2:2位抢占优先级,2位响应优先级
Lcd1602_Init(); //液晶1602初始化
LED_Init();
KEY_Init(); //初始化端口
DS1302_Init(); //DS1302初始化
KEY_Init();
TIM2_Int_Init(199,7199);
while(1)
{
if(flag_timer==1) //200毫秒赋一次值 flag_timer是标志位
{
flag_timer = 0; //清除标志 等待下一次200ms
DS1302_ReadTime(); //读取DS1302
}
if(Timer_star==1) //启动计时
{
if(DDDec!=Timer_info.sec) //时间走了一秒?
{
DDDec = Timer_info.sec;
DDsec++;
if(DDsec>=60)
{
DDsec = 0;
DDmin++;
}
if(DDmin>=60)
{
DDmin = 0;
DDhour = 0;
}
}
}
key_value = KEY_Scan(0); //按键单击
switch(key_value)
{
case 1:
KEY_Set();
break;
case 2:
BEEP = 1; //取消报警
break;
case 4:
KEY_Set_Alarm(); //设置闹钟
break;
case 5: //
Lcd1602_Write_Com(0x01); //清除LCD的显示内容
Lcd1602_String(0,0," ");
Lcd1602_String(0,1," ");
Dis_Mode++;
if(Dis_Mode>2)
Dis_Mode = 0;
break;
case 6: //
KEY_Set_DSS(); //设置倒计时
break;
}
switch(Dis_Mode)
{
case 0: //显示时钟
DS1302_Time();
break;
case 1: //计时功能
Lcd1602_String(0,0,"Time:"); //显示时间
Lcd1602_Write_Data(DDhour/10+0x30);
Lcd1602_Write_Data(DDhour%10+0x30);
Lcd1602_Write_Data(':');
Lcd1602_Write_Data(DDmin/10+0x30);
Lcd1602_Write_Data(DDmin%10+0x30);
Lcd1602_Write_Data(':');
Lcd1602_Write_Data(DDsec/10+0x30);
Lcd1602_Write_Data(DDsec%10+0x30);
if(KEY5==0) //开始计时
{
while(KEY5==0);
if(Timer_star==0||Timer_star==2)//如果没有开始计时 则打开计时
{
Timer_star = 1; //开始计时
}
else if(Timer_star==1)
{
Timer_star = 2; //暂停计时
}
}
if(KEY6==0) //复位计时
{
while(KEY6==0);
if(Timer_star==2) //如果暂停计时了 就复位清零
{
Timer_star = 0; //停止计时
DDhour = DDmin = DDsec = 0; //清零
}
}
break;
case 2: //倒计时功能
Lcd1602_String(0,0,"DTime:"); //显示时间
Lcd1602_Write_Data(RRtime/3600/10+0x30);
Lcd1602_Write_Data(RRtime/3600%10+0x30);
Lcd1602_Write_Data(':');
Lcd1602_Write_Data(RRtime/60/10+0x30);
Lcd1602_Write_Data(RRtime/60%10+0x30);
Lcd1602_Write_Data(':');
Lcd1602_Write_Data(RRtime%60/10+0x30);
Lcd1602_Write_Data(RRtime%60%10+0x30);
if(RRTimer_star==1&&RRtime>0) //D倒计时开始?
{
if(RRRec!=Timer_info.sec) //时间走了一秒?
{
RRRec = Timer_info.sec;
RRtime --;
if(RRtime==0)
{
RRhour = RRmin = RRSec = 0;
BEEP = 0; //开报警
RRTimer_star = 0;
}
}
}
if(KEY5==0) //开始计时
{
while(KEY5==0);
if(RRTimer_star==0||RRTimer_star==2)//如果没有开始计时 则打开计时
{
RRTimer_star = 1; //开始计时
}
else if(RRTimer_star==1)
{
RRTimer_star = 2; //暂停计时
}
}
if(KEY6==0) //复位计时
{
while(KEY6==0);
if(RRTimer_star==2) //如果暂停计时了 就复位清零
{
RRTimer_star = 0; //停止计时
RRhour = RRmin = RRSec = 0; //清零
}
}
break;
}
if(Timer_info.hou == Ahour&&Timer_info.min ==Amin ) //到达闹钟时间
{
if(Timer_info.sec==0) //秒钟为0
{
if(Alarm==0)
{
Alarm = 1;
BEEP = 0; //开报警
}
}
}
else
{
if(Alarm==1)
{
Alarm = 0;
BEEP = 1; //关报警
}
}
}
}
1、Proteus仿真软件
文件内容:Proteus7.8安装包、Proteus8.6安装包、Proteus.8.10安装包、Proteus Professional 8.11 SP0安装包
链接:https://pan.baidu.com/s/11LNUZ9BJXWvXf1C4dPc3_w
提取码:2756
3、KEIL5 MDK软件(STM32开发软件)
链接:https://pan.baidu.com/s/1t3eY-3yRdTa7jZMlijq_jg
提取码:ab58
我正在尝试测试是否存在表单。我是Rails新手。我的new.html.erb_spec.rb文件的内容是:require'spec_helper'describe"messages/new.html.erb"doit"shouldrendertheform"dorender'/messages/new.html.erb'reponse.shouldhave_form_putting_to(@message)with_submit_buttonendendView本身,new.html.erb,有代码:当我运行rspec时,它失败了:1)messages/new.html.erbshou
我在从html页面生成PDF时遇到问题。我正在使用PDFkit。在安装它的过程中,我注意到我需要wkhtmltopdf。所以我也安装了它。我做了PDFkit的文档所说的一切......现在我在尝试加载PDF时遇到了这个错误。这里是错误:commandfailed:"/usr/local/bin/wkhtmltopdf""--margin-right""0.75in""--page-size""Letter""--margin-top""0.75in""--margin-bottom""0.75in""--encoding""UTF-8""--margin-left""0.75in""-
为了将Cucumber用于命令行脚本,我按照提供的说明安装了arubagem。它在我的Gemfile中,我可以验证是否安装了正确的版本并且我已经包含了require'aruba/cucumber'在'features/env.rb'中为了确保它能正常工作,我写了以下场景:@announceScenario:Testingcucumber/arubaGivenablankslateThentheoutputfrom"ls-la"shouldcontain"drw"假设事情应该失败。它确实失败了,但失败的原因是错误的:@announceScenario:Testingcucumber/ar
我遵循MichaelHartl的“RubyonRails教程:学习Web开发”,并创建了检查用户名和电子邮件长度有效性的测试(名称最多50个字符,电子邮件最多255个字符)。test/helpers/application_helper_test.rb的内容是:require'test_helper'classApplicationHelperTest在运行bundleexecraketest时,所有测试都通过了,但我看到以下消息在最后被标记为错误:ERROR["test_full_title_helper",ApplicationHelperTest,1.820016791]test
我正在尝试从Postgresql表(table1)中获取数据,该表由另一个相关表(property)的字段(table2)过滤。在纯SQL中,我会这样编写查询:SELECT*FROMtable1JOINtable2USING(table2_id)WHEREtable2.propertyLIKE'query%'这工作正常:scope:my_scope,->(query){includes(:table2).where("table2.property":query)}但我真正需要的是使用LIKE运算符进行过滤,而不是严格相等。然而,这是行不通的:scope:my_scope,->(que
我正在尝试编写一个将文件上传到AWS并公开该文件的Ruby脚本。我做了以下事情:s3=Aws::S3::Resource.new(credentials:Aws::Credentials.new(KEY,SECRET),region:'us-west-2')obj=s3.bucket('stg-db').object('key')obj.upload_file(filename)这似乎工作正常,除了该文件不是公开可用的,而且我无法获得它的公共(public)URL。但是当我登录到S3时,我可以正常查看我的文件。为了使其公开可用,我将最后一行更改为obj.upload_file(file
当我尝试安装Ruby时遇到此错误。我试过查看this和this但无济于事➜~brewinstallrubyWarning:YouareusingOSX10.12.Wedonotprovidesupportforthispre-releaseversion.Youmayencounterbuildfailuresorotherbreakages.Pleasecreatepull-requestsinsteadoffilingissues.==>Installingdependenciesforruby:readline,libyaml,makedepend==>Installingrub
我在新的Debian6VirtualBoxVM上安装RVM时遇到问题。我已经安装了所有需要的包并使用下载了安装脚本(curl-shttps://rvm.beginrescueend.com/install/rvm)>rvm,但以单个用户身份运行时bashrvm我收到以下错误消息:ERROR:Unabletocheckoutbranch.安装在这里停止,并且(据我所知)没有安装RVM的任何文件。如果我以root身份运行脚本(对于多用户安装),我会收到另一条消息:Successfullycheckedoutbranch''安装程序继续并指示成功,但未添加.rvm目录,甚至在修改我的.bas
下面的代码在我第一次运行它时就可以正常工作:require'rubygems'require'spreadsheet'book=Spreadsheet.open'/Users/me/myruby/Mywks.xls'sheet=book.worksheet0row=sheet.row(1)putsrow[1]book.write'/Users/me/myruby/Mywks.xls'当我再次运行它时,我会收到更多消息,例如:/Library/Ruby/Gems/1.8/gems/spreadsheet-0.6.5.9/lib/spreadsheet/excel/reader.rb:11
我正在学习Ruby的基础知识(刚刚开始),我遇到了Hash.[]method.它被引入a=["foo",1,"bar",2]=>["foo",1,"bar",2]Hash[*a]=>{"foo"=>1,"bar"=>2}稍加思索,我发现Hash[*a]等同于Hash.[](*a)或Hash.[]*一个。我的问题是为什么会这样。是什么让您将*a放在方括号内,是否有某种规则可以在何时何地使用“it”?编辑:我的措辞似乎造成了一些困惑。我不是在问数组扩展。我明白了。我的问题基本上是:如果[]是方法名称,为什么可以将参数放在括号内?这看起来几乎——但不完全是——就像说如果你有一个方法Foo.d