單片機音樂播放器

『壹』 PIC單片機製作簡易音樂播放器

如果你基礎好，3個星期做WAV輸出綽綽有餘……我們老大是一個下午搞定的，前提是了解WAV文件的組成、如何實現PCM/SPWM、如何實現簡單的低通濾波、如果使用基本的運算放大電路。
MIDI麻煩一點，音色庫不好弄，有些樂器的頻率特性在低端單片機上無法實現。如果不需要實現多音色的話就簡單了。

『貳』 80c51單片機音樂播放器設計

正好做了一個音樂程序，貢獻出來給你吧，希望你能滿意。
電路連接很簡單，在P3.0埠接個蜂鳴器，不過效果一般。如果想效果好點，就加個放大電路，接個小功率喇叭就行。因為這里發電路不方便，所以如果需要放大電路，可加我QQ：7468485。

音樂程序的設計原理和程序如下：
設計原理
⑴ 總體原理：
樂曲中不同的音符，實質就是不同頻率的聲音。通過單片機產生不同的頻率的脈沖信號，經過放大電路，由蜂鳴器放出，就產生了美妙和諧的樂曲。
⑵ 單片機產生不同頻率脈沖信號的原理：
1）要產生音頻脈沖，只要算出某一音頻的脈沖（1/頻率），然後將此周期除以2，即為半周期的時間，利用定時器計時這個半周期的時間，每當計時到後就將輸出脈沖的I/O反相，然後重復計時此半周期的時間再對I/O反相，就可以在I/O腳上得到此頻率的脈沖。
2）利用8051的內部定時器使其工作在計數器模式MODE1下，改變計數值TH0及TL0以產生不同頻率的方法如下：
例如，頻率為523Hz，其周期天/523 S=1912uS，因此只要令計數器計時956uS/1us=956，在每計數956次時就將I/O反接，就可得到中音DO（532Hz）。
計數脈沖值與頻率的關系公式如下：
N=Fi/2/Fr
（N：計數值，Fi：內部計時一次為1uS，故其頻率為1MHz，Fr：要產生的頻率 ）
⑶ 其計數值的求法如下：
T=65536-N=65536-Fi/2/Fr
計算舉例：
設K=65536,F=1000000=Fi=1MHz，求低音DO（261Hz）、中音DO（523Hz）、高音DO（1046Hz）的計數值。
T=65536-N=65536-Fi/2/Fr=65536-1000000/2/Fr=65536-500000/Fr
低音DO的T=65536-500000/262=63627
中音DO的T=65536-500000/523=64580
高音DO的T=65536-500000/1047=65059
⑷ C調個音符頻率與計數值T的對照表如下表所示：

表9.1 C調各音符頻率與計數值T的對照表
音符 頻率（Hz） 簡譜碼T值 音符 頻率（Hz） 簡譜碼T值
低1DO 262 63628 #4FA# 740 64860
#1DO# 277 63731 中5SO 784 64898
低2RE 294 63835 #5SO# 831 64923
#2RE# 311 63928 中6LA 880 64968
低3M 330 64103 #6 932 64994
低4FA 349 64103 中7SI 988 65030
#4FA# 370 64260 高1DO 1046 65058
低5SO 392 64260 #1DO# 1109 65085
#5SO# 415 64331 高2RE 1175 65110
低6LA 440 64400 #2RE# 1245 65124
#6 466 64463 高3M 1318 65157
低7SI 494 64524 高4FA 1397 65178
中1DO 523 64580 #4FA# 1480 65198

