STC51单片机DS130218b20实现万年历.docxVIP

知识改变命运，word 知识改变命运，word精品文档! 知识改变命运，word 知识改变命运，word精品文档! STC51电子钟制作 最近做了一件DIY电子钟，自我感觉效果还不错，所以传到网上 与大家分享一下，大家如果喜欢可以尝试做一下，也可以用作毕业设 计。 这款电子钟可以显示年，月，日，小时，分，秒，星期，还有温 度，可以调节时间。 1,电路原理图： ntiiTRrSfT ntiiT RrSfT 我的原理不是很清楚，大家可以看我的 PCB图，我把每部分都截图 了，效果挺好的。 2，PCB板图： 丄 PPf DSL2Q2 DSlflB2O \ 11； 1 MaanHZ (1)蜂鸣器部分 (2) DS1302部分和复位电路部分 k5 10pF 10pF (3) 18B20部分，和单片机晶振部分 -7k DS18B20 12?00nHZ (4)调时按键部分 (5) 1602 部分 (6)电源部分 3,元件清单 12M晶 振 1个 9015 三 极管 1个 DS1302 1块 30pf 电 容 2个 蜂鸣器 1个 STC89c51 1块 100欧 1个 10pf 电 容 2个 104 1个 按键 5个 Lcd1602 1块 5.1k 1个 10k 9个 32.768k 晶振 1个 备用锂电 池 1块 18b20 1个 USB插 口 1个 10uf电容 1个 4.7k 1个 20k 滑 动变阻 器 1个 电池盒 1个 8脚插 座 1个 40脚插 座 1 4,源程序清单： #includereg52 ?h #includestdi o.h #define uint unsigned int #define uchar unsigned char sbit LCD_RS=P2A4;//1602 sbit LCD_RW=P2A5; sbit LCD_EN=P2A6; sbit rst=P1A7; //DS1302 sbit io=P1A6; sbit sclk=P1A5; sbit ACC_7=ACCA7; sbit K1=P2A3;〃 按键 sbit K2=P2A2; sbit K3=P2A1; sbit K4=P2A0; sbit BEEP=P1A0；〃 蜂鸣器 sbit DQ=P3A1；〃温度传感器 bit flag=0; bit flag1=0; ucharyes; 知识改变命运，word 知识改变命运，word精品文档! } } 知识改变命运，word 知识改变命运，word精品文档! //uchar code table2[|= SONG you ; //uchar code table3[]= zhan peng ; uchar code table4[|=0123456789; char table5[7]; uchar table6[2]; char table7[2]; char leap; 〃延时函数部分 void Delay_ms(uint xms)/延时 { uint i,j; for(i=xms;i0;i--) for(j=110;j0;j--); } void Delayus(uchar t)/延时 1 用于 18b20 { while(--t); void Delayms(uchar t)/延时 2 用于 18b20 while(t--) { //大致延时1mS Delayus(245); Delayus(245); } } //18b20 部分 bit init18b20(void)〃 初始化 18b20 { bit dat=0; DQ = 1; Delayus(5); DQ = 0; Delayus(200); Delayus(200); DQ = 1; Delayus(50); dat=DQ; Delayus(25); return dat; } uchar read18b20(void)/读卖 18b20 函数 { uchar i=0,dat=0; for (i=8;i0;i--) { DQ = 0; //给脉冲信号 dat=1; DQ = 1; //给脉冲信号 if(DQ) dat|=0x80; Delayus(25); } return(dat); 知识改变命运，word 知识改变命运，word精品文档! 知识改变命运，word 知识改变命运，word精品文档! void write18b20(uchar dat)/写 18b20 函数 { uchar i=0; for (i=8; i0; i--) { DQ = 0; DQ = dat0x01; Delayus(25); DQ = 1; dat=1; } Delayus(25); } uint get_18b20(void)/读卖取温度函数