用單片機(jī)實(shí)現(xiàn)的音樂(lè)播放器
原理圖：
101208f020igbkkb2g2oe6.png.thumb.jpg (12.17 KB, 下載次數(shù): 53)
下載附件
2017-6-11 16:38 上傳
單片機(jī)匯編語(yǔ)言源程序如下:
- 用單片機(jī)實(shí)現(xiàn)的音樂(lè)播放器
- 源程序清單
- ;**************************************;
- ; MCU音樂(lè)播放器 ;
- ;作者:耶濤 ;
- ;開發(fā)時(shí)間:2005年9月20日 ;
- ;**************************************;
- ORG 0000H
- AJMP START
- ORG 000BH
- AJMP TIM0
- ORG 001BH
- RETI
- ORG 0023H
- START: MOV R5,#00H ;初始化
- MOV TMOD,#00010001B
- MOV IE,#10101010B
- MOV DPTR,#TAB2 ;裝第一首歌
- MOV 30H,DPL ;DPTR低8位送30H暫存
- MOV 31H,DPH ;DPTR高8位送31H暫存
- START1: INC R7 ;產(chǎn)生8位隨機(jī)數(shù)
- MOV A,#12H
- MOV B,R7
- MUL AB
- MOV P1,A ;8位隨機(jī)數(shù)由P1口輸出
- MOV DPL,30H
- MOV DPH,31H
- MOV A,#00H
- MOVC A,@A+DPTR ;查表
- MOV R0,A ;音符數(shù)據(jù)送R0嶄存
- MOV A,#00H
- INC DPTR
- MOVC A,@A+DPTR ;查表
- MOV R1,A ;節(jié)拍數(shù)據(jù)送R1嶄存
- INC DPTR
- MOV 30H,DPL
- MOV 31H,DPH
- CJNE A,#01H,ELECT ;一首歌沒(méi)結(jié)束轉(zhuǎn)ELECT
- INC R5 ;結(jié)束歌曲計(jì)數(shù)器加1
- ELECT: JZ START ;所有歌曲結(jié)束轉(zhuǎn)START循環(huán)
- MOV A,R0
- JNZ SING
- CLR TR0
- SETB P3.7
- LOOP1: ACALL DELAY ;調(diào)用延時(shí)子程序
- DJNZ R1,LOOP1
- SJMP START1
- SING: MOV DPTR,#TAB1 ;音符表首址送DPTR
- DEC R0 ;計(jì)算音符
- MOV A,R0
- MOV B,#02H
- MUL AB
- MOV R0,A
- MOVC A,@A+DPTR ;查表
- MOV 21H,A
- INC DPTR
- MOV A,R0
- MOVC A,@A+DPTR
- MOV 20H,A
- MOV TL0,20H
- MOV TH0,21H
- SETB TR0 ;開T0定時(shí)器
- LOOP2: ACALL DELAY
- DJNZ R1,LOOP2
- AJMP START1
- TIM0: MOV TL0,20H
- MOV TH0,21H
- CPL P3.7
- RETI ;中斷返回
- DELAY: MOV R2,#70
- DELAY1: MOV R3,#252
- DJNZ R3,$
- JNB P3.4,FORM ;上一曲開關(guān)按下轉(zhuǎn)FORM
- JNB P3.5,NEXT ;下一曲開關(guān)按下轉(zhuǎn)NEXT
- DJNZ R2,DELAY1
- RET
- FORM: CLR EA ;關(guān)中斷
- JNB P3.4,[ DISCUZ_CODE_1 ]nbsp; ;等待鍵釋放
- CJNE R5,#00H,ZERO ;不是第一首歌曲轉(zhuǎn)ZER0
- MOV R5,#08H ;是第一首將最后一首歌曲裝入歌曲計(jì)數(shù)器
- SJMP KEYWORK
- ZERO: DEC R5 ;歌曲向上進(jìn)一首
- SJMP KEYWORK
- NEXT: CLR EA
- JNB P3.5,$
- INC R5 ;歌曲下翻一首
- KEYWORK: MOV DPTR,#TAB ;將歌曲排列表裝入DPTR
- MOV A,R5 ;將R5的內(nèi)容送A
- RL A
- SETB EA ;開中斷
- JMP @A+DPTR ;根據(jù)A的內(nèi)容轉(zhuǎn)向不同歌曲
- TAB: AJMP MUSIC2
- AJMP MUSIC3
- AJMP MUSIC4
- AJMP MUSIC5
- MUSIC2: MOV DPTR,#TAB2 ;第2首歌曲首址送DPTR
- GONG: MOV 30H,DPL
- MOV 31H,DPH
- AJMP START1
- MUSIC3: MOV DPTR,#TAB3
- SJMP GONG
- MUSIC4: MOV DPTR,#TAB4
- SJMP GONG
- MUSIC5: MOV DPTR,#TAB5
- SJMP GONG
-
- ;********************（音符表）**********************;
- TAB1: DW 64021,64185,64331,64400,64524,64632,64732,
- DW 64777,64860,64934,64968,65030,65085,65134,
- DW 65157,65198,65235,65252,65283,65310,65335,
- ;*********************(蘭花草)***********************;
- TAB2: DW 0608H,0A08H,0A08H,0A08H,0A18H,0908H,0808H,0908H,
- DW 0808H,0708H,0620H,0D08H,0D08H,0D08H,0D08H,0D18H,
- DW 0C08H,0A08H,0C08H,0C08H,0B08H,0A20H,0A08H,0D08H,
- DW 0D08H,0C08H,0A18H,0908H,0808H,0908H,0808H,0708H,
- DW 0610H,0310H,0308H,0808H,0808H,0708H,0618H,0A08H,
- DW 0908H,0808H,0708H,0508H,0620H,0908H,0808H,0708H,
- DW 0508H,0640H,0001H
- ;**********************(梁祝)*************************;
- TAB3: DW 0A10H,0C08H,0D04H,0F08H,1004H,0D04H,0F04H,0C08H,
- DW 1308H,1504H,1404H,1304H,1104H,1304H,1018H,1008H,
- DW 1004H,1104H,0E08H,0D04H,0C08H,0D04H,0F08H,1008H,
- DW 0A08H,0F08H,0D04H,0C04H,0D04H,0F04H,0C18H,1108H,
- DW 1304H,0E08H,1008H,0D04H,0F04H,0C08H,0C10H,0A08H,
- DW 0C02H,0A08H,0C08H,0D02H,0E04H,1004H,0D18H,0C04H,
- DW 0D04H,0F08H,1004H,1308H,1108H,1008H,1104H,1004H,
- DW 0F08H,0D04H,0C04H,0A10H,0F10H,0D08H,0F02H,0D04H,
- DW 0C04H,0A04H,0C04H,0D04H,0F04H,0C38H,0001H
- ;*****************(讓我們蕩起雙槳)*********************;
- TAB4: DW 0608H,0808H,0908H,0A18H,0C08H,0A08H,0808H,0910H,
- DW 0620H,0008H,0808H,0908H,0A08H,0C18H,0001H,0C08H,
- DW 0D10H,0910H,0A30H,0001H,0A08H,0C08H,0D20H,0C18H,
- DW 0D08H,0F08H,0E04H,0D04H,0C08H,0D08H,0A10H,0004H,
- DW 0808H,0908H,0A18H,0C08H,0810H,0610H,0808H,0908H,
- DW 0A08H,0D08H,0C30H,0010H,0A20H,0D18H,0001H,0D08H,
- DW 0C08H,0B08H,0A10H,0001H,0920H,0A18H,0C08H,0608H,
- DW 0808H,0910H,0010H,0808H,0908H,0A10H,0C0BH,0001H,
- DW 0C04H,0D10H,0F10H,0E08H,0D08H,0C08H,0A08H,0D40H,
- DW 0001H
- ;*********************(童年)****************************;
- TAB5: DW 0A08H,0C08H,0C10H,0C08H,0A08H,0D08H,0D08H,0E08H,
- DW 0D08H,0D08H,0D08H,0D08H,0C08H,0F10H,0F08H,0F08H,
- DW 0F08H,0D08H,0F08H,0D08H,0C40H,0A08H,0C08H,0C10H,
- DW 0C08H,0A08H,0D08H,0D08H,0E08H,0D08H,0D08H,0D08H,
- DW 0D08H,0C08H,0F10H,0F08H,0F08H,0F08H,0D08H,0D08H,
- DW 0F08H,1040H,1308H,1308H,1310H,1310H,1108H,1008H,
- ……………………
- …………限于本文篇幅 余下代碼請(qǐng)從51黑下載附件…………
所有資料51hei提供下載:
用單片機(jī)實(shí)現(xiàn)的音樂(lè)播放器圖和程序070302.rar
(70.73 KB, 下載次數(shù): 57)
2017-6-11 16:37 上傳
點(diǎn)擊文件名下載附件
下載積分: 黑幣 -5
|
QQ好友和群
QQ空間
騰訊微博
騰訊朋友
收藏
淘帖
頂
踩
