久久精品美女,国产精品一区二区久久精品爱微奶,精品日韩在线

/**************************************************
程序名：《大笨鐘》
晶振：24MHZ
功能：LED數碼管顯示，按鍵可調，電波自動校時，整點報時功能，夜間光感自動亮度
全局變量已達到93個
******************************************************/
#include<stc12c5a60s2.h>
#include<intrins.h>
#define uchar unsigned char
#define uint unsigned int
uchar Dat_su,Dat_num,min,hour,keysetnum;
uchar s1,m1,h1;
uchar hourshi,hourge,minshi,minge,secshi,secge;
sbit DSIO = P2^2; //1302信號腳
sbit RST = P2^1; //1302復位信號腳
sbit SCLK = P2^0; //1302時鐘信號腳
sbit keyset = P3^7; //進入設置
sbit keyshi = P3^6; //時加按鍵設置
sbit keyfen = P3^5; //分加按鍵設置
sbit keyBPC = P3^4; //電波強制對時按鍵
sbit Ring = P2^4; //整點報時輸出
bit flag200ms; //200MS讀DS1302標志位
bit keysetflag; //進入按鍵設置標志位
bit alarmflag; //報時標志位
/******BPC***********/
sbit BPC = P3^3; //BPC輸入，外部輸入
sbit BPC_EN = P2^3; //BPC 使能
sbit BPC_FailLED = P2^5; //BPC校時失敗指示燈
bit keyBPCflag; //強制對時標志位
bit BPC_add; //BPC中斷標志位
bit BPC_ok = 1; //對時成功標志位，默認為開啟才能開啟BPC
bit Get_time,As_time; //授時標志位
uchar Dat_su,Dat_num,keyBPCnum;
uchar data BPC_dat[3][19]; //BPC3列個19組數組
uint BPC_temp,Dat_add; //BPC脈寬時間記錄變量
uchar data Times[3]; //BPC "分，時，上/下午“數組
uchar DisplayData[6]; //LED顯示緩存數組
uchar code smgduan[10] = {0xc0,0xf9,0xa4,0xb0,0x99,0x92,0x82,0x78,0x80,0x90}; //LED 0－9
//DS1302寫入和讀取時分秒的地址命令
//秒分時日月周年最低位讀寫位
uchar code READ_RTC_ADDR[7] = {0x81, 0x83, 0x85, 0x87, 0x89, 0x8b, 0x8d};
uchar code WRITE_RTC_ADDR[7] = {0x80, 0x82, 0x84, 0x86, 0x88, 0x8a, 0x8c};
//存儲順序秒分時日月周年,存儲格式是用BCD碼//
uchar TIME[7];
/*************************************
* 函數名： delay()
* 按鍵延時函數，按鍵使用
************************************/
void delay() //100ms
{
unsigned char a,b,c;
for(c=4;c>0;c--)
for(b=212;b>0;b--)
for(a=140;a>0;a--);
}
/*******************************************************************************
* 函數名 : Ds1302Write
* 函數功能 : 向DS1302命令（地址+數據）
* 輸入 : addr,dat
*******************************************************************************/
void Ds1302Write(uchar addr, uchar dat)
{
uchar n;
RST = 0;
_nop_();
SCLK = 0; //先將SCLK置低電平。
_nop_();
RST = 1; //然后將RST(CE)置高電平。
_nop_();
for (n=0; n<8; n++) //開始傳送八位地址命令
{
DSIO = addr & 0x01;//數據從低位開始傳送
addr >>= 1;
SCLK = 1; //數據在上升沿時，DS1302讀取數據
_nop_();
SCLK = 0;
_nop_();
}
for (n=0; n<8; n++) //寫入8位數據
{
DSIO = dat & 0x01;
dat >>= 1;
SCLK = 1; //數據在上升沿時，DS1302讀取數據
_nop_();
SCLK = 0;
_nop_();
}
RST = 0; //傳送數據結束
_nop_();
}
/*******************************************************************************
* 函數名 : Ds1302Read
* 函數功能 : 讀取一個地址的數據
* 輸入 : addr
* 輸出 : dat
*******************************************************************************/
uchar Ds1302Read(uchar addr)
{
uchar n,dat,dat1;
RST = 0;
_nop_();
SCLK = 0; //先將SCLK置低電平。
_nop_();
RST = 1; //然后將RST(CE)置高電平。
_nop_();
for(n=0; n<8; n++) //開始傳送八位地址命令
{
DSIO = addr & 0x01;//數據從低位開始傳送
addr >>= 1;
SCLK = 1; //數據在上升沿時，DS1302讀取數據
_nop_();
SCLK = 0; //DS1302下降沿時，放置數據
_nop_();
}
_nop_();
for(n=0; n<8; n++) //讀取8位數據
{
dat1 = DSIO; //從最低位開始接收
dat = (dat>>1) | (dat1<<7);
SCLK = 1;
_nop_();
SCLK = 0; //DS1302下降沿時，放置數據
_nop_();
}
RST = 0;
_nop_(); //DS1302復位的穩定時間,必須的。
SCLK = 1;
_nop_();
DSIO = 0;
_nop_();
DSIO = 1;
_nop_();
return dat;
}
/*******************************************************************************
* 函數名 : Ds1302Init
* 函數功能 : 初始化DS1302
*******************************************************************************/
void Ds1302Init()
{
uchar dat;
RST = 0;
SCLK = 0;
dat = Ds1302Read(0x81); //讀1302最高位判斷掉電時間是否正常
if((dat&0x80)!=0) //為0，正常運行
{
Ds1302Write(0x8E,0X00); //禁止寫保護，就是關閉寫保護功能
Ds1302Write(0x84,0x00); //寫入時鐘最高位為0，定義為24小時制
/******
本程序不需要寫入年月日和初始時間
for (n=0; n<7; n++) //寫入7個字節的時鐘信號：分秒時日月周年
{
Ds1302Write(WRITE_RTC_ADDR[n],TIME[n]);
}
*******/
Ds1302Write(0x8E,0x80); //打開寫保護功能
}
}
/*******************************************************************************
* 函數名 : Ds1302ReadTime
* 函數功能 : 讀取時鐘信息
*******************************************************************************/
void Ds1302ReadTime()
{
uchar n;
for (n=0; n<7; n++) //讀取7個字節的時鐘信號：分秒時日月周年
{
TIME[n] = Ds1302Read(READ_RTC_ADDR[n]);
}
}
/*******************************************************************************
* 函數名 : datapros()
* 函數功能 : 時間讀取處理轉換函數
*******************************************************************************/
void datapros()
{
Ds1302ReadTime(); //先讀取1302的時分秒
DisplayData[0] = smgduan[TIME[2]>>4]; //時十位
DisplayData[1] = smgduan[TIME[2]&0x0f];
DisplayData[2] = smgduan[TIME[1]/16]; //分十位
DisplayData[3] = smgduan[TIME[1]&0x0f];
DisplayData[4] = smgduan[TIME[0]/16]; //秒十位
DisplayData[5] = smgduan[TIME[0]&0x0f];
}
/*******************************************************************************
* 函數名 :keyscan()
* 函數功能 :按鍵設置時間和BPC對時
*******************************************************************************/
void keyscan()
{
if(keyset == 0)
{
delay();
if(keyset == 1)
{
keysetnum++; //按鍵記錄值
h1 = (TIME[2]>>4)*10+(TIME[2]&0x0f)%10;//先將1302暫停時的小時值轉換成十進制賦予變量H1時,以便在此基礎上累加調整改然后寫入1302
m1 = (TIME[1]>>4)*10+(TIME[1]&0x0f)%10;//先將1302暫停的的分鐘值轉換成十進制賦予變量M1時,以便在此基礎上累加調整改然后寫入1302
}
if(keysetnum == 1) //按一次
{
keysetflag = 1; //按下KEYSET標志位，用以暫停讀1302
}
if(keysetnum >= 2) //按二次，恢復讀1302，不能＝＝2，可能因按鍵因素大于2
{
keysetnum = 0; //清零
keysetflag = 0; //標志位清零，恢復讀1302
Ds1302Write(0x8E,0X00); //關閉1302寫保護
Ds1302Write(0x80,0); //向秒寄存器寫入0
Ds1302Write(0x8E,0x80); //打開1302寫保護
}
}
if(keyshi == 0) //“時”增加按鍵
{
delay();
if((keyshi==1)&&(keysetflag==1)) //判斷KEYSET標志位，只有KEYSET按下后才運行
{
h1++; //小時加1，24小時制
if(h1>23)
{
h1 = 0;
}
DisplayData[0] = smgduan[h1/10]; //十進制轉換送LED十位顯示
DisplayData[1] = smgduan[h1%10]; //十進制轉換送LED個位顯示
hour = (h1/10*16)+(h1%10); //將H1的值轉換成BCD碼賦給HOUR
Ds1302Write(0x8E,0X00); //關閉1302寫保護
Ds1302Write(0x84,hour); //向1302“時”寄存器寫入小時值
Ds1302Write(0x8E,0x80); //打開1302寫保護
}
}
if(keyfen == 0) //“分”增加鍵
{
delay();
if((keyfen==1)&&(keysetflag==1)) //判斷KEYSET標志位，只有KEYSET按下后才運行
{
m1++;
if(m1>59) //分，十進制
{
m1 = 0;
}
DisplayData[2] = smgduan[m1/10]; //十進制轉換送LED十位顯示
DisplayData[3] = smgduan[m1%10]; //十進制轉換送LED個位顯示
min = (m1/10*16)+(m1%10); //將m1的值轉換成BCD碼賦給min
Ds1302Write(0x8E,0X00); //關閉寫保護
Ds1302Write(0x82,min); //向"分"寄存器寫入分鐘值
Ds1302Write(0x8E,0x80); //打開寫保護
}
}
if(keyBPC == 0) //按鍵強制開啟BPC
{
delay();
if(keyBPC == 1)
{
keyBPCnum++;
if(keyBPCnum == 1) //按下一次，開啟BPC
{
BPC_EN = 0;
BPC_FailLED = 1;
keyBPCflag = 1;
}
if(keyBPCnum >= 2) //按下第二次，關閉BPC
{
keyBPCnum = 0;
BPC_EN = 1;
BPC_FailLED = 0;
keyBPCflag = 0;
}
}
}
}
/*********************************************
* 整點報時函數：AlarmRing()
* 函數功能 : 整點報時
**********************************************/
void AlarmRing()
{
uchar p,q;
p = (TIME[1]>>4)*10+(TIME[1]&0x0f)%10; //讀取1302 變為十進制，分鐘為00
q = (TIME[0]>>4)*10+(TIME[0]&0x0f)%10; //秒鐘為00
if((p|q) == 0) //分與秒相或為0時
{
if(alarmflag == 1) //先判斷報時標志打開，禁止報時段標志為0
{
Ring = 1; //觸發報時
delay();
delay();
Ring = 0; //關閉觸發
}
}
}
/************************************************************
* 整點報時設定函數 : Closealarm()
**函數功能 : 設置整點報時時段
***********************************************************/
void Closealarm()
{
uchar k;
k = (TIME[2]>>4)*10+(TIME[2]&0x0f)%10; //讀1302小時值，轉成十進制，設定關閉鬧鐘時間段
if((0<=k)&&(k<=5)) //小5點，大于0點時段，關閉整點報時
{
alarmflag = 0; //關閉報時標志 0－6點
//alarmLED = 0; //關閉報時指示燈
}
else //打開報時
{
alarmflag = 1; //否則打啟報時標志位
//alarmLED = 1;
}
}
/******************************************************
* BPC接收函數： recieveBPCtime()
* 函數功能 : 接收BPC授時和寫入DS1302時間
*******************************************************/
void recieveBPCtime()
{
if(As_time) //正確接收19位數據標志位
{
As_time=0; //清零標志，并判斷一分鐘內3列19組相同的數據，“分時周月年”
if(
(BPC_dat[0][1]==BPC_dat[1][1])&&(BPC_dat[0][1]==BPC_dat[2][1])
&&(BPC_dat[0][2]==BPC_dat[1][2])&&(BPC_dat[0][2]==BPC_dat[2][2])
&&(BPC_dat[0][3]==BPC_dat[1][3])&&(BPC_dat[0][3]==BPC_dat[2][3])
&&(BPC_dat[0][4]==BPC_dat[1][4])&&(BPC_dat[0][4]==BPC_dat[2][4])
&&(BPC_dat[0][5]==BPC_dat[1][5])&&(BPC_dat[0][5]==BPC_dat[2][5])
&&(BPC_dat[0][6]==BPC_dat[1][6])&&(BPC_dat[0][6]==BPC_dat[2][6])
&&(BPC_dat[0][7]==BPC_dat[1][7])&&(BPC_dat[0][7]==BPC_dat[2][7])
&&(BPC_dat[0][8]==BPC_dat[1][8])&&(BPC_dat[0][8]==BPC_dat[2][8])
&&(BPC_dat[0][10]==BPC_dat[1][10])&&(BPC_dat[0][10]==BPC_dat[2][10])
&&(BPC_dat[0][11]==BPC_dat[1][11])&&(BPC_dat[0][11]==BPC_dat[2][11])
&&(BPC_dat[0][12]==BPC_dat[1][12])&&(BPC_dat[0][12]==BPC_dat[2][12])
&&(BPC_dat[0][13]==BPC_dat[1][13])&&(BPC_dat[0][13]==BPC_dat[2][13])
&&(BPC_dat[0][14]==BPC_dat[1][14])&&(BPC_dat[0][14]==BPC_dat[2][14])
&&(BPC_dat[0][15]==BPC_dat[1][15])&&(BPC_dat[0][15]==BPC_dat[2][15])
&&(BPC_dat[0][16]==BPC_dat[1][16])&&(BPC_dat[0][16]==BPC_dat[2][16])
&&(BPC_dat[0][17]==BPC_dat[1][17])&&(BPC_dat[0][17]==BPC_dat[2][17])
)
Get_time=1;
}
if(Get_time) //收到3幀相同的數據后，對Times[]數據賦值授時
{
Get_time=0; //標志位清零
keysetflag = 1; //利用該標志位來暫停讀DS1302
Times[0]=((BPC_dat[0][2]*4)+(BPC_dat[0][3])); //BPC”時“，4進制，第2、3位
Times[1]=((BPC_dat[0][4]*16)+(BPC_dat[0][5]*4)+(BPC_dat[0][6])+1); //BPC”分“，4進制，第4，5，6位，3幀數據相同后，分的起始點為第2分鐘00秒，要加1補償
Times[2]=(BPC_dat[0][9]); //判斷BPC第10位識別上/下午，0，1為上午，2，3為下午
if(Times[2]<2) //上下午判斷，如果小于2，為上午
{
hour = (Times[0]/10*16)+(Times[0]%10); //時轉換成BCD
min = (Times[1]/10*16)+(Times[1]%10); //分轉換成BCD
}
else //上下午判斷，如果大于1，為下午
{
hour = ((Times[0]+12)/10*16)+((Times[0]+12)%10); //BPC下午，Times[3]要加12變為24小時制并轉換為BCD
min = (Times[1]/10*16)+(Times[1]%10); //分轉成BCD
}
Ds1302Write(0x8E,0X00); //關閉寫保護
Ds1302Write(0x84,hour); //向時寄存器寫入小時值
Ds1302Write(0x82,min); //向分寄存器寫入
Ds1302Write(0x80,0); //向秒寄存器寫入0，一分鐘3幀相同信號，分加1后，秒歸0.無需判斷
Ds1302Write(0x8E,0x80); //打開寫保護
keysetflag = 0; //恢復讀1302
BPC_ok = 0; //授時成功標志清零
BPC_EN = 1; //接收成功后，關閉BPC
BPC_FailLED = 0; //關閉授時失敗指示燈
keyBPCflag = 0; //取消強制對時標志位
}
}
/**************************************************
* BPC自動接收函數 : BPC_openset()
* 函數功能 : 設置BPC開啟授時時間
*************************************************/
void BPC_openset()
{
uchar t;
t = (TIME[2]>>4)*10+(TIME[2]&0x0f)%10; //先讀出1302的小時值，轉換成十進制
if(t == 2) //夜間2點，持續接收BPC。
{
if(BPC_ok) //先判斷BPC授時成功標志位，授時成功一次，不再執行該程序
{
BPC_EN = 0; //打開BPC授時模塊
BPC_FailLED = 1; //打開授時失敗指示燈
}
}
if(t == 3) //夜時3點，如未成功授時自動關閉BPC
{
if(keyBPCflag == 0) //判斷按鍵強制對時按鍵標志位，如果有按鍵強制對時，不執行
{
BPC_EN = 1; //1小時內授時不成功，關閉BPC模塊，不關指示燈用于提示授時失敗
BPC_ok = 1; // 開授時成功標志位，以便下一個2點能開啟BPC模塊
}
}
}
/*******************************************************************************
* 函數名 : main
* 函數功能 : 主函數
*******************************************************************************/
void main()
{
Ring = 0; // 整點報時初始值
BPC_EN = 1; //BPC使能初始
BPC_FailLED = 0; //授時失敗指示燈初始
EA = 1;
TMOD = 0x01; //T0
TH0 = (65536-2000)/256; //LED刷新和定時讀DS1302
TL0 = (65536-2000)%256;
TR0 = 1;
ET0 = 1;
IT1=1; //P33下降沿觸發
EX1=1; //開啟外部中斷
PX1=1; //外部中斷優先
//Ds1302Init(); //本程序無需初始化DS1302
while(1)
{
Closealarm(); //整點報時關閉時段
keyscan(); //按鍵
AlarmRing(); //整點報時
BPC_openset(); // BPC開啟函數
recieveBPCtime(); //BPC接收轉換函數
if(flag200ms) //讀1302時間標志
{
flag200ms = 0;
if(keysetflag == 0) //有按鍵調整時，標志位置1，暫停讀1302
{
datapros(); //數據處理函數
}
}
}
}
/*******************************************************************************
* 函數名 : interruptimer()
* 函數功能 : 中斷，刷新數碼管，BPC時間記時判斷脈寬值
*******************************************************************************/
void interrutptimer() interrupt 1
{
uchar i,ms;
TH0 = (65536-2000)/256; //1ms
TL0 = (65536-2000)%256;
ms++;
if(ms>=200)
{
ms = 0;
flag200ms = 1; //讀1302間隔時間段
}
switch(i)
{
case 0: P1=0x3e;i++;P0=0x00;P0=DisplayData[5];break; // 秒
case 1: P1=0x3d;i++;P0=0x00;P0=DisplayData[4];break;
case 2: P1=0x3b;i++;P0=0x00;P0=DisplayData[3];break; //分
case 3: P1=0x37;i++;P0=0x00;P0=DisplayData[2];break;
case 4: P1=0x2f;i++;P0=0x00;P0=DisplayData[1];break; //時
case 5: P1=0x1f;i=0;P0=0x00;P0=DisplayData[0];break;
default: break;
}
Dat_add++; //外部中斷內對ADD清零，1500次內，有外部中斷，重新清零
if(Dat_add>1500) //BPC啟始信號，每1MS對DAT_add加1，如在1500個周期內沒有進入外部中斷被清零，1.5S后標志找到超始信號，重新對Dat_num清零，以便重新對19個位賦值
Dat_num=0; //對數組清零，說明已授收到超始脈沖
if(BPC_add) //外部中斷標志為真
{
if(!BPC) // 第1個脈沖負邊到來時
BPC_temp++; //用BPC_temp累加值來判斷脈寬
else
{
BPC_add=0; //當第1個脈沖跳變為正邊時，對BPC_add標志位清零，等待下個脈沖的中斷
if((BPC_temp>50)&&(BPC_temp<150)) BPC_dat[Dat_su][Dat_num]=0; //判斷脈寬值，賦值給二維數組的第[0][0]
else if((BPC_temp>150)&&(BPC_temp<250))BPC_dat[Dat_su][Dat_num]=1;
else if((BPC_temp>250)&&(BPC_temp<350))BPC_dat[Dat_su][Dat_num]=2;
else if((BPC_temp>350)&&(BPC_temp<450))BPC_dat[Dat_su][Dat_num]=3;
else Dat_num=0; //如果以上有不正確的值，對Dat_num清零重來
Dat_num++; //對第二維的數據的值清零
if(Dat_num>18)
{
Dat_num=0;
As_time=1; //正確接收19位數據標志位
Dat_su++; //對第一維的數據增加，最終共3*19組數據
if(Dat_su>2)
Dat_su=0;
}
BPC_temp=0; //脈沖累加值清零
}
}
}
/***********************************************************************
* 電波鐘中斷檢測函數：Time_EX1()
* 函數功能 : BPC當外部下降沿時產生中斷，標志置位，清零時間累加值
***************************************************************************/
void Time_EX1(void)interrupt 2 //外部中斷，優先級為最高，防止漏檢
{
BPC_add=1; //外部中斷標志
Dat_add=0; //1ms定時中斷內對變量加1，用來判斷1.5S的超始脈沖
}

復制代碼

久久久久久久999_99精品久久精品一区二区爱城_成人欧美一区二区三区在线播放_国产精品日本一区二区不卡视频_国产午夜视频_欧美精品在线观看免费