電子台歷單片機代碼

⑴ 跪求 51單片機+12864液晶+1302時鍾製成的萬年歷c程序

頂層文件 萬年歷.C
#include<reg51.h>
#include "LCD1602.h"
#include "DS1302.h"
#define uchar unsigned char
#define uint unsigned int
sbit speaker=P2^4;
bit key_flag1=0,key_flag2=0;
SYSTEMTIME adjusted;
uchar sec_add=0,min_add=0,hou_add=0,day_add=0,mon_add=0,yea_add=0;
uchar data_alarm[7]={0};
/************鍵盤控制******************************/
int key_scan() //掃描是否有鍵按下
{ int i=0;
uint temp;
P1=0xf0;
temp=P1;
if(temp!=0xf0)
i=1;
else
i=0;
return i;
}
uchar key_value() //確定按鍵的值
{
uint m=0,n=0,temp;
uchar value;
uchar v[4][3]={'2','1','0','5','4','3','8','7','6','b','a','9'} ;
P1=0xfe; temp=P1; if(temp!=0xfe)m=0;
P1=0xfd;temp=P1 ;if(temp!=0xfd)m=1;
P1=0xfb;temp=P1 ;if(temp!=0xfb)m=2;
P1=0xf7;temp=P1 ;if(temp!=0xf7)m=3;
P1=0xef;temp=P1 ;if(temp!=0xef)n=0;
P1=0xdf;temp=P1 ;if(temp!=0xdf)n=1;
P1=0xbf;temp=P1 ;if(temp!=0xbf)n=2;
value=v[m][n];
return value;
}
/***************************設置鬧鈴函數*******************************/
void naoling(void)
{
uchar i=0,l=0,j;
init1602();
while(key_flag2&&i<12)
if(key_scan()){j=key_value();write_data(j);if(i%2==0)data_alarm[l]=(j-'0')*10;else {data_alarm[l]+=(j-'0');l++;}i++;delay(600);}
write_com(0x01);
}
uchar according(void)
{ uchar k;
if(data_alarm[0]==adjusted.Year&&data_alarm[1]==adjusted.Month&&data_alarm[2]==adjusted.Day&&data_alarm[3]==adjusted.Hour&&data_alarm[4]==adjusted.Minute&&data_alarm[5]==adjusted.Second)
k=1;
else k=0;
return k;
}
void speak(void)
{uint i=50;
while(i)
{speaker=0;
delay(1);
speaker=1;
delay(1);
i--;
}
}
void alarm(void)
{uint i=10;
while(i)
{
speak();
delay(10);
i--;
}
}
/**************************修改時間操作********************************/
void reset(void)
{
sec_add=0;
min_add=0;
hou_add=0;
day_add=0;
mon_add=0;
yea_add=0 ;
}
void adjust(void)
{

if(key_scan()&&key_flag1)
switch(key_value())
{case '0':sec_add++;break;
case '1':min_add++;break;
case '2':hou_add++;break;
case '3':day_add++;break;
case '4':mon_add++;break;
case '5':yea_add++;break;
case 'b':reset();break;
default: break;
}
adjusted.Second+=sec_add;
adjusted.Minute+=min_add;
adjusted.Hour+=hou_add;
adjusted.Day+=day_add;
adjusted.Month+=mon_add;
adjusted.Year+=yea_add;
if(adjusted.Second>59) adjusted.Second=adjusted.Second%60;

if(adjusted.Minute>59) adjusted.Minute=adjusted.Minute%60;

if(adjusted.Hour>23) adjusted.Hour=adjusted.Hour%24;

if(adjusted.Day>31) adjusted.Day=adjusted.Day%31;

if(adjusted.Month>12) adjusted.Month=adjusted.Month%12;

if(adjusted.Year>100) adjusted.Year=adjusted.Year%100;

}