⑸ 每個音符使用1個位元組，位元組的高4位代表音符的高低，低4位代表音符的節拍，下表為節拍碼的對照。但如果1拍為0.4秒，1/4拍是0.1秒，只要設定延遲時間就可求得節拍的時間。假設1/4節拍為1DELAY，則1拍應為4DELAY，以此類推。所以只要求得1/4拍的DELAY時間，其餘的節拍就是它的倍數，如下表為1/4和1/8節拍的時間設定。
表9.2 節拍碼對照表
1/4節拍 1/8節拍
節拍碼 節拍數 節拍碼 節拍數
1 1/4拍 1 1/8拍
2 2/4拍 2 1/4拍
3 3/4拍 3 3/8拍
4 1拍 4 1/2拍
5 1又1/4拍 5 5/8拍
6 1又1/2拍 6 3/4拍
7 1又3/4拍 7 7/8拍
8 2拍 8 1拍
9 2又1/4拍 9 1又1/8拍
A 2又1/2拍 A 1又1/4拍
B 2又3/4拍 B 1又3/8拍
C 3拍 C 1又1/2拍
D 3又1/4拍 D 1又5/8拍
E 3又1/2拍 E 1又3/4拍
F 3又3/4拍 F 1又7/8拍
表9.3 各調節拍的時間設定表
1/4節拍 1/8節拍
曲調值 DELAY 曲調值 DELAY
調4/4 125毫秒 調4/4 62毫秒
調3/4 187毫秒 調3/4 94毫秒
調2/4 250毫秒 調2/4 125毫秒
⑹ 建立音樂的步驟：
1）先把吧樂譜的音符找出，然後由上表建立T值表的順序。
2）把T值表建立在TABLE1，構成發音符的計數值放在「TABLE」。
3）簡譜碼（音符）為高位，節拍為（節拍數）為低4位，音符節拍碼放在程序的「TABLE」處。

表9.4 簡譜對應的簡譜碼、T值、節拍數
簡譜 發音 簡譜碼 T值 節拍碼 節拍數
5 低5SO 1 64260 1 1/4拍
6 低6LA 2 64400 2 2/4拍
7 低7SI 3 64524 3 3/4拍
1 中1DO 4 64580 4 1拍
2 中2RE 5 64684 5 1又1/4拍
3 中3M 6 64777 6 1又2/4拍
4 中4FA 7 64820 7 1又3/4拍
5 中5SO 8 64898 8 2拍
6 中6LA 9 64968 9 2又1/4拍
7 中7SI A 65030 A 2又2/4拍
1 高1DO B 65058 B 2又3/4拍
2 高2RE C 65110 C 3拍
3 高3M D 65157 D 3又1/4拍
4 高4FA E 65178 E 3又2/4拍
5 高5SO F 65217 F 3又3/4拍
不發音 0

