|
|
全部資料打包下載（包含音樂仿真和源碼）：
音樂 溫度.rar
(118.4 KB, 下載次數: 254)
2013-6-26 03:56 上傳
點擊文件名下載附件
下面是程序:
- #include<reg52.h>
- #define uchar unsigned char
- #define uint unsigned int
- sbit rs=P3^5;
- sbit lcden=P3^4;
- sbit beep=P2^3;
- sbit s1=P3^0;
- sbit s2=P3^1;
- sbit s3=P3^2;
- sbit s4=P3^6;
- sbit DQ=P2^2;
- sbit dula=P2^6;
- sbit wela=P2^7;
- bit flag1,flag_ri;
- sbit dscs=P1^4;
- sbit dsas=P1^5;
- sbit dsrw=P1^6;
- sbit dsds=P1^7;
- sbit dsiqr=P3^3;
- sbit rd=P3^7;
- bit flag1,flag_ri;
- uchar H0,L0,cnt,t,b,a;
- code uint cyc[]={1800,1600,1440,1351,1200,1079,960};//音階1-7的半周期數
- code uchar tone[]={13,15,16,16,15,16,13,12,12,13,15,16,16,15,16,13,13, 13,15,16,
- 16,15,16,13,12,12,15,13,12,13,12,11,12,6,6,12,15,13,12,6,6,15,13,12,13,12,11,
- 12,6,5,6,0xff};// 樂曲《康定情歌》的簡譜表
- code uchar time[]={8,8,8,4,4,8,8,12,4,8,8,8,4,4,8,16,8,8,8,8,4,4,8,8,12,4,8,8,4,
- 4,4,4,8,24,8,24,8,24,8,16,8,8,8,4,4,4,4,8,16,8,32};// 節拍表
- void set_time();
- void read_alarm();
- void write_ds(uchar,uchar );
- uchar num, s1num,flag,temp;
- char miao,shi,fen,year,month,day,week,amiao,afen,ashi;
- uchar table[]=" 20 - - STA";
- uchar table1[]=" : : ";
- uchar table2[]=" Alarm : ";
- void delay(uint z) //延時子程序
- {
- uint x,y;
- for(x=z;x>0;x--)
- for(y=110;y>0;y--);
- }
- /**********定時器0中斷用于產生音階方波***********/
- void cntint0(void) interrupt 1
- {
- TH0=H0;
- TL0=L0;
- beep=~beep; // beep是音樂信號輸出腳，beep反相，產生方波
- }
- /**********定時器1中斷用于產生節拍延時***********/
- void cntint1(void) interrupt 3
- {
- cnt++; // 計數初值為0，所以不用賦值
- }
- void Delay_DS18B20(uint num)
- {
- while(num--) ;
- }
- void didi()
- {
- beep=0;
- delay(100);
- beep=1;
- }
- void play_music()
- {
- uchar i,j=0,a,t;
- uint b;
- for(j=0;j<2;j++) //放兩遍音樂 一分鐘
- {
- TMOD=0x11;
- EA=1;//開總中斷
- ET0=1;
- ET1=1;
- cnt=0;
- TR1=1;
- i = 0;
- while(1)
- {
- //掃描按鍵 如有按鍵按下退出鬧鐘
- if((s1==0)||(s2==0)||(s3==0)||(s4==0))
- {
- delay(10);
- if((s1==0)||(s2==0)||(s3==0)||(s4==0))
- {
- break;
- }
- while(!(s1&&s2&&s3&&s4));
- }
- t=tone[i]; //讀音調
- if(t==0xff) break; //0xff是結束符
- if(t!=0) //0是休止符
- {
- b=cyc[t%10-1]; //根據基本音階，求出半周期數
- if(t<10) b=b*2; //若是低八度音階，半周期數加倍
- if(t>20) b=b/2; //若是高八度音階，半周期數減半
- H0=(65536-b)/256; //根據半周期數，計算T0初值的高字節和低字節
- L0=(65536-b)%256;
- TR0=1; //啟動定時器0發音
- }
- cnt=0;
- a=time[i]; //讀節拍
- while(a>cnt)
- {
- //掃描按鍵 如有按鍵按下退出鬧鐘
- if((s1==0)||(s2==0)||(s3==0)||(s4==0))
- {
- delay(10);
- if((s1==0)||(s2==0)||(s3==0)||(s4==0))
- {
- break;
- }
- while(!(s1&&s2&&s3&&s4));
- }
- }
- // TR0=0;
- i++;
- for(b=0;b<1000;b++); //稍加延時，增強節奏感
- }
- EA = 0;
- }
- // beep=0; //關閉喇叭
- // flag_ri=0;
- j=0;
- }
- void write_com(uchar com) //液晶寫指令函數
- {
- rs=0;
- P0=com;
- delay(5);
- lcden=1;
- delay(5);
- lcden=0;
- }
- void write_date(uchar date) //液晶寫數據函數
- {
- rs=1;
- P0=date;
- delay(5);
- lcden=1;
- delay(5);
- lcden=0;
- }
- void init()
- {
- dula=wela=0;
- lcden=0;
- rd=0;
- s1num=0;
- week=1;
- flag1=0;
- EA=1;
- EX1=1;
- IT1=1;
- // write_ds(0x0A,0x20); // ds12c887首次設置
- // write_ds(0x0B,0x26);
- // set_time();
-
- write_com(0x38);
- write_com(0x0c);
- write_com(0x06);
- write_com(0x01);
- write_com(0x80);
- for(num=0;num<15;num++)
- {
- write_date(table[num]);
- delay(5);
- }
- write_com(0x80+0x40);
- for(num=0;num<18;num++)
- {
- write_date(table1[num]);
- delay(5);
- }
- }
- void write_sfm(uchar add,uchar date)
- {
- char shi,ge;
- shi=date/10;
- ge=date%10;
- write_com(0x80+0x40+add);
- write_date(0x30+shi);
- write_date(0x30+ge);
- }
- void write_wd(uchar add,uchar date)
- {
- char bai,shi,ge;
- bai=date/100;
- shi=date%100/10;
- ge=date%10;
- write_com(0x80+0x40+add);
- write_date(0x30+bai);
- write_date(0x30+shi);
- write_date('.');
- write_date(0x30+ge);
- }
- void write_nyr(uchar add,uchar date)
- {
- char shi,ge;
- shi=date/10;
- ge=date%10;
- write_com(0x80+add);
- write_date(0x30+shi);
- write_date(0x30+ge);
- }
- void write_week(char week)
- {
- write_com(0x80+12);
- switch(week)
- {
- case 1: write_date('M');delay(5);
- write_date('O');delay(5);
- write_date('N');
- break;
- case 2: write_date('T');delay(5);
- write_date('U');delay(5);
- write_date('E');
- break;
- case 3: write_date('W');delay(5);
- write_date('E');delay(5);
- write_date('D');
- break;
- case 4: write_date('T');delay(5);
- write_date('H');delay(5);
- write_date('U');
- break;
- case 5: write_date('F');delay(5);
- write_date('R');delay(5);
- write_date('I');
- break;
- case 6: write_date('S');delay(5);
- write_date('A');delay(5);
- write_date('T');
- break;
- case 7: write_date('S');delay(5);
- write_date('U');delay(5);
- write_date('N');
- break;
- }
- }
- void write_ds(uchar add,uchar date)
- {
- dscs=0;
- dsas=1;
- dsds=1;
- dsrw=1;
- P0=add; //寫地址
- dsas=0;
- dsrw=0;
- P0=date; //寫數據
- dsrw=1;
- dsas=1;
- dscs=1;
- }
- uchar read_ds(uchar add)
- { //讀12C887函數
- uchar ds_date;
- dsas=1;
- dsds=1;
- dsrw=1;
- dscs=0;
- P0=add;
- dsas=0;
- dsds=0;
- P0=0xff;
- ds_date=P0;
- dsds=1;
- dsas=1;
- dscs=1;
- return ds_date;
- }
- /*void set_time()
- {
- write_ds(0,0);
- write_ds(1,0);
- write_ds(2,0);
- write_ds(3,0);
- write_ds(4,0);
- write_ds(5,0);
- write_ds(6,1);
- write_ds(7,1);
- write_ds(8,1);
- write_ds(9,8);
- }*/
- void read_alarm()
- {
- amiao=read_ds(1);
- afen=read_ds(3);
- ashi=read_ds(5);
- }
- void alarm_keyscan()
- {
- if(flag_ri==1)
- {
- if(s2==0)
- {
- delay(5);
- if(s2==0)
- {
- while(!s2);
- flag_ri=0;
- }
- }
- }
- }
- void keyscan()
- {
- alarm_keyscan();
- if(flag_ri==1)
- {
- if((s1==0)||(s2==0)||(s3==0)||(s4==0))
- {
- delay(5);
- if((s1==0)||(s2==0)||(s3==0)||(s4==0))
- {
- while(!(s1&&s2&&s3&&s4));
- flag_ri=0;
- }
- }
- }
- if(s1==0)
- {
- delay(5);
- if(s1==0)
- {
- s1num++;
- if(flag1==1)
- {
- if(s1num==4)//在鬧鐘按鍵按下時調鬧鐘時光標閃爍四次
- s1num=1;
- }
- flag=1;
- while(!s1);
- didi();
- switch(s1num)
- {
- case 1:write_com(0x80+0x40+9);
- write_com(0x0f);
- break;
- case 2: write_com(0x80+0x40+6);
- break;
- case 3: write_com(0x80+0x40+3);
- break;
- case 4: write_com(0x80+12);
- break;
- case 5: write_com(0x80+9);
- break;
- case 6: write_com(0x80+6);
- break;
- case 7: write_com(0x80+3);
- break;
- case 8:s1num=0;
- write_com(0x0c);
- flag=0;
- write_ds(0,miao);
- write_ds(2,fen);
- write_ds(4,shi);
- write_ds(6,week);
- write_ds(7,day);
- write_ds(8,month);
- write_ds(9,year);
- break;
- }
- }
- }
- if(s1num!=0)
- {
- if(s2==0)
- {
- delay(5);
- if(s2==0)
- {
- while(!s2);
- didi();
- switch(s1num)
- {
- case 1: miao++;
- if(miao==60)
- miao=0;
- write_sfm(9,miao);
- write_com(0x80+0x40+9);//光標會原位置，會自動加1
- break;
- case 2: fen++;
- if(fen==60)
- fen=0;
- write_sfm(6,fen);
- write_com(0x80+0x40+6);
- break;
- case 3: shi++;
- if(shi==24)
- shi=0;
- write_sfm(3,shi);
- write_com(0x80+0x40+3);
- break;
- case 4: week++;
- if(week==8)
- week=1;
- write_week(week);
- write_com(0x80+12);
- break;
- case 5: day++;
- if(day==32)
- day=1;
- write_nyr(9,day);
- write_com(0x80+9);
- break;
- case 6: month++;
- if(month==13)
- month=1;
- write_nyr(6,month);
- write_com(0x80+6);
- break;
- case 7: year++;
- if(year==100)
- year=0;
- write_nyr(3,year);
- write_com(0x80+3);
- break;
- }
- }
- }
- if(s3==0)
- {
- delay(5);
- if(s3==0)
- {
- while(!s3);
- didi();
- switch(s1num)
- {
- case 1: miao--;
- if(miao==-1)
- miao=59;
- write_sfm(9,miao);
- write_com(0x80+0x40+9);//光標會原位置，會自動加1
- break;
- case 2: fen--;
- if(fen==-1)
- fen=59;
- write_sfm(6,fen);
- write_com(0x80+0x40+6);
- break;
- case 3: shi--;
- if(shi==-1)
- shi=23;
- write_sfm(3,shi);
- write_com(0x80+0x40+3);
- break;
- case 4: week--;
- if(week==0)
- week=7;
- write_week(week);
- write_com(0x80+12);
- break;
- case 5: day--;
- if(day==0)
- day=31;
- write_nyr(9,day);
- write_com(0x80+9);
- break;
- case 6: month--;
- if(month==0)
- month=12;
- write_nyr(6,month);
- write_com(0x80+6);
- break;
- case 7: year--;
- if(year==-1)
- year=99;
- write_nyr(3,year);
- write_com(0x80+3);
- break;
- }
- }
- }
- }
- if((s4==0)||(flag_ri==1))
- {
- delay(5);
- if((s4==0)||(flag_ri==1))
- {
- flag1=~flag1;
- while(!s4);
- didi();
- if(flag1==0)//退出是保存鬧鐘
- {
- flag=0;
- write_com(0x80);
- for(num=0;num<15;num++)
- {
- write_date(table[num]);//恢復原來的年月日
- delay(5);
- }
- /* write_com(0x80+0x40);
- for(num=0;num<15;num++)
- {
- write_date(table1[num]);//原來年月日被覆蓋了
- delay(5);
- } */
- write_com(0x0c);
- write_ds(1,miao);
- write_ds(3,fen);
- write_ds(5,shi);
-
- }
- else //進入鬧鐘設置
- {
- read_alarm();
- miao=amiao;
- fen=afen;
- shi=ashi;
- // write_com(0x80+0x40);
- // write_date('R');
- // write_date('i');
- write_com(0x80);
- for(num=0;num<15;num++)
- {
- write_date(table2[num]);//原來年月日被覆蓋了
- delay(5);
- }
- /* write_com(0x80+0x40);
- for(num=0;num<15;num++)
- {
- write_date(table1[num]);//原來年月日被覆蓋了
- delay(5);
- } */
- write_com(0x80+0x40+3);
- write_sfm(3,ashi);
- write_sfm(6,afen);
- write_sfm(9,amiao);
- }
- }
- }
- }
- void Init_DS18B20()
- {
- uchar x=0;
- DQ = 1; //DQ復位
- Delay_DS18B20(8);//稍做延時
- DQ = 0; //單片機將DQ拉低
- Delay_DS18B20(80);//精確延時，大于480us
- DQ = 1; //拉高總線
- Delay_DS18B20(14);
- x = DQ; //稍做延時后，如果x=0則初始化成功，x=1則初始化失敗
- Delay_DS18B20(20);
- }
- uchar ReadOneChar()
- {
- uchar i=0;
- uchar dat = 0;
- for (i=8;i>0;i--)
- {
- DQ = 0; // 給脈沖信號
- dat>>=1;
- DQ = 1; // 給脈沖信號
- if(DQ)
- dat|=0x80;
- Delay_DS18B20(4);
- }
- return(dat);
- }
- void WriteOneChar(uchar dat)
- {
- uchar i=0;
- for (i=8; i>0; i--)
- {
- DQ = 0;
- DQ = dat&0x01;
- Delay_DS18B20(5);
- DQ = 1;
- dat>>=1;
- }
- }
-
- uint Readtemp()
- {
- uchar a=0;
- uchar b=0;
- uint t=0;
- float tt=0;
- Init_DS18B20();
- WriteOneChar(0xCC); //跳過讀序號列號的操作
- WriteOneChar(0x44); //啟動溫度轉換
- Init_DS18B20();
- WriteOneChar(0xCC); //跳過讀序號列號的操作
- WriteOneChar(0xBE); //讀取溫度寄存器
- a=ReadOneChar(); //讀低8位
- b=ReadOneChar(); //讀高8位
- t=b;
- t<<=8;
- t=t|a;
- tt=t*0.0625;
- t= tt*10+0.5; //放大10倍輸出并四舍五入
- return(t);
- }
- void display(uint temp)
- {
- uchar A1,A2,A3;
- temp=temp-30;
- A1=temp/100;
- A2=temp%100/10;
- A3=temp%10;
- write_com(0x80+0x40+12);
- write_date(0x30+A1);//十位
- write_date(0x30+A2);//個位
- write_date(0x2e);//小數點
- write_date(0x30+A3);//小數點后一位
- // write_date(0xdf);//
- // write_date(0x43);//C
- }
- void main()
- {
- Readtemp(); // 讀溫度
- init();
- while(1)
- {
- //temp=readtemp();
- //write_wd(13,temp);
- keyscan();
- if(flag_ri==1)
- {
- play_music();
- }
-
- if(flag==0&&flag1==0) //有按鍵按下時不執行里面的，即時間停止
- {
- keyscan();
- year=read_ds(9);
- month=read_ds(8);
- day=read_ds(7);
- week=read_ds(6);
- shi=read_ds(4);
- fen=read_ds(2);
- miao=read_ds(0);
- write_sfm(9,miao);
- write_sfm(6,fen);
- write_sfm(3,shi);
- write_week(week);
- write_nyr(3,year);
- write_nyr(6,month);
- write_nyr(9,day);
- display(Readtemp());//顯示溫度
- }
- }
- }
- void exter() interrupt 2
- {
- uchar c;
- c=read_ds(0x0c);
- flag_ri=1;
- }
|
|
[復制鏈接]
