視頻演示如下:
仿真原理圖如上圖（proteus仿真工程文件可到本帖附件中下載）
單片機源程序如下:
- #include <reg51.h>sbit speaker=P2^4;
- sbit key1=P3^4;
- unsigned char timer0h,timer0l,time,led=1,j=0;
- unsigned char flagd=0;
- //世上只有媽媽好數據表
- code unsigned char sszymmh[]={ 6,2,3, 5,2,1, 3,2,2, 5,2,2, 1,3,2, 6,2,1, 5,2,1,
- 6,2,4, 3,2,2, 5,2,1, 6,2,1, 5,2,2, 3,2,2, 1,2,1,
- 6,1,1, 5,2,1, 3,2,1, 2,2,4, 2,2,3, 3,2,1, 5,2,2,
- 5,2,1, 6,2,1, 3,2,2, 2,2,2, 1,2,4, 5,2,3, 3,2,1,
- 2,2,1, 1,2,1, 6,1,1, 1,2,1, 5,1,6, 0,0,0
- } ;
- // 音階頻率表 高八位
- code unsigned char FREQH[]={
- 0xF2,0xF3,0xF5,0xF5,0xF6,0xF7,0xF8,
- 0xF9,0xF9,0xFA,0xFA,0xFB,0xFB,0xFC,0xFC, //1,2,3,4,5,6,7,8,i
- 0xFC,0xFD,0xFD,0xFD,0xFD,0xFE,
- 0xFE,0xFE,0xFE,0xFE,0xFE,0xFE,0xFF,
- } ;
- // 音階頻率表 低八位
- code unsigned char FREQL[]={
- 0x42,0xC1,0x17,0xB6,0xD0,0xD1,0xB6,
- 0x21,0xE1,0x8C,0xD8,0x68,0xE9,0x5B,0x8F, //1,2,3,4,5,6,7,8,i
- 0xEE,0x44, 0x6B,0xB4,0xF4,0x2D,
- 0x47,0x77,0xA2,0xB6,0xDA,0xFA,0x16,
- };
- void delay(unsigned char t)
- {
- unsigned char t1;
- unsigned long t2;
- for(t1=0;t1<t;t1++)
- {
- for(t2=0;t2<8000;t2++)
- {
- ;
- }
- }
- TR0=0;
- }
- void t0int() interrupt 1
- {
- TR0=0;
- speaker=!speaker;
- TH0=timer0h;
- TL0=timer0l;
- TR0=1;
- }
- void song()
- {
- TH0=timer0h;
- TL0=timer0l;
- TR0=1;
- delay(time);
- }
- void main(void)
- {
- unsigned char k,i;
- TMOD=1; //置CT0定時工作方式1
- EA=1;ET0=1;//IE=0x82 //CPU開中斷,CT0開中斷
- while(1)
- {
- i=0;
- time=1;
- while(time)
- {
- if(j==8)
- {
- //led=1;
- j=0;flagd=~flagd;
- if(flagd)
- {
- led=0x80;
- }
- else
- {
- led=1;
- }
- }
- else
- {
- P1=~led;
- if(flagd)
- {
- led=led>>1;
- }
- else
- {
- led=led<<1;
- }
- j++;
- }
- k=sszymmh[i]+7*sszymmh[i+1]-1;
- timer0h=FREQH[k];
- timer0l=FREQL[k];
- time=sszymmh[i+2];
- i=i+3;
- if(key1==0){
- song();
- }
- }
- }
- }
全部資料51hei下載地址：
無源蜂鳴器-世上只有媽媽好.zip
(3.39 MB, 下載次數: 144)
2019-6-17 18:00 上傳
點擊文件名下載附件
|
[復制鏈接]