1/4拍的延遲時間=187毫秒
DELAY: MOV R7,#2
D2: MOV R4,#187
D3: MOV R3,#248
DJNZ R3,$
DJNZ R4,D3
DJNZ R7,D2
RET
4．程序範例
ORG 0000H ；主程序起始地址
SJMP START ；跳至主程序
ORG 000BH ；TIMER0中斷起 始地址
LJMP TIM0 ；跳至TIMER0中斷子程序
START: MOV TMOD,#01H ；設T0在M1
MOV IE,#82H ；中斷使能
START0:MOV 30H,#00 ；取簡譜碼指針
NEXT: MOV A,30H ；簡譜碼指針載入A
MOV DPTR,#TAB ；至TAB取簡譜碼
MOVC A,@A+DPTR ；
MOV R2,A ；渠道的簡譜碼暫存於R2
JZ END0 ；是否渠道00（結束碼）
ANL A,#0FH ；不是，則取低4位（節拍碼）
MOV R5,A ；將節拍碼存入R5
MOV A,R2 ；將取到的簡譜碼再載入A
SWAP A ；高低4位交換
ANL A,#0FH ；取低4位（音符碼）
JNZ SING ；取到的音符碼是否為0？
CLR TR0 ；開始，則不發音
SJMP D1 ；跳至D1
SING: DEC A ；取到的音符碼減1（不含0）
MOV 22H,A ；存入（22H）
RL A ；乘2
MOV DPTR,#TAB1 ；至TABLE1取相對的高位位元組計數值
MOVC A,@A+DPTR ；
MOV TH0,A ；取到的高位位元組存入TH0
MOV 21H,A ；取到的高位位元組存入（21H）
MOV A,22H ；在載入取到的音符碼
RL A ；乘2
INC A ；加1
MOVC A,@A+DPTR ；至TABLE1取相對的低位位元組計數值
MOV TL0,A ；取到的低位位元組存入TL0
MOV 20H,A ；取到的低位位元組存入（20H）
SETB TR0 ；啟動TIMER0
D1: LCALL DELAY ；其本單位時間1/4拍187毫秒
INC 30H ；取簡譜碼指針加1
JMP NEXT ；取下一個簡譜碼
END0： CLR TR0 ；停止TIMER0
JMP START0 ；重復循環
TIM0： PUSH ACC ；將A的值暫存於堆棧
PUSH PSW ；將PSW的值暫存於堆棧
MOV TL0，20H ；重設計數值
MOV TH0，21H ；
CPL P3.0 ；將P3.0位反相,控制蜂鳴器發聲
POP PSW ；至堆棧取回PSW的值
POP ACC ；至堆棧取回A的值
RETI
DELAY：MOV R7，#02
D2： MOV R4，#187
D3： MOV R3，#248
DJNZ R3，$
DJNZ R4，D3
DJNZ R7，D2
RET
TAB1： ；決定節拍
DW 64260，64400，64521，64580
DW 64684，64777，64820，64898
DW 64968，65030，65058，65110
DW 65157，65178，65217
TAB: ；樂曲名稱《梁祝》
DB 02H,82H,62H,52H,48H,02H,52H,32H,22H,18H
DB 83H,91H,72H,62H,51H,61H,71H,61H,83H,61H
DB 81H,51H,61H,71H,61H,51H,46H,82H,32H,52H
DB 22H,42H,16H,21H,41H,18H,0E4H,13H,21H,43H
DB 51H,21H,41H,12H,83H,81H,61H,81H,58H,53H
DB 61H,31H,22H,13H,21H,42H,52H,0E2H,42H,21H
DB 11H,91H,41H,18H,63H,81H,32H,52H,21H,41H,
DB 16H,0E4H,11H,21H,31H,51H,26H,11H,21H,43H
DB 51H,82H,62H,52H,61H,51H,42H,21H,11H,0E4H
DB 44H,21H,41H,21H,11H,0E1H,11H,21H,41H,18H
DB 61H,81H,51H,61H,51H,41H,32H,21H,41H,18H
DB 08H,0H,04H ；曲子最後靜音5拍長的時間
DB 00H ；樂曲結束
END

『叄』 89C52單片機音樂播放器

這是一個完整的播放一首音樂的程序,僅供參考,希望對你有幫助:
SPK
EQU
P3.7
;
蜂鳴器所在埠
ORG
0000H
JMP
START
START:
MOV
R3,#00H
NEXT:
MOV
A,R3
MOV
DPTR,#TABLE
MOVC
A,@A+DPTR
JZ
START
MOV
R7,A
INC
R3
MOV
A,R3
MOVC
A,@A+DPTR
MOV
R2,A
ACALL
SONG
INC
R3
SJMP
NEXT
;===============================================================================
;===
歌曲播放子程序
===
SONG:
MOV
A,R2
;
取出節拍
RL
A
JNZ
KEEP
MOV
A,#01H
KEEP:
MOV
R2,A
REPEAT:
ACALL
EIGHTH
DJNZ
R2,REPEAT
RET
;===============================================================================
;===
產生1/8拍延時子程序
===
EIGHTH:
MOV
A,R7
;
查表取出廷時參數,保存到R4
MOV
DPTR,#DELAY_T
MOVC
A,@A+DPTR
MOV
R4,A
MOV
A,R7
;
查表取出1/8拍周期數,保存到R5
MOV
DPTR,#S_PARA
MOVC
A,@A+DPTR
MOV
R5,A
NEXTCYC:
ACALL
SOUND
DJNZ
R5,NEXTCYC
RET
;===============================================================================
;===
發聲子程序
===
SOUND:
SETB
SPK
ACALL
SDELAY
CLR
SPK
ACALL
SDELAY
RET
;===============================================================================
;===
延時子程序
===
SDELAY:
MOV
A,R4
;
廷時值在R4內
MOV
R0,A
XL2:
MOV
R1,#03H
DL1:
NOP
DJNZ
R1,DL1
DJNZ
R0,XL2
RET
;===============================================================================
;===
1/8拍周期表
===
S_PARA:
DS
1DH
DB
15H,16H,00
DB
19H,00H,1CH,00H,1FH,21H,00H,25H
DB
00H,29H,2CH,00H,31H,34H,37H,00H
DB
3EH,41H,00H,49H,00H,52H,57H,00H
DB
62H
;===============================================================================
;===
延時參數表
===
DELAY_T:
DS
1DH
DB
7EH,77H,00H
DB
6AH,00H,5EH,00H,54H,4FH,00H,46H
DB
00H,3FH,3BH,00H,35H,32H,2FH,00H
DB
2AH,27H,00H,23H,00H,1FH,1DH,0C0H
DB
1AH
;===============================================================================
;===
歌曲表
===
TABLE:
DW
2202H,2902H,2902H,2902H,2906H,2702H
;我從山中來
DW
2502H,2702H,2502H,2402H,2208H
;帶著蘭花草
DW
2E02H,2E02H,2E02H,2E02H,2E06H,2C02H
;種在小園中
DW
2902H,2C02H,2D02H,2A02H,2908H
;祈禱花開早
DW
2902H,2E02H,2E02H,2C02H,2906H,2702H
;一日看三回
DW
2502H,2702H,2502H,2402H,2206H,1D02H
;看得花時過
DW
1D02H,2502H,2502H,2402H,2206H,2902H
;蘭花卻依然
DW
2702H,2502H,2402H,2002H,2208H
;苞也無一個
DW
0000H
;
DELAY:
;延時子程序；參考前面的教程：
MOV
R7,#255
NOP
NOP
D1:MOV
R6,#255
D2:
DJNZ
R6,D2
DJNZ
R7,D1
RET
END

