【正文】 /在 LCD 上顯示年份 void DisplayMonth(void)。 //在 LCD 上顯示星期 void Holidays(void)。 //DS1302 的時(shí)鐘信號(hào)線 sbit DS1302_IO=P1^1。 //DS1302 的片選信號(hào)線 void WriteDs1302byte(unsigned char temp)。 //給DS1302 寫入時(shí)間，先確定地址，再確定要寫入的數(shù)據(jù) unsigned char ReadDs1302(unsigned char address)。 /********** 定 義 溫 度 傳 感 器 DS18B20 的 數(shù) 據(jù) 線 和 相 關(guān) 函 數(shù)*************/ sbit DS18B20=P1^6。 void DS18B20Init(void)。 void TempWriteByte(unsigned char dat)。 bit TempReadBit(void)。 void TempChange(void)。 bit GetMoonDay(unsigned char month_p,unsigned int TableAddr)。 void DelayMs(unsigned int a)。 武漢紡織大學(xué) 電子與電氣工程學(xué)院 電子 91 班 27 /**********定義開關(guān)按鍵 ,及蜂鳴器的數(shù)據(jù)線 ************/ sbit SetKey=P2^3。 //按鍵功能：確認(rèn) sbit PlusKey=P2^2。 //按鍵功能：減 void Key(void)。 //定義輸出管腳 unsigned int code FreTab[12]={262,277,294,311,330,349,369,392,415,440,466,494}。 //1~7 在頻率表中的位置 unsigned char code LengthTab[7]={1,2,4,8,16,32,64}。 //音符定時(shí)器初值暫存 unsigned char SoundTempTH1,SoundTempTL1。 武漢紡織大學(xué) 電子與電氣工程學(xué)院 電子 91 班 28 void SpeakerDiDi(void) { unsigned char i。i3。 DelayMs(100)。 DelayMs(100)。 for(i=0。i++) { Speaker=0。 Speaker=1。 } DelayMs(500)。i2。 武漢紡織大學(xué) 電子與電氣工程學(xué)院 電子 91 班 29 DelayMs(500)。 DelayMs(100)。 SoundTempTH1=(65535(1/1200)*Fosc)/256。 //計(jì)算 TH1 應(yīng)裝入的初值 TH1=SoundTempTH1。 TMOD|=0x11。 //定時(shí)器 0 開中斷 ET1=0。 //不啟動(dòng)定時(shí)器 武漢紡織大學(xué) 電子與電氣工程學(xué)院 電子 91 班 30 TR1=0。 //開啟 CPU 中斷 } void Speakertimer(void) interrupt 1 //音符發(fā)生中斷 { Speaker=!Speaker。 //定時(shí)器 0 重新裝初值 TL0=SoundTempTL0。 Speed 歌曲演奏速度 { unsigned int NewFreTab[12]。 武漢紡織大學(xué) 電子與電氣工程學(xué)院 電子 91 班 31 unsigned int Point,yinfuchang,yipai,LDiv1,LDiv2,sifenyifu,CurrentFre,TempCounter,SoundLength。 //yindiao 音調(diào) length 音長 yinfu 音符 gaodi 高低音 shengban 是否升半 leixing 音符類型 (0 普通 1 連音 2 頓音 ) for(i=0。i++) // 根據(jù)調(diào)號(hào)及升降八度來生成新的頻率表 { j=i+diaohao。 NewFreTab[i]=FreTab[j]*2。 武漢紡織大學(xué) 電子與電氣工程學(xué)院 電子 91 班 32 if(shengjiang==1) NewFreTab[i]=2。 //如果是升調(diào) 則頻率翻倍速 } SoundLength=0。 } Point=0。 //第一個(gè)字節(jié)為音符音調(diào) length=SoundName[Point+1]。 //算出一個(gè)節(jié)拍的長度 (單位是 10ms) sifenyifu=yipai/4。 //普通音最長間隔標(biāo)準(zhǔn) 武漢紡織大學(xué) 電子與電氣工程學(xué)院 電子 91 班 33 TR0=0。 //啟動(dòng)定時(shí)器 1 while(PointSoundLength) { yinfu=yindiao%10。 //十位，高低音 shengban=yindiao/100。 //查出對(duì)應(yīng)音符的頻率 if(yinfu!=0) { if (gaodi==1) CurrentFre=2。 //高音 , 頻率翻倍速 TempCounter=65536(50000/CurrentFre)*10/(12021000/Fosc)。 SoundTempTL0=TempCounter%256。 TL0=SoundTempTL0+12。 //算出是幾分音符 leixing=length/10%10。 yinfuchang=yipai/SLen。 if(leixing!=1) if(leixing==0) //算出普通音符的演奏長度 if (SLen=4) LDiv1=yinfuchangsifenyifu。 武漢紡織大學(xué) 電子與電氣工程學(xué)院 電子 91 班 35 else LDiv1=yinfuchang/2。 if(yinfu==0) LDiv1=0。 //算出不發(fā)音的長度 if (yinfu!=0) { TR0=1。i0。 TH1=SoundTempTH1。 TF1=0。 Speaker=0。i0。 TH1=SoundTempTH1。 TF1=0。 yindiao=SoundName[Point]。 } Speaker=1。 unsigned char code Butterfly[]= { 0x17,0x03, 0x16,0x03, 0x17,0x01, 0x16,0x03, 0x17,0x03, 0x16,0x03, 0x15,0x01, 0x10,0x03, 0x15,0x03, 0x16,0x02, 0x16,0x0D, 0x17,0x03, 0x16,0x03, 0x15,0x03, 0x10,0x03, 0x10,0x0E, 0x15,0x04, 0x0F,0x01, 0x17,0x03, 0x16,0x03, 0x17,0x01, 0x16,0x03, 0x17,0x03, 0x16,0x03, 0x15,0x01, 0x10,0x03, 0x15,0x03, 0x16,0x02, 0x16,0x0D, 0x17,0x03, 0x16,0x03, 0x15,0x03, 0x10,0x03, 0x15,0x03, 0x16,0x01, 0x17,0x03, 0x16,0x03, 0x17,0x01, 0x16,0x03, 0x17,0x03, 0x16,0x03, 0x15,0x01, 0x10,0x03, 0x15,0x03, 0x16,0x02, 0x16,0x0D, 0x17,0x03, 0x16,0x03, 0x15,0x03, 0x10,0x03, 0x10,0x0E, 0x15,0x04, 0x0F,0x01, 0x17,0x03, 0x19,0x03, 0x19,0x01, 0x19,0x03, 0x1A,0x03, 0x19,0x03, 0x17,0x01, 0x16,0x03, 0x16,0x03, 0x16,0x02, 0x16,0x0D, 0x17,0x03, 0x16,0x03, 0x15,0x03, 0x10,0x03, 0x10,0x0D, 0x15,0x00, 0x19,0x03, 0x19,0x03, 0x1A,0x03, 0x1F,0x03, 0x1B,0x03, 0x1B,0x03, 0x1A,0x03, 0x17,0x0D, 0x16,0x03, 0x16,0x03, 武漢紡織大學(xué) 電子與電氣工程學(xué)院 電子 91 班 38 0x16,0x0D, 0x17,0x01, 0x17,0x03, 0x17,0x03, 0x19,0x03, 0x1A,0x02, 0x1A,0x02, 0x10,0x03, 0x17,0x0D, 0x16,0x03, 0x16,0x01, 0x17,0x03, 0x19,0x03, 0x19,0x03, 0x17,0x03, 0x19,0x02, 0x1F,0x02, 0x1B,0x03, 0x1A,0x03, 0x1A,0x0E, 0x1B,0x04, 0x17,0x02, 0x1A,0x03, 0x1A,0x03, 0x1A,0x0E, 0x1B,0x04, 0x1A,0x03, 0x19,0x03, 0x17,0x03, 0x16,0x03, 0x17,0x0D, 0x16,0x03, 0x17,0x03, 0x19,0x01, 0x19,0x03, 0x19,0x03, 0x1A,0x03, 0x1F,0x03, 0x1B,0x03, 0x1B,0x03, 0x1A,0x03, 0x17,0x0D, 0x16,0x03, 0x16,0x03, 0x16,0x03, 0x17,0x01, 0x17,0x03, 0x17,0x03, 0x19,0x03, 0x1A,0x02, 0x1A,0x02, 0x10,0x03, 0x17,0x0D, 0x16,0x03, 0x16,0x01, 0x17,0x03, 0x19,0x03, 0x19,0x03, 0x17,0x03, 0x19,0x03, 0x1F,0x02, 0x1B,0x03, 0x1A,0x03, 0x1A,0x0E, 0x1B,0x04, 0x17,0x02, 0x1A,0x03, 0x1A,0x03, 0x1A,0x0E, 0x1B,0x04, 0x17,0x16, 0x1A,0x03, 0x1A,0x03, 0x1A,0x0E, 0x1B,0x04, 0x1A,0x03, 0x19,0x03, 0x17,0x03, 0x16,0x03, 0x0F,0x02, 0x10,0x03, 0x15,0x00, 0x00,0x00 }。百位表示這個(gè)音武漢紡織大學(xué) 電子與電氣工程學(xué)院 電子 91 班 39 符是否要升半音 : 0不升， 1升半