闹钟
#include<pic.h>
#include<string.h>
#define ucharunsigned char
#define uint unsigned int
#defineT_IOIOTRISA1
#defineKS1 RA3
#defineKS2 RA4
#defineKS3 RA5
#defineT_CLKRA0
#defineT_IO RA1
#defineT_RSTRA2
#defineFm RC0
union {
struct {
unsigned b0:1;
unsigned b1:1;
unsigned b2:1;
unsigned b3:1;
unsigned b4:1;
unsigned b5:1;
unsigned b6:1;
unsigned b7:1;
}oneBit;
unsigned char allBits;
} myFlag;
union {
struct {
unsigned b0:1;
unsigned b1:1;
unsigned b2:1;
unsigned b3:1;
unsigned b4:1;
unsigned b5:1;
unsigned b6:1;
unsigned b7:1;
}tpBit;
unsigned char tpBits;
} tp;
#define acc0 tp.tpBit.b0
#define acc7 tp.tpBit.b7
#define acctp.tpBits
#define FMbit myFlag.oneBit.b2
constunsigned char table={ 0x0C0, 0x0F9, 0x0A4,0x0B0, 0x99, 0x92,0x82, 0x0F8,0x80,0x90,0xff};
constunsigned charDs1302[] = {2, 9, 5,9};//被调整数据上下对比值
// // 时 分
//////////ROM区///////////////
ucharBCD;//数据送LED的数据 暂存区
//ucharReeprom;
uchar appear;//2送LED的数据 暂存区
uchar get1302;//从1302读出 秒 分 时 日 月 星期 年 暂存区
ucharDisCash;//合字->1302
unsigned char temp,temp1;
//延时子程序
void delay(unsignedint i )
{
while(i--);
}
void display(unsigned char x)//显示程序
{
unsigned char b,c ,i;
i=x;
b=0x10;
for(c=0;c<4;c++)
{
PORTB=table[ appear] ;
if(( myFlag.oneBit.b0==1)&& (c==1)) RB7=0;//点闪
if(( myFlag.oneBit.b1==1)&& (c==2)) RB7=0;//点闪
PORTC=(PORTC&0x0f)|b;
CLRWDT();
delay(300);//延时子程序
b=b<<1;
i=i++;
}
}
/////往1302写入1Byte数据////////////////////////////////////////////////
void RTInputByte(uchar d) ////
{ ////
uchar i; ////
acc = d; // tp.tpBits// ////
T_IOIO=0; ////
for(i=8; i>0; i--) ////
{ ////
T_IO = acc0;//CARRY;//ACC0;//*相当于汇编中的 RRC */ ////
T_CLK = 1; ////
T_CLK = 0; ////
acc = acc >> 1; ////
} ////
} ////
///////从1302读取1Byte数据//////////////////////// ////
uchar RTOutputByte(void) ////
{ ////
uchar i; ////
T_IOIO=1; ////
for(i=8; i>0; i--) ////
{ ////
acc = acc >>1; //*相当于汇编中的 RRC */ ////
acc7= T_IO;// CARRY ////
T_CLK = 1; ////
T_CLK = 0; ////
} ////
return(acc); ////
} ////
///////先写地址，后写命令/数据////////////////////////// ////
void W1302(uchar ucAddr, uchar ucDa) ////
{ ////
T_RST = 0; ////
T_CLK = 0; ////
T_RST = 1; ////
RTInputByte(ucAddr); // /* 地址，命令 */ ////
RTInputByte(ucDa); // /* 写1Byte数据*/ ////
T_CLK = 1; ////
T_RST = 0; ////
} ////
///////先写地址，后读命令/数据//////////////////////// ////
uchar R1302(uchar ucAddr) ////
{ ////
uchar ucData; ////
T_RST = 0; ////
T_CLK = 0; ////
T_RST = 1; ////
RTInputByte(ucAddr); // /* 地址，命令 */ ////
ucData = RTOutputByte(); // /* 读1Byte数据 */ ////
T_CLK = 1; ////
T_RST = 0; ////
return(ucData); ////
} ////
/////////向1302写入 秒 分 时 日 月 星期 年 *///////////// ////
void Set1302(uchar *pClock ,uchar a ) ////
{ ////
uchar i; ////
uchar ucAddr = a;//0x80;// 秒. 分 /0x0C0 RAM ////
W1302(0x8e,0x00); ///* 控制命令,WP=0,允许写操作*/ ////
for(i =3; i>0; i--) ////
{ ////
W1302(ucAddr,*pClock); ///* 秒 分 时 日 月 星期 年 */ ////
pClock++; ////
ucAddr +=2; ////
} ////
W1302(0x8e,0x80); // /* 控制命令,WP=1,写保护*/ ////
} ////
////////从1302读出 秒 分 时 日 月 星期 年 *////////////////// ////
void v_Get1302(unsigned charucCurtime[],uchar a) ////
{ ////
unsigned char i; ////
unsigned char ucAddr = a;//0x83分 0x0C1 RAM ////
for (i=0;i<2;i++) ////
{ ////
ucCurtime = R1302(ucAddr);///*格式为: 秒 分 时 日 月 星期 年 */
ucAddr += 2; ////
} ////
} ////
//////////拆字子程序////////////////////////////////////////////////////
voidbcd_bcd( ucharx )
{uchari,b, a=1;
i=x;
for (b=0;b<2;b++)
{
appear=(get1302&0xf0)>>4;
i++;
appear=get1302&0x0f;
i++;
a--;
}
} ////
////////蜂名器//////////////////////////////////////////////////////////
voidF_m()
{
uchar a =8;
while(a--)
{
Fm=!Fm;
delay(10);//延时子程序
// Fm=1;
}
}
//////////按键扫描//////////////////////////////////////////////////////
void Key()
{
uchar a,b,i, d,c,e;
if(( KS3==0)||(KS2==0))
{a=20;
F_m();
while(a--) display(0);//延时再判断
if(56!=(PORTA&56))
{
if (KS3==0){b=0;i=4;c=0;e=0; myFlag.oneBit.b0=1;}//点长亮//是 时钟设置
else {b=0;i=8;c=4;e=4; myFlag.oneBit.b1=1;myFlag.oneBit.b0=0;}// 是 闹钟设置
while( KS3==0||KS2==0) display(e);//等待抬起
di();
d=0;
//b=0;i=4;
while (c<i&&d<20)//选择被调整数
{
ucharz,x;
for(z=50;z>0&&c<i;z--)//亮50次
{ z--;
display(e);
a=PORTA&56 ;
switch(a)
{// display(e);
case 48 : if( appear!= Ds1302) //110 ks1=0
appear++;
F_m();
if(appear==2&&appear>3)appear=0;
for(x=20;x>0&&56!=(PORTA&56);x--)
display(e);d=0; break;
case 40 : if(appear!=0) //101 ks2=0
appear--;
F_m();
for(x=20;x>0&&56!=(PORTA&56);x--)
display(e); d=0; break;
case 24 :c++;b++; F_m(); while( KS3==0) display(e);d=0; break; //011 ks3=0
}
}
if (c<i)
{
for(z=50; z>0&&56==(PORTA&56);z--)//被调整数闪烁程序
{uchar i;
i=appear;
appear=10;
display(e);
appear=i;
} d++;
}
}
while( KS3==0)display(0);
if(e==0) { i=3; c=2;}
else { i=7; c=6;}
for(b=1;b<3;b++)
{
DisCash=((appear&0x0f)*16)|(appear&0x0f);//合字
i=i-2;
c=c-2;
}
if(e==0)Set1302(&DisCash,0x80);//写1302 DisCash=0;DisCash=dtat;DisCash=dtat
else Set1302(&DisCash,0x0C0);//写1302 RAM
myFlag.oneBit.b1=0;
}
}
}
//系统 各I/O初始化子程序
voidinitial ()
{ TRISB=0;
TRISC=2;
ADCON1=7;;//设置RA为IO口
TRISA=0x38;
PORTC=1;
}
void main()
{
initial ();//系统 各I/O初始化子程序
temp=50;
temp1=10;
v_Get1302(get1302,0x0C3);//从1302读出RAM
bcd_bcd(4);//拆字子程序
while(1)
{
v_Get1302(get1302,0x83);//从1302读出 秒 分 时 日 月 星期 年
bcd_bcd(0);//拆字子程序
display(0);//显示程序
Key();
temp=temp--;//点闪记时
if( temp==0){ temp=50;myFlag.oneBit.b0=!myFlag.oneBit.b0; FMbit=!FMbit; }
if(appear==appear&&appear==appear&&appear==appear&&appear==appear&&FMbit)
{
if(temp1==0)
{
Fm=!Fm; temp1=10;
}temp1--;
}
else Fm=1;
}
}
页:
[1]