『肆』 單片機音樂播放器中的頻率計算

一般是查表

『伍』 51單片機音樂播放器c程序

先將樂曲做一次AD轉換，轉成一個數組，然後將數組寫進C程序中，燒入單片機，播放的時候在做一次DA轉換，將轉換後的信號進行功放再通過喇叭就能播放了。

『陸』 利用51單片機設計一個音樂播放器

這個題目比較大些，不適合在這里回答的。你可以網路搜，可能有類似的常式。

『柒』 80C51單片機實現音樂播放器

自己會什麼，就播什麼：
http://hi..com/%D7%F6%B6%F8%C2%DB%B5%C0/blog/item/d025718ab4fa7bdefc1f10b7.html
http://hi..com/%D7%F6%B6%F8%C2%DB%B5%C0/blog/item/88bfff323ec42ef21b4cff09.html

『捌』 基於單片機的音樂播放器

播放一段音樂的：
#include <reg52.h>
#define uchar unsigned char
#define uint unsigned int

sbit BEEP = P3^7;
uchar code SONG_TONE[]=
{
212,212,190,212,159,169,212,212,190,212,142,159,212,212,106,126,129,169,190,119,119,126,159,142,159,0
};
uchar code SONG_LONG[]=
{
9,3,12,12,12,24,9,3,12,12,12,24,9,3,12,12,12,12,12,9,3,12,12,12,24,0
};

void DelayMS(uint ms)
{
uchar t;
while(ms--)
{
for(t=0;t<120;t++);
}
}

void PlayMusic()
{
uint i =0,j,k;
while(SONG_LONG[i]!=0||SONG_TONE[i]!=0)
{
for(j=0;j<SONG_LONG[i]*20;j++)
{
BEEP = ~BEEP;
for(k=0;k<SONG_TONE[i]/3;k++);
}
DelayMS(10);
i++;
}
}

void main()
{
while(1)
{
PlayMusic();
DelayMS(500);
}
}
按鍵發音的（可選擇，四個按鍵）：
#include <reg52.h>
#define uchar unsigned char
#define uint unsigned int

sbit BEEP = P3^7;
sbit K1 = P1^4;
sbit K2 = P1^5;
sbit K3 = P1^6;
sbit K4 = P1^7;

void DelayMS(uint x)
{
uchar t;
while(x--)
{
for(t=0;t<120;t++);
}
}