/**************************中斷處理函數*********************************/
void changing(void) interrupt 0 using 0 //需要修改時間和日期，或者停止修改
{
if(key_flag1)key_flag1=0;
else key_flag1=1;
}
void alarming(void) interrupt 3 using 0 //需要設置鬧鈴或者停止設置
{
if(key_flag2)key_flag2=0;
else key_flag2=1;
}
/********************************主函數***********************************/
main()
{uint i;
uchar *l;
uchar p1[]="D:",p2[]="T:";
SYSTEMTIME T;
EA=1;
EX0=1;
IT0=1;
EA=1;
EX1=1;
IT1=1;
init1602();
Initial_DS1302() ;

while(1)
{ write_com(0x80);
write_string(p1,2);
write_com(0xc0);
write_string(p2,2);
DS1302_GetTime(&T) ;
adjusted.Second=T.Second;
adjusted.Minute=T.Minute;
adjusted.Hour=T.Hour;
adjusted.Week=T.Week;
adjusted.Day=T.Day;
adjusted.Month=T.Month;
adjusted.Year=T.Year;
for(i=0;i<9;i++)
{
adjusted.DateString[i]=T.DateString[i];
adjusted.TimeString[i]=T.TimeString[i];
}
adjust();
if(key_flag2)naoling();
if(according())alarm();
DateToStr(&adjusted);
TimeToStr(&adjusted);
write_com(0x82);
write_string(adjusted.DateString,8);
write_com(0xc2);
write_string(adjusted.TimeString,8);
delay(10);
}
（二）頭文件1 顯示模塊 LCD1602.H
#ifndef LCD_CHAR_1602_2009_5_9
#define LCD_CHAR_1602_2009_5_9
#define uchar unsigned char
#define uint unsigned int
sbit lcdrs = P2^0;
sbit lcdrw = P2^1;
sbit lcden = P2^2;
void delay(uint z) // 延時
{
uint x,y;
for(x=z;x>0;x--)
for(y=110;y>0;y--);
}
void write_com(uchar com) // 寫入指令數據到 lcd
{
lcdrw=0;
lcdrs=0;
P0=com;
delay(5);
lcden=1;
delay(5);
lcden=0;
}

void write_data(uchar date) // 寫入字元顯示數據到 lcd
{
lcdrw=0;
lcdrs=1;
P0=date;
delay(5);
lcden=1;
delay(5);
lcden=0;
}
void init1602() // 初始化設定
{
lcdrw=0;
lcden=0;
write_com(0x3C);
write_com(0x0c);
write_com(0x06);
write_com(0x01);
write_com(0x80);
}
void write_string(uchar *pp,uint n)
{
int i;
for(i=0;i<n;i++)
write_data(pp[i]);
}
#endif
(三)頭文件2 時鍾模塊 DS1302.H
#ifndef _REAL_TIMER_DS1302_2009_5_20_
#define _REAL_TIMER_DS1302_2003_5_20_

sbit DS1302_CLK = P2^6; //實時時鍾時鍾線引腳
sbit DS1302_IO = P2^7; //實時時鍾數據線引腳
sbit DS1302_RST = P2^5; //實時時鍾復位線引腳
sbit ACC0 = ACC^0;
sbit ACC7 = ACC^7;

typedef struct SYSTEM_TIME
{
unsigned char Second;
unsigned char Minute;
unsigned char Hour;
unsigned char Week;
unsigned char Day;
unsigned char Month;
unsigned char Year;
unsigned char DateString[9]; //用這兩個字元串來放置讀取的時間
unsigned char TimeString[9];
}SYSTEMTIME; //定義的時間類型

#define AM(X) X
#define PM(X) (X+12) // 轉成24小時制
#define DS1302_SECOND 0x80
#define DS1302_MINUTE 0x82
#define DS1302_HOUR 0x84
#define DS1302_WEEK 0x8A
#define DS1302_DAY 0x86
#define DS1302_MONTH 0x88
#define DS1302_YEAR 0x8C
#define DS1302_RAM(X) (0xC0+(X)*2) //用於計算 DS1302_RAM 地址的宏

/******內部指令**********/
void DS1302InputByte(unsigned char d) //實時時鍾寫入一位元組(內部函數)
{
unsigned char i;
ACC = d;
for(i=8; i>0; i--)
{
DS1302_IO = ACC0;
DS1302_CLK = 1;
DS1302_CLK = 0;
ACC = ACC >> 1; //因為在前面已經定義了ACC0 = ACC^0;以便再次利用DS1302_IO = ACC0;
}
}

unsigned char DS1302OutputByte(void) //實時時鍾讀取一位元組(內部函數)
{
unsigned char i;
for(i=8; i>0; i--)
{
ACC = ACC >>1;
ACC7 = DS1302_IO;
DS1302_CLK = 1;
DS1302_CLK = 0;
}
return(ACC);
}
/********************************/

void Write1302(unsigned char ucAddr, unsigned char ucDa) //ucAddr: DS1302地址, ucData: 要寫的數據
{
DS1302_RST = 0;
DS1302_CLK = 0;
DS1302_RST = 1;
DS1302InputByte(ucAddr); // 地址，命令
DS1302InputByte(ucDa); // 寫1Byte數據
DS1302_CLK = 1;
DS1302_RST = 0;
}

unsigned char Read1302(unsigned char ucAddr) //讀取DS1302某地址的數據
{
unsigned char ucData;
DS1302_RST = 0;
DS1302_CLK = 0;
DS1302_RST = 1;
DS1302InputByte(ucAddr|0x01); // 地址，命令
ucData = DS1302OutputByte(); // 讀1Byte數據
DS1302_CLK = 1;
DS1302_RST = 0;
return(ucData);
}

void DS1302_SetProtect(bit flag) //是否防寫
{
if(flag)
Write1302(0x8E,0x10);
else
Write1302(0x8E,0x00);
}

void DS1302_SetTime(unsigned char Address, unsigned char Value) // 設置時間函數
{
DS1302_SetProtect(0);
Write1302(Address, ((Value/10)<<4 | (Value%10))); //將十進制數轉換為BCD碼
} //在DS1302中的與日歷、時鍾相關的寄存器存放的數據必須為BCD碼形式

void DS1302_GetTime(SYSTEMTIME *Time)
{
unsigned char ReadValue;
ReadValue = Read1302(DS1302_SECOND);
Time->Second = ((ReadValue&0x70)>>4)*10 + (ReadValue&0x0F); //將BCD碼轉換為十進制數
ReadValue = Read1302(DS1302_MINUTE);
Time->Minute = ((ReadValue&0x70)>>4)*10 + (ReadValue&0x0F);
ReadValue = Read1302(DS1302_HOUR);
Time->Hour = ((ReadValue&0x70)>>4)*10 + (ReadValue&0x0F);
ReadValue = Read1302(DS1302_DAY);
Time->Day = ((ReadValue&0x70)>>4)*10 + (ReadValue&0x0F);
ReadValue = Read1302(DS1302_WEEK);
Time->Week = ((ReadValue&0x70)>>4)*10 + (ReadValue&0x0F);
ReadValue = Read1302(DS1302_MONTH);
Time->Month = ((ReadValue&0x70)>>4)*10 + (ReadValue&0x0F);
ReadValue = Read1302(DS1302_YEAR);
Time->Year = ((ReadValue&0x70)>>4)*10 + (ReadValue&0x0F);
}
unsigned char *DataToBCD(SYSTEMTIME *Time)
{
unsigned char D[8];
D[0]=Time->Second/10<<4+Time->Second%10;
D[1]=Time->Minute/10<<4+Time->Minute%10;
D[2]=Time->Hour/10<<4+Time->Hour%10;
D[3]=Time->Day/10<<4+Time->Day%10;
D[4]=Time->Month/10<<4+Time->Month%10;
D[5]=Time->Week/10<<4+Time->Week%10;
D[6]=Time->Year/10<<4+Time->Year%10;
return D;
}
void DateToStr(SYSTEMTIME *Time)
{
//將十進制數轉換為液晶顯示的ASCII值
Time->DateString[0] = Time->Year/10 + '0';
Time->DateString[1] = Time->Year%10 + '0';
Time->DateString[2] = '-';
Time->DateString[3] = Time->Month/10 + '0';
Time->DateString[4] = Time->Month%10 + '0';
Time->DateString[5] = '-';
Time->DateString[6] = Time->Day/10 + '0';
Time->DateString[7] = Time->Day%10 + '0';
Time->DateString[8] = '\0';
}

void TimeToStr(SYSTEMTIME *Time)
{
//將十進制數轉換為液晶顯示的ASCII值
Time->TimeString[0] = Time->Hour/10 + '0';
Time->TimeString[1] = Time->Hour%10 + '0';
Time->TimeString[2] = ':';
Time->TimeString[3] = Time->Minute/10 + '0';
Time->TimeString[4] = Time->Minute%10 + '0';
Time->TimeString[5] = ':';
Time->TimeString[6] = Time->Second/10 + '0';
Time->TimeString[7] = Time->Second%10 + '0';
Time->DateString[8] = '\0';
}
void Initial_DS1302(void)
{
unsigned char Second;
Second=Read1302(DS1302_SECOND);
if(Second&0x80) //初始化時間
DS1302_SetTime(DS1302_SECOND,0);
}
void DS1302_TimeStop(bit flag) // 是否將時鍾停止
{
unsigned char Data;
Data=Read1302(DS1302_SECOND);
DS1302_SetProtect(0);
if(flag)
Write1302(DS1302_SECOND, Data|0x80);
else
Write1302(DS1302_SECOND, Data&0x7F);
}
#endif

⑵ C51單片機的萬年歷程序設計

我這有個數碼管顯示的程序
以前做的，。。
你可以在我這個程序上修改修改
包括鍵盤掃描，還有動態顯示
。
。

【。。。】
#include
//常量參數
#define TMODW 0x01;
#define SCONW 0x00;
#define xplay 0x04;//顯示分頻系數
//顯示位選
unsigned char data stb;
//鍵值緩存,0xFF無鍵命令
unsigned char data keynum;
//顯示字型變數
unsigned char data play[8];
//工作參數
unsigned char data l,m;
//字型碼
unsigned char code BCDPC[10]=
{0x3F,0x06,0x5B,0x4F,0x66,
0x6D,0x7D,0x07,0x7F,0x6F};
//字位碼
unsigned char code STBCODE[8]=
{0x01,0x02,0x04,0x08,
0x10,0x20,0x40,0x80 };
//400Hz xplay分頻計數
unsigned char data cttime;
//時鍾參數
unsigned char data hr,min,sec,sec100;
//調整時鍾參數（時鍾「走」）
void ct1()
{sec100++;
if (sec100==100)
{sec100=0;sec++;
if (sec==60)
{sec=0;min++;
if (min==60)
{min=0;hr++;
if (hr==24) hr=0;
}
}
}
}
//時鍾參數→LED 顯示緩存7段參數轉換函數；
void xcplay()
{play[0]=BCDPC[hr/10];
play[1]=BCDPC[hr%10];
play[2]=BCDPC[min/10];
play[3]=BCDPC[min%10];
play[4]=BCDPC[sec/10];
play[5]=BCDPC[sec%10];
play[6]=BCDPC[sec100/10];
play[7]=BCDPC[sec100%10];
}
//顯示掃描
void cplay()
{T0=1;//T0－高電平消隱
T1=0;//T1－低電平準備發脈沖前沿
TI=0;//？
P1=0;//？
SBUF=STBCODE[stb];
while (TI==0)
{
};
TI=0;
SBUF=play[stb];
while (TI==0)
{
};
T1=1;
T0=0;
stb=++stb&0x07;
}

extern void cthl0();
//定時器0中斷處理程序
void ct0(void) interrupt 1 using 1
{cthl0();
cttime--;
if (cttime==0)
{cttime=xplay;
ct1();//調用時鍾「走」函數
xcplay();//調用時鍾參數→Led顯示緩存轉換函數
};
cplay();
}
void w20ms()
{for (l=0;l<41;l++)
{for (m=0;m<81;m++)
{
}
}
}
void tkey()
{P1=0xF0;
keynum=0xFF;
if (P1!=0xF0)
{w20ms();
P1=0xF0;
if (P1!=0xF0)
{P1=0xFE;
switch (P1)
{case 0xEE:keynum=0;break;
case 0xDE:keynum=1;break;
case 0xBE:keynum=2;break;
case 0x7E:keynum=3;break;
}
P1=0xFD;
switch (P1)
{case 0xED:keynum=4;break;
case 0xDD:keynum=5;break;
case 0xBD:keynum=6;break;
case 0x7B:keynum=7;break;
}
P1=0xFB;
switch (P1)
{
case 0xEB:keynum=8;break;
}
};
};
P1=0x00;
}
void command()
{switch (keynum)
{
case 0:{hr=hr+1;
if (hr==24)
hr=0;
}
break;

case 1:{min=min+1;
if (min==60)
min=0;
}
break;

case 2:{sec=sec+1;
if (sec==60)
sec=0;
}
break;

case 3:{sec100=0;
}
break;

case 4:{
while(!(P1=0xED))
{
hr=0;
min=0;
sec=0;
}
}
break;

case 5:{hr=hr-1;
if (hr==00)
hr=24;
}
break;
case 6:{min=min-1;
if (min==00)
min=59;
}
break;

case 7:{sec=sec-1;
if (sec==00)
sec=0;
}
break;

case 0xFF:break;
}
keynum=0xFF;
}
main ()
{ hr=8;
min=5;
sec=8;
sec100=0;
TMOD=TMODW;
SCON=SCONW;
ET0=1;
TR0=1;
EA=1;
cttime=xplay;
while (1)
{w20ms();
tkey();
command();

};
}

⑶ 急求 51單片機的萬年歷課設電路圖及代碼 謝謝

別人沒事，翻幾天資料給你寫論文，你覺得可能嘛？反正我是不會說我學電子信息工程的，我不會做51單片機那些電子自動化的東西的

⑷ 單片機做的日歷 c語言程序

這是一個DS1302時鍾程序，根據自己的硬體電路適當改改就可以做成日歷了 /********************************************************************
*DS1302控製程序 2011.12.01 wqz
********************************************************************/
#include<reg52.h>
#include<intrins.h>

typedef unsigned uchar;sbit sda=P2^1; //DS1302
sbit clk=P2^0;
sbit ce=P2^2;
//sbit sda=P3^4;
//sbit clk=P3^6;
//sbit ce=P3^5;
//
//sbit _138_A=P2^2; //138A,B,C口
//sbit _138_B=P2^3;
//sbit _138_C=P2^4;sbit IO =P1^7; //595控制信號
sbit RLK =P1^6;
sbit CLK =P1^5;#define my_delay5us() _nop_();_nop_();_nop_();_nop_();_nop_();_nop_();\
_nop_();_nop_();_nop_();_nop_();_nop_();_nop_()
//#define T0_init() TMOD=0x01;TH0=0xb8;TL0=0x00;TR0=1;ET0=1;EA=1uchar cc[8]; //將要顯示的時間由BCD碼轉換成要顯示的數值存放在CC[]中
uchar bb[8]; //存放從DS1302中讀取出來的數據
uchar aa[7]={0,30,18,20,12,6,11}; //初始時間
uchar code write_rtc[]={0x80,0x82,0x84,0x86,0x88,0x8a,0x8c}; //時間寄存器寫地址
uchar code tember[]={0x3f,0x06,0x5b,0x4f,0x66,0x6d,0x7d,0x07,0x7f,0x6f,0x40}; //共陰數碼管顯示表void my_delay1ms(int t); //延時1ms函數
void write_1byte(uchar temp); //寫一位元組數據
uchar read_1byte(); //讀一字李數據
void write_addr_data(uchar Addr, uchar Data); //先寫地址再寫數據
uchar writeadd_readdat(uchar ucAddr); //先寫地址再讀數據
void write1_readM(); //連續讀多個位元組數據
void ds1302_init(); //DS1302初始化/********************************************************************
*
* 主函數
********************************************************************/void main()
{
uchar i,j,dat; my_delay1ms(10);
ds1302_init(); //給DS1302付初值 11年12月20日 周六 18-30-00
// T0_init(); while(1)
{
write1_readM(); //讀DS1302中的數據 cc[0]=bb[0]%16;
cc[1]=bb[0]/16;
cc[2]=10;
cc[3]=bb[1]%16;
cc[4]=bb[1]/16;
cc[5]=10;
cc[6]=bb[2]%16;
cc[7]=bb[2]/16; for(j=0;j<8;j++)
{
dat=tember[cc[j]];
RLK=0;
my_delay5us();
for(i=0;i<8;i++)
{
if(dat&0x80)IO=1;
else IO=0;
my_delay5us();
CLK=1;
my_delay5us();
CLK=0;
dat<<=1;
}
my_delay5us();
RLK=1;
}
my_delay1ms(500);
}
}/**********************************************************************/void my_delay1ms(int t) //延時
{
uchar i,j;
while(t--)
{
for(i=4;i>0;i--)
for(j=50;j>0;j--);
}
}/**********************************************************************/void write_1byte(uchar temp) //寫一位元組數據
{
uchar i; clk=0;
my_delay5us();
for (i=0;i<8;i++)
{
if(temp&0x01)sda=1;
else sda=0;
my_delay5us();
clk=1;
my_delay5us();
clk=0;
temp>>=1;
}
}/**********************************************************************/uchar read_1byte() //讀一位元組數據
{
uchar i,num;
for (i=0;i<8;i++)
{
num>>=1;
if(sda)
num|=0x80;
my_delay5us();
clk=1;
my_delay5us();
clk=0;
}
return num;
}/**********************************************************************/void write_addr_data(uchar Addr, uchar Data) //先寫地址再寫數據
{
ce = 0;
my_delay5us();
clk = 0;
my_delay5us();
ce = 1;
my_delay5us();
write_1byte(Addr); // 地址，命令
write_1byte(Data); // 寫1Byte數據
my_delay5us();
clk=1;
my_delay5us();
ce =0;
} /**********************************************************************/uchar writeadd_readdat(uchar ucAddr) //先寫地址再讀數據
{
uchar num1=0; ce = 0 ;
my_delay5us();
clk = 0;
my_delay5us();
ce = 1;
my_delay5us();
write_1byte(ucAddr); // 地址，命令
num1 = read_1byte(); // 讀1Byte數據
my_delay5us();
clk = 1;
my_delay5us();
ce =0; return(num1);
}/**********************************************************************/void write1_readM() //連續讀多個位元組數據
{
uchar i,Addr; Addr=0x81;
for (i=0;i<7;i++)
{
bb[i] = writeadd_readdat( Addr);//*格式為: 秒 分 時 日 月 星期 年
Addr += 2;
}
}/**********************************************************************/void ds1302_init() //初始時間 11年12月20日 周六 18-30-00
{
uchar i,*p,tmp; for(i=0;i<7;i++)
{ /*如想設置DS1302的「秒」，設置時間為37秒，所以輸入的是十*/
tmp=aa[i]/10; /*進制數37，對應的16進制是0x25，但是DS1302寄存器使用的是壓*/
aa[i]=aa[i]%10; /*縮BCD碼，所以應該寫入BCD數值37才行，即0x37。所以需要將*/
aa[i]=aa[i]+tmp*16; /*10進制的37轉換為16進製表示的0x37*/
}
write_addr_data(0x8E,0X00);

p=write_rtc; //傳地址
for(i=0;i<7;i++) //7次寫入 秒分時日月周年
{
write_addr_data(*p,aa[i]);
p++;
} write_addr_data(0x8E,0x80);
}/**********************************************************************///void ET0_ser() interrupt 1
//{
//// uchar i;
//
// TH0=0x55;
// TL0=0x00;
//
//// P0=tember[cc[i]];
//// switch(i)
//// {
//// case 0 : _138_A=1;_138_B=1;_138_C=1; break;
//// case 1 : _138_A=0;_138_B=1;_138_C=1; break;
//// case 2 : _138_A=1;_138_B=0;_138_C=1; break;
//// case 3 : _138_A=0;_138_B=0;_138_C=1; break;
//// case 4 : _138_A=1;_138_B=1;_138_C=0; break;
//// case 5 : _138_A=0;_138_B=1;_138_C=0; break;
//// case 6 : _138_A=1;_138_B=0;_138_C=0; break;
//// case 7 : _138_A=0;_138_B=0;_138_C=0; break;
//// }
//// i++;
//// if(i==8)i=0;
//}

⑸ 基於51單片機，DS1302,1602實現萬年歷（年月日時分秒）及鬧鍾功能的C程序，不要顯示農歷和溫度，謝謝！！

【八】電子表、萬年歷系列
[1]單片機公交車環境監測及時間顯示系統
功能描述：
1、按鍵調時間
2、帶備用電池（斷電繼續走時）
3、監測雜訊和溫濕度並實時顯示
4、超過報警值蜂鳴器會響
☆已作出的實物優酷視頻演示地址：
http://v.youku.com/v_show/id_XMTQ3OTMxMDUwMA==.html
[2]單片機語音報時電子表

功能描述：
1、按鍵調試設置鬧鍾
2、帶備用電池（斷電繼續走時）
3、整點語音報時
☆已作出的實物優酷視頻演示地址：
http://v.youku.com/v_show/id_XMTQ3OTMwMjM0OA==.html
[3]單片機紅外遙控電子表語音報時語音播報溫濕度

功能描述：
1、紅外遙控調時間設定鬧鍾
2、帶備用電池（斷電繼續走時）
3、整點語音報時語音播報溫濕度
4、按鍵遙控語音報時語音播報溫濕度
☆已作出的實物優酷視頻演示地址：
http://v.youku.com/v_show/id_XMTQ3OTMxMTUyOA==.html
[4]單片機紅外遙控電子表語音報時格林威治時間雙顯示

功能描述：
1、紅外遙控調時間設定鬧鍾
2、帶備用電池（斷電繼續走時）
3、整點語音報時語音播報溫濕度
4、按鍵遙控語音報時語音播報溫濕度
☆已作出的實物優酷視頻演示地址：
http://v.youku.com/v_show/id_XMTQ3OTMxMTUyOA==.html
[5]單片機多功能萬年歷電子表系統節日提醒溫濕度顯示

功能描述：
1、按鍵調時間，設置鬧鍾
2、帶備用電池（斷電繼續走時）
3、陽歷、農歷節日提醒；可顯示上午、中午、晚上、午夜、深夜等時間段
4、溫濕度實時顯示（可替換其他感測器數據顯示）
5、功能擴展：語音播報萬年歷、溫濕度等。（此項功能為擴展功能，需要需補差價）
☆已作出的實物優酷視頻演示地址：
http://v.youku.com/v_show/id_XMTU0MjI4OTExNg==.html
【二十】GPS授時定位系統系列
[1]GPS自動授時系統 語音報時/播報溫濕度
實現功能：
1.可設置授時模式為自動授時和手動更新
2.可脫離GPS數據利用本地時鍾晶元准確走時
3.可設置靜音模式、整點報時和自動語音播報溫濕度及其混合模式等四種語音工作模式
4.可以切換顯示本地時間和溫濕度數據和GPS衛星時間數據和定位數據
5.經過分析GPS數據，利用演算法縮短了解析時間在秒級時間內就能獲取到GPS時間數據（正常情況下，完成定位需要幾分鍾以上）
6.（亮點）利用演算法自動計算星期參數和農歷參數，程序內部演算法輸入任何陽歷日期數據即可得到准確的星期數據和農歷數據
7.利用12864串口工作模式，節省了8個IO
8.可根據需求進行功能定製
☆已作出的實物優酷視頻演示地址：
http://v.youku.com/v_show/id_XMjUzMzcyNTkyOA==.html

⑹ 我用單片機c程序寫的一個日歷，求高手幫我補充下主函數部分的年月日閏年平年的判斷條件

year++;
if(((year%100)==0)&&((year%400)==0))||(((year%100)!=0)&&((year%4)==0))
{
February=29;//2月有29天
}
else
{
February=28;//2月有28天
}

註：符合磨做氏下面兩種情況中的一種就是潤年：1.能被100整除而且能被400整除瞎散胡灶
2.不能被100整除但是能被4整除

⑺ AT89C52+DS1302單片機萬年歷程序

參考程序，可以調節時間，設置鬧鍾，音樂鬧鈴

#include<reg52.h>
#include<INTRINS.H>
/************************************************************/
#define uchar unsigned char
#define uint unsigned int
#define TIME (0X10000-50000)
#define FLAG 0XEF //鬧鍾標志
/************************************************************/
//引腳連接圖
sbit CLK=P1^2;
sbit RST=P1^4;
sbit DAT=P1^3;
sbit RS=P1^5;
sbit RW=P1^6;
sbit E=P1^7;
sbit P32=P3^2;

sbit KEY1 = P2^7;
sbit KEY2 = P2^6;
sbit KEY3 = P2^5;
sbit KEY4 = P2^4;

sbit ACC_7=ACC^7;
/************************************************************/
//全局變數及常量定義
uchar i=20,j;
uchar DataBuf[16] = {};//日期
uchar TimeBuf[16] = {};//時間
uchar alarm[2],time[3];
uchar code Day[]={31,28,31,30,31,30,31,31,30,31,30,31};//12個月的最大日期(非閏年)

//閏年月星期表
const unsigned char WeekTab[] = {

(3 << 5) + 31,///1月
(6 << 5) + 29,///2月
(0 << 5) + 31,///3月
(3 << 5) + 30,///4月
(5 << 5) + 31,//5月
(1 << 5) + 30,//6月
(3 << 5) + 31,//7月
(6 << 5) + 31,//8月
(1 << 5) + 30,//9月
(4 << 5) + 31,//10月
(0 << 5) + 30,//11月
(2 << 5) + 31 //12月
};

//音律表
uint code table1[]={64260,64400,64524,64580,64684,64777,
64820,64898,64968,65030,65058,65110,65157,65178,65217};
//發聲部分的延時時間
uchar code table2[]={0x82,1,0x81,0xf4,0xd4,0xb4,0xa4,
0x94,0xe2,1,0xe1,0xd4,0xb4,0xc4,0xb4,4,0};

//鬧鍾中用的全局變數
uchar th1,tl1;

/************************************************************/
//延時1ms函數
delay1ms(uchar time)
{
uchar i,j;
for(i=0;i<time;i++)
{
for(j=0;j<250;j++);
}
}

/************************************************************/
//LCD控制函數
Enable()
{
RS=0;
RW=0;
E=0;
delay1ms(3);
E=1;
}

/************************************************************/
//LCD1602寫入字元函數
LCD1602_WriteSChr(uchar i)
{
P0=i;
RS=1;
RW=0;
E=0;
delay1ms(2);
E=1;
}

/************************************************************/
//LCD1602寫入字元串函數
//入口函數
//uchar data *address : 寫入數據首地址
//ucharm:寫入位元組數
LCD1602_WriteStr(uchar *address,uchar m)
{
uchar i,j;
for(i=0;i<m;i++,address++)
{
j=*address;
LCD1602_WriteSChr(j);
}
}

/************************************************************/
//LCD顯示
void LCDShow(void)
{
P0=0XC; //顯示器開、游標關
Enable();
//P0=0x80; //寫入顯示起始地址
//Enable();
//LCD1602_WriteStr(DataBuf,16); //寫入日期顯示緩存
P0=0xc1; //寫入顯示起始地址
Enable();

LCD1602_WriteStr(TimeBuf,16); //寫入時間顯示緩存
}

/************************************************************/
//DS1302寫入子程序
void DS1302_Write(uchar temp)
{
uchar i;
CLK=0; //將DS1320時鍾脈沖拉低
_nop_();//延時一指令周期
RST=1; //RST置高電平
_nop_();//延時一指令周期
for(i=0;i<8;i++) //循環8次
{
DAT=temp&0x01; //向DS1302寫入一位元組數據
_nop_(); //延時一指令周期
CLK=1; //拉高時鍾脈沖
temp>>=1; //右移一位
CLK=0; //拉低時鍾脈沖
}
}

/************************************************************/
//DS1302讀取子程序
uchar DS1302_Read()
{
uchar i,j=0;
for(i=0;i<8;i++)//循環8次
{
j>>=1; //右移一位
_nop_(); //延時一指令周期
CLK=0; //拉低時鍾脈沖
_nop_(); //延時一指令周期
if(DAT) //判斷接收該位數據是否為1
j|=0x80;//該位置1
_nop_(); //延時一指令周期
CLK=1; //拉高時鍾脈沖
}
return(j); //返回數值
}

/************************************************************/
//部分顯示數據初始化
TimeStart()
{
TimeBuf[0]=TimeBuf[8]=TimeBuf[9]=TimeBuf[10]=0x20; //不顯示字元
TimeBuf[2]=TimeBuf[5]=':'; //時間分隔顯示
DS1302_Write(0xc1);
alarm[0]=DS1302_Read();
RST=0;
DS1302_Write(0xc3);
alarm[1]=DS1302_Read();
RST=0;
DS1302_Write(0xc5);
DataBuf[0]=DS1302_Read();
RST=0;
}

/************************************************************/
//讀取時間
ReadTime()
{
uchar i,m,n;
for(m=0,i=0,n=0x85;i<7;i+=3,n-=2,m++) //連續讀取時,分,秒
{
DS1302_Write(n); //寫入讀取寄存器指令
time[m]=DS1302_Read(); //讀取數據
RST=0; //將RST電平拉低，停止傳輸
TimeBuf[i]=time[m]/16+0x30; //將兩位數據的十位轉為字元格式
TimeBuf[i+1]=time[m]%16+0x30;//將兩位數據的個位轉為字元格式
}
}

/************************************************************/
//功能選擇超時定時器
time0() interrupt 1 using 1
{
i--;
if(i==0)
{
if(j!=0)
j--;
i=20;
}
TH0=TIME/256,TL0=TIME%256;
}

/************************************************************/
//產生鬧鈴音調
intime1() interrupt 3
{
TH1=th1,TL1=tl1;
P32=!P32;
}

/************************************************************/
//鬧鍾顯示
void AlarmShow(void)
{
uchar i,j,a,b,n;
ET1=1;
for(j=0;j<6;j++)
{
i=0;
while(1)
{
a=table2[i];
if(a==0)
break;
b=a&0xf;
a>>=4;
if(a==0)
{
TR1=0;
goto D1;
}
a=((--a)<<1)/2;
TH1=th1=table1[a]/256,TL1=tl1=table1[a]%256;
TR1=1;
D1: do
{
b--;
for(n=0;n<3;n++)
{
ReadTime();
LCDShow();
P2=0xff;
if(KEY4 == 1)
{
delay1ms(100);
if(KEY4 == 1)
{
TR1=0;
ET1=0;
P32 = 1;
return;
}
}
}
}while(b!=0);
i++;
}
TR1=0;
}
ET1=0;
}

/************************************************************/
//設置日期、時間
void SetTime(void)
{
uchar i=0xc2,year,month,day,n;
TimeBuf[6]=TimeBuf[7]=0x30;
DataBuf[14]=DataBuf[15]=0x20;
LCDShow();
while(1)
{
P0=0xe; //顯示器開、游標開
Enable();
P0=i; //定游標
Enable();
P2=0xff;
if((KEY1 == 1)||(KEY2 == 1)||(KEY3 == 1)||(KEY4 == 1))
{
delay1ms(100); //延時0.1s去抖動
if((KEY1 == 1)||(KEY2 == 1)||(KEY3 == 1)||(KEY4 == 1))
{
j=7;
if(KEY1 == 1)
{
i+=3; //更改設置項目
if(i==0x8e)
i=0xc2;
else if(i>0xc5)
i=0xc2;
}
else if(KEY2 == 1)
{
year=(DataBuf[4]&0xf)*10+(DataBuf[5]&0xf); //將字元格式的年份轉換為數值格式
month=(DataBuf[7]&0xf)*10+(DataBuf[8]&0xf); //將字元格式的月份轉換為數值格式
day=(DataBuf[10]&0xf)*10+(DataBuf[11]&0xf); //將字元格式的日數轉換為數值格式
if(i==0x85) //設置年份
{
year++;
if(year>99)
year=0;
if((year%4)!=0)
if(month==2&&day==29)
day=28;
}
else if(i==0x88) //設置月份
{
month++;
if(month>12)
month=1;
if(day>Day[month-1])
{
day=Day[month-1];
if(month==2&&(year%4)==0) //計算是否閏年
day=29;
}
}
else if(i==0x8b) //設置日期
{
day++;
if(day>Day[month-1])
{
if(month==2&&(year%4)==0) //計算是否閏年
{
if(day>29)
day=1;
}
if(month!=2)
day=1;
}
}
else if(i==0xc2) //設置小時
{
n=(TimeBuf[0]&0xf)*10+(TimeBuf[1]&0xf);
n++;
if(n>23)
n=0;
TimeBuf[0]=n/10+0x30;
TimeBuf[1]=n%10+0x30;
}
else //設置分鍾
{
n=(TimeBuf[3]&0xf)*10+(TimeBuf[4]&0xf);
n++;
if(n>59)
n=0;
TimeBuf[3]=n/10+0x30;
TimeBuf[4]=n%10+0x30;
}
DataBuf[4]=year/10+0x30; //將數值格式的日期轉換為字元形式
DataBuf[5]=year%10+0x30;
DataBuf[7]=month/10+0x30;
DataBuf[8]=month%10+0x30;
DataBuf[10]=day/10+0x30;
DataBuf[11]=day%10+0x30;
LCDShow();
}
else if(KEY3 == 1) //按保存退出鍵後,向DS1302寫入設置後的日期時間
{
DS1302_Write(0x8c);
DS1302_Write((DataBuf[4]&0xf)*16+(DataBuf[5]&0xf));
RST=0;
DS1302_Write(0x8a);
DS1302_Write(SetWeek());
RST=0;
for(i=7,n=0x88;i<11;i+=3,n-=2)
{
DS1302_Write(n);
DS1302_Write((DataBuf[i]&0xf)*16+(DataBuf[i+1]&0xf));
RST=0;
}
for(i=0;i<7;i+=3,n-=2)
{
DS1302_Write(n);
DS1302_Write((TimeBuf[i]&0xf)*16+(TimeBuf[i+1]&0xf));
RST=0;
}
TR0=0;
return;
}
else
{
TR0=0;
return;
}
}
}
if(j==0)
{
TR0=0;
return;
}
}
}

/************************************************************/
//設置鬧鍾
void SetAlarm(void)
{
uchar i,n;
for(i=1;i<16;i++)
{
DataBuf[i]=0x20;
}
TimeBuf[0]=alarm[0]/16+0x30;
TimeBuf[1]=(alarm[0]&0xf)+0x30;
TimeBuf[3]=alarm[1]/16+0x30;
TimeBuf[4]=(alarm[1]&0xf)+0x30;
TimeBuf[6]=TimeBuf[7]=0x30;
LCDShow();
i=0xc2;
while(1)
{
P0=0xe; //顯示器開、游標開
Enable();
P0=i; //定游標
Enable();
P2=0xff;
if((KEY1 == 1)||(KEY2 == 1)||(KEY3 == 1)||(KEY4 == 1))
{
delay1ms(100); //延時0.1s去抖動
if((KEY1 == 1)||(KEY2 == 1)||(KEY3 == 1)||(KEY4 == 1))
{
j=7;
if(KEY1 == 1)
{
i+=3;
if(i>0xc5)
i=0xc2;
}
else if(KEY2 == 1)
{
if(i==0xc2)
{
n=(TimeBuf[0]&0xf)*10+(TimeBuf[1]&0xf);
n++;
if(n>23)
n=0;
TimeBuf[0]=n/10+0x30;
TimeBuf[1]=n%10+0x30;
}
else
{
n=(TimeBuf[3]&0xf)*10+(TimeBuf[4]&0xf);
n++;
if(n>59)
n=0;
TimeBuf[3]=n/10+0x30;
TimeBuf[4]=n%10+0x30;
}
LCDShow();
}
else if(KEY3 == 1)
{
DS1302_Write(0xc0);
DS1302_Write((TimeBuf[0]&0xf)*16+(TimeBuf[1]&0xf));
RST=0;
DS1302_Write(0xc2);
DS1302_Write((TimeBuf[3]&0xf)*16+(TimeBuf[4]&0xf));
RST=0;
DataBuf[0]=FLAG;
DS1302_Write(0xc4);
DS1302_Write(DataBuf[0]);
RST=0;
TR0=0;
TimeStart();
return;
}
else
{
TR0=0;
TimeStart();
return;
}
}
}
if(j==0)
{
TR0=0;
TimeStart();
return;
}
}
}

/************************************************************/
//DS1302初始化程序
void DS1302_Init(void)
{
uchar i,n;

DS1302_Write(0x8c);
DS1302_Write((DataBuf[4]&0xf)*16+(DataBuf[5]&0xf));
RST=0;
DS1302_Write(0x8a);
DS1302_Write(SetWeek());
RST=0;
for(i=7,n=0x88;i<11;i+=3,n-=2)
{
DS1302_Write(n);
DS1302_Write((DataBuf[i]&0xf)*16+(DataBuf[i+1]&0xf));
RST=0;
}
for(i=0;i<7;i+=3,n-=2)
{
DS1302_Write(n);
DS1302_Write((TimeBuf[i]&0xf)*16+(TimeBuf[i+1]&0xf));
RST=0;
}
}

/************************************************************/
//主函數
main()
{
IE=0x82;
TMOD=0x11;
DS1302_Write(0x8E); //禁止防寫
DS1302_Write(0);
RST=0;
P0=1; //清屏並游標復位
Enable();
P0=0x38; //設置顯示模式:8位2行5x7點陣
Enable();
P0=6; //文字不動,游標自動右移
Enable();
DS1302_Init();
TimeStart();

while(1)
{
ReadTime(); //讀取時間
LCDShow(); //顯示時間

if(DataBuf[0]!=0x20)
if(time[0]==alarm[0])
if(time[1]==alarm[1])
if(time[2]==0)
AlarmShow();

P2=0xff;
if((KEY1 == 1)||(KEY2 == 1)||(KEY3 == 1))
{
delay1ms(100); //延時0.1s去抖動
if((KEY1 == 1)||(KEY2 == 1)||(KEY3 == 1))
{
j=7;
TH0=TIME/256,TL0=TIME%256;
TR0=1;
if(KEY1 == 1)
{
SetTime();
}
else if(KEY2 == 1)
{
SetAlarm();
}
else if(KEY3 == 1)
{
TR0=0;
if(DataBuf[0]==FLAG)
DataBuf[0]=0x20;
else
DataBuf[0]=FLAG;
DS1302_Write(0xc4);
DS1302_Write(DataBuf[0]);
RST=0;
}
}
}
delay1ms(100);
}
}

⑻ 51單片機 製作 日歷時鍾 用匯編語言 要詳細的代碼和硬體圖示

你好這是基於DS1302日歷時鍾的單片機匯編程序 51單片機
ORG 0000H
MOV SP,#30H
LOAD EQU P2.0
CLR LOAD
MOV R0,#0FH
MOV R1,#0AH ;亮度
ACALL TRT

MOV R0,#02H
MOV R1,#0BH ;掃描位數
ACALL TRT

MOV R0,#0FFH
MOV R1,#09H ;解碼
ACALL TRT

MOV R0,#01H
MOV R1,#0CH
CALL TRT
SETB P1.0
MOV 22H,#00H
;以下為按鍵掃描輸入初值子程序
KEYSET: MOV 73H,#01H ;設溫度初值為10度
MOV 74H,#00H
MOV 75H,#00H
CALL DISPLAY
KEY1: CALL KS1 ;調判斷有無鍵按下子程序
JNZ LK1 ;有鍵按下(A)<>0轉消抖延時
AJMP KEY1 ;無鍵按下返回,等鍵按下
LK1: CALL DEL10MS ;延時
CALL KS1 ;若有鍵按下則為真實按下
JNZ KEYI ;鍵按下(A)<>0轉鍵掃描
AJMP KEY1 ;不是鍵按下返回
KEYI: JNB ACC.0,KEYR ;加1鍵未按下,轉查減1鍵
LK2: CALL KS1 ;等待鍵釋放
CALL DEL10MS
JNZ LK2 ;未釋放,等待
INC 75H ;末位加1
MOV A,75H
CJNE A,#0AH,PPA
MOV 75H,#00H
INC 74H
MOV A,74H
CJNE A,#0AH,PPA
MOV 74H,#00H
INC 73H
PPA: CALL DISPLAY
AJMP KEY1 ;轉再次掃描
KEYR: JNB ACC.1,KEYH ;減1鍵未按下,轉查上限確認鍵
LK3: CALL KS1
CALL DEL10MS
JNZ LK3
MOV A,75H
CJNE A,#00H,PPC
MOV 75H,#09H
MOV A,74H
CJNE A,#00H,PPD
MOV 74H,#09H
DEC 73H
AJMP PPB
PPD: DEC 74H
AJMP PPB
PPC: DEC 75H
PPB: CALL DISPLAY
AJMP KEY1 ;再次掃描
KEYH: JNB ACC.2,KEYL ;上限鍵未按下,轉查下限確認鍵
LK4: CALL KS1
CALL DEL10MS
JNZ LK4
MOV A,73H
MOV 70H,A ;保存上限
MOV A,74H
MOV 71H,A
MOV A,75H
MOV 72H,A
AJMP KEY1
;KEYL: JNB ACC.3,KEY1
LK5: CALL KS1
CALL DEL10MS
JNZ LK5
MOV A,73H
MOV 6DH,A ;保存下限
MOV A,74H
MOV 6EH,A
MOV A,75H
MOV 6FH,A

EX_CON: ;CPL P1.3 ;使用儀器測試時用
CALL DS18B20 ;轉DS18B20采樣子程序
CALL DISPLAY
;以下為後向通道控制部分
CONTROL:MOV A,73H
CJNE A,6DH,NEQA
MOV A,74H
CJNE A,6EH,NEQB
CLR P1.5
CLR P1.6
JMP EX_CON ;樣溫=下限,返回採樣
NEQA: JNC NEQD ;CY=0,即(73H)>(6DH)時轉比上限
SETB P1.5
CLR P1.6
JMP EX_CON
NEQB: JNC NEQD
SETB P1.5
CLR P1.6
JMP EX_CON
NEQD: MOV A,73H
CJNE A,70H,NEQE
MOV A,74H
CJNE A,71H,NEQF
CLR P1.5
CLR P1.6
JMP EX_CON ;樣溫=上限,返回採樣
NEQE: JNC NEQH ;CY=0,即(73H)>(70H)時轉打開降溫開關
CLR P1.5
CLR P1.6
JMP EX_CON
NEQF: JNC NEQH
CLR P1.5
CLR P1.6
JMP EX_CON
NEQH: CLR P1.5
SETB P1.6
JMP EX_CON

KS1: MOV P0,#0FFH
MOV A,P0
CPL A
ANL A,#0FH
RET
DEL10MS:MOV R7,#20
S2: MOV R6,#250
S1: DJNZ R6,S1
DJNZ R7,S2
RET

;以下為顯示
DISPLAY:MOV A,73H ;字碼
MOV R0,A
MOV R1,#01H ;位置
ACALL TRT

MOV A,74H
MOV R0, A
MOV R1,#02H
ACALL TRT

MOV A,75H
MOV R0,A
MOV R1,#03H
ACALL TRT
RET
;JMP DIS

DS18B20:LCALL RESET ;測試溫度探頭存在否?
MOV A,#0CCH
LCALL WRITE
MOV A,#44H
LCALL WRITE ;命令字寫入探頭內
MOV R7,#70D ;延時
CALL DE11
LCALL RESET
MOV A,#0CCH
LCALL WRITE
MOV A,#0BEH
LCALL WRITE
LCALL READ ;讀取探頭內的溫度值
MOV B,A
MOV 21H,A ;保存溫度值低位
LCALL READ
MOV 20H,A ;保存溫度值高位
LCALL EXCHANG ;溫度值B轉D並送入顯示緩存
RET

RESET:
LA: SETB P1.0 ;復位
NOP
LB: CLR P1.0 ;480US < TS < 960US
MOV R7,#36D
CALL DE11
SETB P1.0 ;60US < T <90US
LC: MOV R7,#6D
CALL DE11
CLR C
ORL C,P1.0
JC LB
LF: MOV R7,#18D ;T > 270
CALL DE11
SETB P1.0
RET

WRITE:
MOV R3,#8
WR1: SETB P1.0
CLR P1.0 ;延時
MOV R4,#2
WR2: DJNZ R4,WR2
RRC A
MOV P1.0,C ;寫的數據在線上需延時
MOV R4,#18
WR3: DJNZ R4,WR3
NOP
SETB P1.0
DJNZ R3,WR1
SETB P1.0
RET

READ:
MOV R3,#8
RD1: CLR C
SETB P1.0 ;適當延時
NOP
NOP
CLR P1.0 ;適當延時
NOP
NOP
SETB P1.0 ;延時
MOV R4,#9
RD2: DJNZ R4,RD2
MOV C,P1.0
RRC A
MOV R5,#23
RD3: DJNZ R5,RD3
DJNZ R3,RD1
RET

DELAY: MOV R7,#10
DL2: MOV R6,#200
DL1: MOV R5,#250
DL0: DJNZ R5,DL0
DJNZ R6,DL1
DJNZ R7,DL2
RET

EXCHANG: MOV A,21H
SWAP A
ANL A,#0FH
MOV 24H,A
MOV A,20H
ANL A,#07H
SWAP A
ADD A,24H
MOV B,#10D
DIV AB
MOV 73H,A
MOV 74H,B
MOV A,21H
ANL A,#0FH
mov dptr,#SADDR ;小數部分的轉換查表
movc a,@a+dptr
MOV 75H,A
ret
SADDR: DB 00H,1H,02h ; bo_ying address in eeprom 0800h-0A08H
DB 03H,3H,04h ; da_ling address in eeprom 0A10H-0AD3H
DB 04H,05H,06h ;shou_ying address in eeprom 0AE0H-0C25H
DB 06H,7H,08h ; lu_ying address in eeprom 0C30H-0D75H
DB 08H,9H,9h,9H

DELAY15US: ;12MHZ ,15US
DE11: NOP
NOP
NOP
NOP
NOP
NOP
NOP
NOP
NOP
NOP
NOP
NOP
NOP
DJNZ R7,DE11
RET

TRT: CLR P2.0 ;LOAD
MOV R2,#08H
MOV A,R1
T_1: CLR P2.2 ;SETB P2.2 ;CLK
RLC A
MOV P2.1,C ;DATA
CALL TDELAY
SETB P2.2 ;CLR P2.2
DJNZ R2,T_1
CALL TDELAY
MOV R2, #08H
MOV A,R0
TT2: CLR P2.2 ;SETB P2.2
RLC A
MOV P2.1,C
CALL TDELAY
SETB P2.2 ;CLR P2.2
DJNZ R2,TT2
SETB P2.0 ;CLR P2.0
RET

TDELAY: MOV R6,#01H
TMS0: MOV R7,#03H
TMS1: DJNZ R7,TMS1
DJNZ R6,TMS0
RET

⑼ C51系列單片機課程設計：電子鬧鍾和萬年歷的程序

#include<reg52.h>
#include<虧滲衫intrins.h>
#define uchar unsigned char
#define uint unsigned int

sbit dq=P3^7; //////18b20
sbit lcden=P2^7; ////lcd
sbit rs=P2^6;
sbit wr=P2^5;
sbit sck=P3^6; ////1302
sbit sda=P3^4;
sbit rst=P3^5;

sbit a=P1^0;
sbit b=P1^1;
sbit c=P1^2;
sbit d=P1^3;
sbit kj=P1^4;
sbit beep=P1^5;
uchar ritime;
uchar startflag;
uchar ridate[33];
uchar bitnum;
uchar rireceok;
uchar ricode[4];
uchar riprosok;
uchar dis[8];
void dis_key(void);
void riwork(void);
void ripros(void);
void keyscan(void);
void bep(void);
void timer0init(void);
void init0init(void);
uchar key0,key1,key2,key0num,passwordok;
uchar key,p,m,pnum,sha;
uchar password[9];
uchar password1[9]={6,7,4,6,8,8,6,4,6};
void password_scan();
void post_key();
void dj1();
void dj2();
//////////////////////函數聲明1302
void wr1302_byte(uchar byte);
void wr1302 (uchar add,uchar dat);
uchar read1302(uchar add);
uchar time_date[7]={10,3,12,8,21,37,20};////年周月日時分秒
uchar time_add[7]={0x8c,0x8a,0x88,0x86,0x84,0x82,0x80};////寫入地址
uchar read_add[7]={0x8d,0x8b,0x89,0x87,0x85,0x83,0x81};////讀出地址
uchar disp[13]; ////將讀出時間裝入
void set_rtc();
void read_rtc();
void timepost(); ////處理時間為10進制
void display();
void password_display();
void timeplay();
void runnian1(); ///閏年加
void runnian2(); ///閏年減
void keypost(); //按鍵處理
///////////銷腔////////////////// 函數聲明 lcd ///////喊枯/////////////
uchar code lcd_tab[]="0123456789- ():c";
uchar code lcd_tab1[]="Plese Password:";
uchar code table1[]="key=00-00-00-00";
uchar code table[]=" QQ:674688646";
uchar code numtab[]="0123456789ABCDEF";
uchar code numtab1[]=" 1234567890";
void delay(uint z);
void init_lcd();
void write_com(uchar com);
void write_date(uchar x);
///////////////////////////18b20////////////
void init18b20(void);
void wr1820_byte(uchar dat);
uchar read18b20_byte(void);
uchar read1820(void);
void delay1(uint t);
//////////////////////////////////////////

void timer0init(void) //開定時器2
{
TMOD=0X02;
TH0=0X00;
TL0=0X00;
ET0=1;
EA=1;
TR0=1;
}
void init0init(void) //外部中斷
{
IT0=1;
EX0=1;
EA=1;
}
void riwork(void)
{
dis[0]=ricode[0]/16;
dis[1]=ricode[0]%16;
dis[2]=ricode[1]/16;
dis[3]=ricode[1]%16;
dis[4]=ricode[2]/16;
dis[5]=ricode[2]%16;
dis[6]=ricode[3]/16;
dis[7]=ricode[3]%16;
}
void ripros(void)
{ uchar j,k,i,value;
k=1;
for(j=0;j<4;j++)
{
for(i=0;i<8;i++)
{
value=value>>1;
if(ridate[k]>6)
{
value=value|0x80;
}
k++;
}
ricode[j]=value;
}
riprosok=1;
}
void timer0 () interrupt 1
{
ritime++;
}
void int0() interrupt 0
{
if(startflag==1)
{
if(ritime>32)//檢測引導碼
{
bitnum=0;
}
ridate[bitnum]=ritime;
ritime=0;
bitnum++;
if(bitnum==33)
{
bitnum=0;
rireceok=1;
}
}
else
{
startflag=1;
ritime=0;
}
}

void keyscan(void)
{ if(rireceok==1)
{bep(); //按鍵發聲 但影響蜂鳴器操作
ripros();
rireceok=0;
}
if(riprosok==1)
{ riwork();
riprosok=0;
switch(ricode[2])
{ case 0x46:p=1;pnum++;break;

case 0x0c:key=1;break;
case 0x18:key=2;break;
case 0x5e:key=3;break;
case 0x08:key=4;break;
case 0x1c:key=5;break;
case 0x5a:key=6;break;
case 0x42:key=7;break;
case 0x52:key=8;break;
case 0x4a:key=9;break;
case 0x16:key=10;break;

case 0x09:key0=1;key0num++;break;
case 0x15:key1=1;break;
case 0x07:sha=1;key2=1;break;
if(key0==1){if(key0num==1)read_rtc();}
}
}
////按下設定鍵後讀一次1302保證time_date內數據正常
}

void bep(void)
{
beep=0;delay(100);beep=1;
}
///////////////////////////////////////////////////////////
void write_com(uchar com) /////寫命令
{
rs=0;
P0=com;
lcden=1;
delay(5);
lcden=0;
}
void write_date(uchar x)/////寫數據
{
rs=1;
P0=x;
delay(5);
lcden=1;
delay(5);
lcden=0;
}

void init_lcd()// ///lcd初始化
{
wr=0;
lcden=0;
write_com(0x38);
write_com(0x0c);
write_com(0x06);
write_com(0x01);
}
void display()
{timepost();
write_com(0x80+2);
write_date(lcd_tab[2]);
write_date(lcd_tab[0]);
write_date(lcd_tab[disp[0]]);
write_date(lcd_tab[disp[1]]);
write_date(lcd_tab[10]);
write_date(lcd_tab[disp[3]]);
write_date(lcd_tab[disp[4]]);
write_date(lcd_tab[10]);
write_date(lcd_tab[disp[5]]);
write_date(lcd_tab[disp[6]]);
write_date(lcd_tab[11]);
write_date(lcd_tab[12]);
write_date(lcd_tab[disp[2]]);
write_date(lcd_tab[13]);
write_com(0x80+0x40+4);/////////第二行
write_date(lcd_tab[disp[7]]);
write_date(lcd_tab[disp[8]]);
write_date(lcd_tab[14]);
write_date(lcd_tab[disp[9]]);
write_date(lcd_tab[disp[10]]);
write_date(lcd_tab[14]);
write_date(lcd_tab[disp[11]]);
write_date(lcd_tab[disp[12]]);
write_date(lcd_tab[11]);
write_date(lcd_tab[read1820()/10]);/////顯示溫度
write_date(lcd_tab[read1820()%10]);
write_date(lcd_tab[15]);
}
//////////////// 1302 //////////////////////////////
void wr1302_byte(uchar byte) /////寫入一個位元組
{ uchar i;
for(i=0;i<8;i++)
{ sck=0;
sda=byte&0x01;
byte>>=1;
sck=1;
}
}
void wr1302 (uchar add,uchar dat)/////寫進1302 時間和地址
{ rst=0;
_nop_();
sck=0;
_nop_();
rst=1;
_nop_();
wr1302_byte(add);
wr1302_byte(dat);
rst=0;
//_nop_();
//sda=1;
//sck=1;
}
uchar read1302(uchar add)
{ uchar i,temp;
rst=0;
_nop_();
sck=0;
_nop_();
rst=1;
_nop_();
wr1302_byte(add);////////////////////寫入要讀的地址
for(i=0;i<8;i++)
{
if(sda)temp=temp|0x80;
sck=0;
temp>>=1;
_nop_();
sck=1;
}
rst=0; //////// 延時很重要
_nop_();
sck=0;
_nop_();
sck=1;
_nop_();
sda=0;
_nop_();
sda=1;
_nop_();
return temp;
}
void set_rtc()
{
uchar i,j;
for(i=0;i<7;i++)
{
j=time_date[i]/10; ///////將10進制變成16進制
time_date[i]=time_date[i]%10;
time_date[i]=time_date[i]+j*16;
}
wr1302(0x8e,0x00);//////去除防寫
for(i=0;i<7;i++)
{
wr1302(time_add[i],time_date[i]);
}
wr1302(0x8e,0x80);//////加防寫
}

void read_rtc()
{uchar i,j;
for(i=0;i<7;i++)
{
time_date[i]=read1302(read_add[i]);
////將讀到的bcd碼轉化成10進制碼
j=time_date[i]&0x0f;
time_date[i]>>=4;
time_date[i]&=0x0f;
time_date[i]*=10;
time_date[i]=time_date[i]+j;

}
}
void timepost()
{ disp[0]=time_date[0]/10;/////年
disp[1]=time_date[0]%10;
disp[2]=time_date[1]%10;/////周
disp[3]=time_date[2]/10;/////月
disp[4]=time_date[2]%10;/////
disp[5]=time_date[3]/10;/////日
disp[6]=time_date[3]%10;////
disp[7]=time_date[4]/10;////時
disp[8]=time_date[4]%10;////
disp[9]=time_date[5]/10;////分
disp[10]=time_date[5]%10;////
disp[11]=time_date[6]/10;////秒
disp[12]=time_date[6]%10;////

}
void delay(uint z)
{
uint x,y;
for(x=0;x<20;x++)
for(y=z;y>0;y--);
}

/////////////////////////18b20////////
void delay1(uint t)
{
while (t--);
}

void init18b20(void)
{
uchar n;
dq=1;
delay1(8);
dq=0;
delay1(80);
dq=1;
delay1(8);
n=dq;
delay1(4);
}

void wr18b20_byte(uchar dat)
{
uchar i;
for(i=0;i<8;i++)
{
dq=0;
dq=dat&0x01;
delay1(4);
dq=1;
dat>>=1;
}
delay1(4);
}
uchar read18b20_byte(void)
{
uchar i,value;
for(i=0;i<8;i++)
{ dq=0;
value>>=1;
dq=1;
if(dq)
value|=0x80;
delay1(4);
}
return value;
}
uchar read1820(void)
{ uchar a,b;
init18b20();
wr18b20_byte(0xcc);
wr18b20_byte(0x44);
delay1(50);
init18b20();
wr18b20_byte(0xcc);
wr18b20_byte(0xbe);
a=read18b20_byte();
b=read18b20_byte();
b<<=4;
b+=(a&0xf0)>>4;
return b;
}
///////////////////////////////////////////////////////
void keypost()
{ uchar n;
if(key0==1)
{
if(key0num==1)
{write_com(0x80+0x40+10);
write_com(0x0f);delay(1000);
if(key1==1)
{ key1=0;n=1;
time_date[6]++;
if(time_date[6]==60)time_date[6]=0;
display();
}
if(key2==1)
{
key2=0;n=1;
time_date[6]--;
if(time_date[6]==-1)time_date[6]=59;
display();

}
}
if(key0num==2)
{write_com(0x80+0x40+8);
write_com(0x0f);delay(1000);
if(key1==1)
{ key1=0;n=1;
time_date[5]++;
if(time_date[5]==60)time_date[5]=0;
display();
}
if(key2==1)
{
key2=0;n=1;
time_date[5]--;
if(time_date[5]==-1)time_date[5]=59;
display();
}
}
if(key0num==3)
{write_com(0x80+0x40+5);
write_com(0x0f);delay(1000);
if(key1==1)
{ key1=0;n=1;
time_date[4]++;
if(time_date[4]==24)time_date[4]=0;
display();
}
if(key2==1)
{
key2=0;n=1;
time_date[4]--;
if(time_date[4]==-1)time_date[4]=23;
display();
}
}
if(key0num==4)
{write_com(0x80+14);
write_com(0x0f);delay(1000);
if(key1==1)
{ key1=0;n=1;
time_date[1]++;
if(time_date[1]==8)time_date[1]=1;
display();
}
if(key2==1)
{
key2=0;n=1;
time_date[1]--;
if(time_date[1]==0)time_date[1]=7;
display();
}
}

if(key0num==5)
{write_com(0x80+10);
write_com(0x0f);delay(1000);
if(key1==1)
{ key1=0;n=1;
time_date[3]++;
runnian1();
display();
}

if(key2==1)
{
key2=0;n=1;
time_date[3]--;
if(time_date[3]<1)time_date[3]=31;
runnian2();
display();
}
}
if(key0num==6)
{write_com(0x80+7);
write_com(0x0f);delay(1000);
if(key1==1)
{ key1=0;n=1;
time_date[2]++;
if(time_date[2]>12)time_date[2]=1;
runnian2();
display();
}
if(key2==1)
{
key2=0;n=1;
time_date[2]--;
if(time_date[2]==0)time_date[2]=12;
runnian2();
display();
}
}
if(key0num==7)
{write_com(0x80+4);
write_com(0x0f);delay(1000);
if(key1==1)
{ key1=0;n=1;
time_date[0]++;
if(time_date[0]==100)time_date[0]=0;
runnian2();
display();
}
if(key2==1)
{
key2=0;n=1;
time_date[0]--;
if(time_date[0]==-1)time_date[0]=99;
runnian2();
display();
}
}

if(key0num==8)
{ key0num=0;key0=0;
write_com(0x0c);
if(n){n=0;set_rtc();}

}
}
else
{
read_rtc();
timepost();
display();
if(time_date[5]==0) ///整點報時
{if(time_date[6]==0)beep=0;
else beep=1;
}
}
}
void runnian1()////閏年加
{
if(time_date[2]==2) /////判斷2月
{ if((time_date[0]+4)%4==0)
{ if(time_date[3]>29)time_date[3]=1;}//判斷閏年
else
{if(time_date[3]>28)time_date[3]=1;}
}
else
{ if(time_date[2]<8)///判斷月小於8
{
if((time_date[2]+1)%2==0)
{if(time_date[3]>31)time_date[3]=1;}
else
{if(time_date[3]>30)time_date[3]=1;}
}
if(time_date[2]>7)
{
if((time_date[2])%2==0)
{if(time_date[3]>31)time_date[3]=1;}
else
{if(time_date[3]>30)time_date[3]=1;}
}
}
}
void runnian2()//閏年減
{
if(time_date[2]==2) /////判斷2月
{ if((time_date[0]+4)%4==0)
{ if(time_date[3]>29)time_date[3]=29;}//判斷閏年
else
{if(time_date[3]>28)time_date[3]=28;}
}
else
{
if(time_date[2]<8)///判斷月小於8
{
if((time_date[2]+1)%2==0)
{if(time_date[3]>31)time_date[3]=31;}
else
{if(time_date[3]>30)time_date[3]=30;}
}
if(time_date[2]>7)
{
if((time_date[2])%2==0)
{if(time_date[3]>31)time_date[3]=31;}
else
{if(time_date[3]>30)time_date[3]=30;}
}
}
}
void password_scan() ////////輸入密碼界面
{uchar l,i,j;
write_com(0x80);
for(l=0;l<15;l++)
{write_date(lcd_tab1[l]);}
write_com(0x80+0x40+4+i);
write_com(0x0f);delay(1000);
if(key!=0)
{
password[i]=key;
write_com(0x80+0x40+4+i);
write_date(numtab1[key]);
write_com(0x14);
i++;key=0;
}
if(i>0)
{if(sha==1)
{sha=0;i--;
write_com(0x80+0x40+4+i);
write_date(numtab1[0]);
write_com(0x10);
}
}
if(i==9)
{ i=0;
for(j=0;j<9;j++)
{
if(password1[j]==password[j])m++;
else {init_lcd();m=0;break;}
}
if(m==9)
{
m=0;passwordok=1;
p=0;pnum=0;key=0;
init_lcd();
for(i=0;i<15;i++)
{write_date(table[i]);}
write_com(0x80+0x40);
for(i=0;i<15;i++)
{write_date(table1[i]);}
}
}
}
void dis_key(void) //顯示鍵值
{
write_com(0x80+0x40+4);
write_date(numtab[dis[0]]);
write_date(numtab[dis[1]]);
write_com(0x80+0x40+7);
write_date(numtab[dis[2]]);
write_date(numtab[dis[3]]);
write_com(0x80+0x40+10);
write_date(numtab[dis[4]]);
write_date(numtab[dis[5]]);
write_com(0x80+0x40+13);
write_date(numtab[dis[6]]);
write_date(numtab[dis[7]]);

}
void timeplay()
{
if(p==1)
{ uchar v;key0num=0;key0=0;
if(v==0){v=1;init_lcd();key=0;}
if(pnum==1)
{
password_scan();
}
if(pnum==2)
{ p=0;pnum=0;m=0;v=0;
init_lcd();
}
}
else keypost();
}
//////////////////////////主函數////////////////////////
void main()
{
init_lcd(); /////初始化lcd
timer0init();///// 開定時器中斷
init0init();///// 開外部器中斷
key=0;
while(1)
{
keyscan();

if(passwordok)
{ dis_key();
post_key();
if(p==1)
{ if(pnum==1)
{if(ricode[2]!=0x46)pnum=0;}
if(pnum==2)
{pnum=0;m=0;
passwordok=0;p=0;
break;
}
}
}
else timeplay();
}
}

void post_key()
{
if(key==1){key=0;kj=0;}
if(key==2){key=0;kj=1;}
if(key==3){key=0;dj1();}
if(key==4){key=0;dj2();}
}
void dj1()
{
uint i;
for(i=0;i<512;i++)
{if(rireceok==1)break;
a=0;b=0;delay(20);
a=1;b=0;delay(20);
b=0;c=0;delay(20);
b=1;c=0;delay(20);
c=0;d=0;delay(20);
c=1;d=0;delay(20);
d=0;a=0;delay(20);
d=1;delay(20);
}
}
void dj2()
{ uint i;
for(i=0;i<512;i++)
{if(rireceok==1)break;
d=0;a=0;delay(20);
a=1;d=0;delay(20);
c=0;d=0;delay(20);
c=0;d=1;delay(20);
b=0;c=0;delay(20);
c=1;b=0;delay(20);
a=0;b=0;delay(20);
a=0;b=1;delay(20);
}
}

使用方法 本程序用於HC6800 V2.6 實驗箱，需要裝上1602液晶屏，18b20 溫度感測器，紅外接收頭，和步進電機，同時保證遙控器好用（要用配套的小遙控器並且要按鍵值和我的一樣才能准確的操作本程序）
我的遙控器按鍵值如下
ch-0x45 ch 0x46 ch+0x47

<< 0x44 >> 0x40 >= 0x43

- 0x07 + 0x15 EQ 0x09

0 0x16 100+ 0x19 200+ 0x0d

1 0x0c 2 0x18 3 0x5e

4 0x08 5 0x1c 6 0x5a

7 0x42 8 0x52 9 0x4a

主要操作鍵為 ch EQ + - 123456789 等鍵，

程序下進去後 1602會顯示日期 時間 溫度
用EQ鍵可對日期 時間進行設定
用+ - 鍵對日期時間進行調節
調節日期時會自動識別大小月，及閏年並對日期進行相應調整

按下ch鍵後 會進入輸入密碼界面 依次輸入674688646 會進入按鍵讀值界面 ，輸入錯誤可用 - 鍵退回
在按鍵讀值界面 連續按兩次ch 鍵後，程序 會退出到時間顯示界面
在按鍵讀值界面 按1 打開繼電器 按2 關閉繼電器 按3 步進電機正轉一周，按 4 步進電機反轉一周 ，步進電機轉的過程中按其他鍵，步進電機停止

⑽ 關於51單片機編程錯誤C242和C187的問題！！這是一個DS1302和12864LCD可調式中文電子日歷的程序

程序不全，無法判斷，

error C242是初始化對象時的數量超過你的定義，可能是初始化數組時{}中的數量超過你數組定義的數量。