基于51單片機的電子音樂盒，附帶電路原理圖，硬件圖
單片機源程序如下:
- #include "beep.h"
- #include "systick.h"
- void BEEP_Init(void)
- {
- GPIO_InitTypeDef GPIO_mode;
- RCC_APB2PeriphClockCmd( BEEP_PORT_RCC, ENABLE ); //使能GPIOB時鐘
- GPIO_mode.GPIO_Pin = BEEP_PIN;
- GPIO_mode.GPIO_Speed = GPIO_Speed_50MHz;
- GPIO_mode.GPIO_Mode = GPIO_Mode_Out_PP;
- GPIO_Init(BEEP_PORT, &GPIO_mode);
- }
- void Sound(u16 frq)
- {
- u32 n;
- if(frq != 1000)
- {
- n = 500000/((u32)frq);
- PBeep = 0;
- delay_us(n);
- PBeep = 1;
- delay_us(n);
- }else
- delay_us(1000);
- }
- void play(void)
- {
- // 低7 1 2 3 4 5 6 7 高1 高2 高3 高4 高5 不發(fā)音
- uc16 tone[] = {247,262,294,330,349,392,440,294,523,587,659,698,784,1000};//音頻數(shù)據(jù)表
- //紅塵情歌
- u8 music[]={ 5,5,6,8,7,6,5,6,13,13,//音調(diào)
- 5,5,6,8,7,6,5,3,13,13,
- 2,2,3,5,3,5,6,3,2,1,
- 6,6,5,6,5,3,6,5,13,13,
- 5,5,6,8,7,6,5,6,13,13,
- 5,5,6,8,7,6,5,3,13,13,
- 2,2,3,5,3,5,6,3,2,1,
- 6,6,5,6,5,3,6,1,
- 13,8,9,10,10,9,8,10,9,8,6,
- 13,6,8,9,9,8,6,9,8,6,5,
- 13,2,3,5,5,3,5,5,6,8,7,6,
- 6,10,9,9,8,6,5,6,8
- };
- u8 time[] = { 2,4,2,2,2,2,2,8,4, 4, //時間
- 2,4,2,2,2,2,2,8,4, 4,
- 2,4,2,4,2,2,4,2,2,8,
- 2,4,2,2,2,2,2,8,4 ,4,
-
- 2,4,2,2,2,2,2,8,4, 4,
- 2,4,2,2,2,2,2,8,4, 4,
- 2,4,2,4,2,2,4,2,2,8,
- 2,4,2,2,2,2,2,8,
-
- 4, 2,2,2, 4, 2,2,2, 2,2,8,
- 4, 2,2,2,4,2,2,2,2,2,8,
- 4, 2,2,2,4,2,2,5,2,6,2,4,
- 2,2 ,2,4,2,4,2,2,12
- };
- u32 yanshi;
- u16 i,e;
- yanshi = 10;
- for(i=0;i<sizeof(music)/sizeof(music[0]);i++){
- for(e=0;e<((u16)time[i])*tone[music[i]]/yanshi;e++){
- Sound((u32)tone[music[i]]);
- }
- }
- }
所有資料51hei提供下載:
音樂盒.7z
(2.01 MB, 下載次數(shù): 78)
2020-6-28 16:26 上傳
點擊文件名下載附件
|