void Play(uchar t)
{
uchar i;
for(i=0;i<100;i++)
{
BEEP = ~BEEP;
DelayMS(t);
}
BEEP = 0;
}

void main()
{
P1 = 0xff;
while(1)
{
if(K1==0) Play(1);
if(K2==0) Play(2);
if(K3==0) Play(3);
if(K4==0) Play(4);
}
}
自己綜合一下就好。當然再找幾首音樂。

『玖』 80c51單片機音樂播放器程序設計

正好做了一個音樂程序，貢獻出來給你吧，希望你能滿意。
電路連接很簡單，在P3.0埠接個蜂鳴器，不過效果一般。如果想效果好點，就加個放大電路，接個小功率喇叭就行。因為這里發電路不方便，所以如果需要放大電路，可加我QQ：7468485。

音樂程序的設計原理和程序如下：
設計原理
⑴ 總體原理：
樂曲中不同的音符，實質就是不同頻率的聲音。通過單片機產生不同的頻率的脈沖信號，經過放大電路，由蜂鳴器放出，就產生了美妙和諧的樂曲。
⑵ 單片機產生不同頻率脈沖信號的原理：
1）要產生音頻脈沖，只要算出某一音頻的脈沖（1/頻率），然後將此周期除以2，即為半周期的時間，利用定時器計時這個半周期的時間，每當計時到後就將輸出脈沖的I/O反相，然後重復計時此半周期的時間再對I/O反相，就可以在I/O腳上得到此頻率的脈沖。
2）利用8051的內部定時器使其工作在計數器模式MODE1下，改變計數值TH0及TL0以產生不同頻率的方法如下：
例如，頻率為523Hz，其周期天/523 S=1912uS，因此只要令計數器計時956uS/1us=956，在每計數956次時就將I/O反接，就可得到中音DO（532Hz）。
計數脈沖值與頻率的關系公式如下：
N=Fi/2/Fr
（N：計數值，Fi：內部計時一次為1uS，故其頻率為1MHz，Fr：要產生的頻率 ）
⑶ 其計數值的求法如下：
T=65536-N=65536-Fi/2/Fr
計算舉例：
設K=65536,F=1000000=Fi=1MHz，求低音DO（261Hz）、中音DO（523Hz）、高音DO（1046Hz）的計數值。
T=65536-N=65536-Fi/2/Fr=65536-1000000/2/Fr=65536-500000/Fr
低音DO的T=65536-500000/262=63627
中音DO的T=65536-500000/523=64580
高音DO的T=65536-500000/1047=65059
⑷ C調個音符頻率與計數值T的對照表如下表所示：

表9.1 C調各音符頻率與計數值T的對照表
音符 頻率（Hz） 簡譜碼T值 音符 頻率（Hz） 簡譜碼T值
低1DO 262 63628 #4FA# 740 64860
#1DO# 277 63731 中5SO 784 64898
低2RE 294 63835 #5SO# 831 64923
#2RE# 311 63928 中6LA 880 64968
低3M 330 64103 #6 932 64994
低4FA 349 64103 中7SI 988 65030
#4FA# 370 64260 高1DO 1046 65058
低5SO 392 64260 #1DO# 1109 65085
#5SO# 415 64331 高2RE 1175 65110
低6LA 440 64400 #2RE# 1245 65124
#6 466 64463 高3M 1318 65157
低7SI 494 64524 高4FA 1397 65178
中1DO 523 64580 #4FA# 1480 65198

