【文章內(nèi)容簡介】 電解電容22u1瓷片電容22p4單片機(jī)AT89C521溫感器DS18B201三極管NPN1時鐘芯片DS13021電位器10K1蜂鳴器1附錄四 源程序includeincludedefine uchar unsigned char define uint unsigned intdefine TIME (0X1000050000)define FLAG 0XEF //鬧鐘標(biāo)志sbit rst=P3^5。sbit clk=P3^4。sbit dat=P3^3。sbit rs=P1^5。sbit rw=P1^6。sbit e=P1^7。sbit DQ=P1^4。 //溫度輸入口sbit P3_2=P3^2。sbit ACC_7=ACC^7。uchar i=20,j,time1[16]。 //全局變量及常量定義uchar alarm[2],time2[15],time[3]。uchar code Day[]={31,28,31,30,31,30,31,31,30,31,30,31}。//12個月的最大日期(非閏年)//音律表uint code table1[]={64260,64400,64524,64580,64684,64777,64820,64898,64968,65030,65058,65110,65157,65178,65217}。//發(fā)聲部分的延時時間uchar code table2[]={0x82,1,0x81,0xf4,0xd4,0xb4,0xa4,0x94,0xe2,1,0xe1,0xd4,0xb4,0xc4,0xb4,4,0}。//LCD自建字uchar code tab[]={0x18,0x1b,5,4,4,5,3,0,0x08,0x0f,0x12,0x0f,0x0a,0x1f,0x02,0x02,//年0x0f,0x09,0x0f,0x09,0x0f,0x09,0x11,0x00,//月0x0f,0x09,0x09,0x0f,0x09,0x09,0x0f,0x00}。//日 //*******溫度小數(shù)部分用查表法**********//Uchar code ditab[16]={0x00,0x01,0x01,0x02,0x03,0x03,0x04,0x04,0x05,0x06,0x06,0x07,0x08,0x08,0x09,0x09}。//鬧鐘中用的全局變量uchar th1,tl1。uchar temp_data[2]={0x00,0x00}。 // 讀出溫度暫放bit flag。 //18b20存在標(biāo)志位/***********11微秒延時函數(shù)**********/delay(uint t){ for(。t0。t)。}/***********18B20復(fù)位函數(shù)**********/ow_reset(void){ uchar i。 DQ=1。_nop_()。_nop_()。 DQ=0。 // delay(50)。 // 550us DQ=1。 // delay(6)。 // 66us for(i=0。i0x30。i++) { if(!DQ) goto d1。 } flag=0。 //清標(biāo)志位,表示ds1820不存在 DQ=1。 return。d1: delay(45)。 //延時500us flag=1。 DQ=1。 //置標(biāo)志位,表示ds1820存在} /**********18B20寫命令函數(shù)*********///向 1WIRE 總線上寫一個字節(jié)void write_byte(uchar val){ uchar i。 for (i=8。 i0。 i) // { DQ=1。_nop_()。_nop_()。 DQ=0。_nop_()。_nop_()。_nop_()。_nop_()。_nop_()。//5us DQ=valamp。0x01。 //最低位移出 delay(6)。 //66us val=val/2。 //右移一位 } DQ=1。 delay(1)。 }/*********18B20讀1個字節(jié)函數(shù)********///從總線上讀取一個字節(jié)uchar read_byte(void){ uchar i。 uchar value=0。 for (i=8。i0。i) { DQ=1。_nop_()。_nop_()。 value=1。 DQ=0。 // _nop_()。_nop_()。_nop_()。_nop_()。 //4us DQ=1。_nop_()。_nop_()。_nop_()。_nop_()。 //4us if(DQ) value|=0x80。 delay(6)。 //66us } DQ=1。 return(value)。}/***********讀出溫度函數(shù)**********/read_temp(){ ow_reset()。 //總線復(fù)位 if(!flag) //判斷ds1820是否存在?若ds18b20不存在則返回 return。 //write_byte(0xCC)。 // Skip ROM //write_byte(0x44)。 // 發(fā)轉(zhuǎn)換命令 //delay(70)。 write_byte(0xCC)。 //發(fā)Skip ROM命令 write_byte(0xBE)。 //發(fā)讀命令 temp_data[0]=read_byte()。 //溫度低8位 temp_data[1]=read_byte()。 //溫度高8位 ow_reset()。 write_byte(0xCC)。 // Skip ROM write_byte(0x44)。 // 發(fā)轉(zhuǎn)換命令}/***********溫度數(shù)據(jù)處理函數(shù)**********/work_temp(){ uchar n=0,m。 if(temp_data[1]127)//負(fù)溫度求補(bǔ)碼 { temp_data[1]=(256temp_data[1])。 temp_data[0]=(256temp_data[0])。 n=1。 } time2[13]=ditab[temp_data[0]amp。0x0f]+39。039。 time2[12]=39。.39。 m=((temp_data[0]amp。0xf0)4)|((temp_data[1]amp。0x0f)4)。// if(n) { m=16。 } time2[9]=m/100+39。039。 time2[11]=m%100。 time2[10]=time2[11]/10+39。039。 time2[11]=time2[11]%10+39。039。 if(time2[9]==39。039。)//最高位為0時都不顯示 { time2[9]=0x20。 if(n)//負(fù)溫度時最高位顯示 { time2[9]=39。39。 } if(time2[10]==39。039。) { if(n) { time2[10]=39。39。 time2[9]=0x20。 } else time2[10]=0x20。 if(time2[11]==39。039。amp。amp。time2[13]==39。039。) time2[11]=time2[12]=0x20。 } }}delay1ms(uchar time) //延時1ms{ uchar i,j。 for(i=0。itime。i++) { for(j=0。jj++)。 }}//LCD驅(qū)動部分enable(){ rs=0。 rw=0。 e=0。 delay1ms(3)。 e=1。}write2(uchar i){ P0=i。 rs=1。 rw=0。 e=0。 delay1ms(2)。 e=1。}write1(uchar data *address,m){ uchar i,j。 for(