⑸ 每個音符使用1個位元組，位元組的高4位代表音符的高低，低4位代表音符的節拍，下表為節拍碼的對照。但如果1拍為0.4秒，1/4拍是0.1秒，只要設定延遲時間就可求得節拍的時間。假設1/4節拍為1DELAY，則1拍應為4DELAY，以此類推。所以只要求得1/4拍的DELAY時間，其餘的節拍就是它的倍數，如下表為1/4和1/8節拍的時間設定。
表9.2 節拍碼對照表
1/4節拍 1/8節拍
節拍碼 節拍數 節拍碼 節拍數
1 1/4拍 1 1/8拍
2 2/4拍 2 1/4拍
3 3/4拍 3 3/8拍
4 1拍 4 1/2拍
5 1又1/4拍 5 5/8拍
6 1又1/2拍 6 3/4拍
7 1又3/4拍 7 7/8拍
8 2拍 8 1拍
9 2又1/4拍 9 1又1/8拍
A 2又1/2拍 A 1又1/4拍
B 2又3/4拍 B 1又3/8拍
C 3拍 C 1又1/2拍
D 3又1/4拍 D 1又5/8拍
E 3又1/2拍 E 1又3/4拍
F 3又3/4拍 F 1又7/8拍
表9.3 各調節拍的時間設定表
1/4節拍 1/8節拍
曲調值 DELAY 曲調值 DELAY
調4/4 125毫秒 調4/4 62毫秒
調3/4 187毫秒 調3/4 94毫秒
調2/4 250毫秒 調2/4 125毫秒
⑹ 建立音樂的步驟：
1）先把吧樂譜的音符找出，然後由上表建立T值表的順序。
2）把T值表建立在TABLE1，構成發音符的計數值放在「TABLE」。
3）簡譜碼（音符）為高位，節拍為（節拍數）為低4位，音符節拍碼放在程序的「TABLE」處。

表9.4 簡譜對應的簡譜碼、T值、節拍數
簡譜 發音 簡譜碼 T值 節拍碼 節拍數
5 低5SO 1 64260 1 1/4拍
6 低6LA 2 64400 2 2/4拍
7 低7SI 3 64524 3 3/4拍
1 中1DO 4 64580 4 1拍
2 中2RE 5 64684 5 1又1/4拍
3 中3M 6 64777 6 1又2/4拍
4 中4FA 7 64820 7 1又3/4拍
5 中5SO 8 64898 8 2拍
6 中6LA 9 64968 9 2又1/4拍
7 中7SI A 65030 A 2又2/4拍
1 高1DO B 65058 B 2又3/4拍
2 高2RE C 65110 C 3拍
3 高3M D 65157 D 3又1/4拍
4 高4FA E 65178 E 3又2/4拍
5 高5SO F 65217 F 3又3/4拍
不發音 0

1/4拍的延遲時間=187毫秒
DELAY: MOV R7,#2
D2: MOV R4,#187
D3: MOV R3,#248
DJNZ R3,$
DJNZ R4,D3
DJNZ R7,D2
RET
4．程序範例
ORG 0000H ；主程序起始地址
SJMP START ；跳至主程序
ORG 000BH ；TIMER0中斷起 始地址
LJMP TIM0 ；跳至TIMER0中斷子程序
START: MOV TMOD,#01H ；設T0在M1
MOV IE,#82H ；中斷使能
START0:MOV 30H,#00 ；取簡譜碼指針
NEXT: MOV A,30H ；簡譜碼指針載入A
MOV DPTR,#TAB ；至TAB取簡譜碼
MOVC A,@A+DPTR ；
MOV R2,A ；渠道的簡譜碼暫存於R2
JZ END0 ；是否渠道00（結束碼）
ANL A,#0FH ；不是，則取低4位（節拍碼）
MOV R5,A ；將節拍碼存入R5
MOV A,R2 ；將取到的簡譜碼再載入A
SWAP A ；高低4位交換
ANL A,#0FH ；取低4位（音符碼）
JNZ SING ；取到的音符碼是否為0？
CLR TR0 ；開始，則不發音
SJMP D1 ；跳至D1
SING: DEC A ；取到的音符碼減1（不含0）
MOV 22H,A ；存入（22H）
RL A ；乘2
MOV DPTR,#TAB1 ；至TABLE1取相對的高位位元組計數值
MOVC A,@A+DPTR ；
MOV TH0,A ；取到的高位位元組存入TH0
MOV 21H,A ；取到的高位位元組存入（21H）
MOV A,22H ；在載入取到的音符碼
RL A ；乘2
INC A ；加1
MOVC A,@A+DPTR ；至TABLE1取相對的低位位元組計數值
MOV TL0,A ；取到的低位位元組存入TL0
MOV 20H,A ；取到的低位位元組存入（20H）
SETB TR0 ；啟動TIMER0
D1: LCALL DELAY ；其本單位時間1/4拍187毫秒
INC 30H ；取簡譜碼指針加1
JMP NEXT ；取下一個簡譜碼
END0： CLR TR0 ；停止TIMER0
JMP START0 ；重復循環
TIM0： PUSH ACC ；將A的值暫存於堆棧
PUSH PSW ；將PSW的值暫存於堆棧
MOV TL0，20H ；重設計數值
MOV TH0，21H ；
CPL P3.0 ；將P3.0位反相,控制蜂鳴器發聲
POP PSW ；至堆棧取回PSW的值
POP ACC ；至堆棧取回A的值
RETI
DELAY：MOV R7，#02
D2： MOV R4，#187
D3： MOV R3，#248
DJNZ R3，$
DJNZ R4，D3
DJNZ R7，D2
RET
TAB1： ；決定節拍
DW 64260，64400，64521，64580
DW 64684，64777，64820，64898
DW 64968，65030，65058，65110
DW 65157，65178，65217
TAB: ；樂曲名稱《梁祝》
DB 02H,82H,62H,52H,48H,02H,52H,32H,22H,18H
DB 83H,91H,72H,62H,51H,61H,71H,61H,83H,61H
DB 81H,51H,61H,71H,61H,51H,46H,82H,32H,52H
DB 22H,42H,16H,21H,41H,18H,0E4H,13H,21H,43H
DB 51H,21H,41H,12H,83H,81H,61H,81H,58H,53H
DB 61H,31H,22H,13H,21H,42H,52H,0E2H,42H,21H
DB 11H,91H,41H,18H,63H,81H,32H,52H,21H,41H,
DB 16H,0E4H,11H,21H,31H,51H,26H,11H,21H,43H
DB 51H,82H,62H,52H,61H,51H,42H,21H,11H,0E4H
DB 44H,21H,41H,21H,11H,0E1H,11H,21H,41H,18H
DB 61H,81H,51H,61H,51H,41H,32H,21H,41H,18H
DB 08H,0H,04H ；曲子最後靜音5拍長的時間
DB 00H ；樂曲結束
END

『拾』 單片機 音樂播放器+亮燈

//《世上只有媽媽好》51單片機C語言程序和音樂采燈程序

//2007-5-22作者：徐學軍

//此程序在硬體上調試通過

//本程序的單片機晶振採用11．0592MHZ

//此程序的流水燈隨音樂的節拍的快慢而動

//程序對應的單片機的完整的電路圖已經插在了程序中,可以單擊放大查看

#include<reg51.h>

sbitspeaker=P2^0;//接音頻放大電路,

//sbitspeaker=P3^2;

sbitsw=P3^0;//電後位後,sw合上後就開始放音樂,燈開始閃動,sw斷開,音樂停止,燈也同時停止閃動

unsignedchartimer0h,timer0l,time,led=1,j=0;

unsignedcharflagd=0;

//世上只有媽媽好數據表

codeunsignedcharsszymmh[]={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

};

//音階頻率表高八位

codeunsignedcharFREQH[]={

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,

};

//音階頻率表低八位

codeunsignedcharFREQL[]={

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,

};

voiddelay(unsignedchart)

{

unsignedchart1;

unsignedlongt2;

for(t1=0;t1<t;t1++)

{

for(t2=0;t2<8000;t2++)

{

;

}

}

TR0=0;

}

voidt0int()interrupt1

{

TR0=0;

speaker=!speaker;

TH0=timer0h;

TL0=timer0l;

TR0=1;

}

voidsong()

{

TH0=timer0h;

TL0=timer0l;

TR0=1;

delay(time);

}

voidmain(void)

{

unsignedchark,i;

TMOD=1;//置CT0定時工作方式1

EA=1;ET0=1;//IE=0x82//CPU開中斷,CT0開中斷

while(1)

{

i=0;

time=1;

sw=1;

while(time)

{

if(sw)

{P0=0;i=0;continue;}

if(j==8)

{

//led=1;

j=0;flagd=~flagd;

if(flagd)

{

led=0x80;

}

else

{

led=1;

}

}

else

{

P0=~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;

song();

}

}

}