利用蜂鳴器和單片機(jī)演奏簡(jiǎn)單的音樂電路設(shè)計(jì)
實(shí)驗(yàn)原理圖
實(shí)驗(yàn)程序
/* =========================================================== */
/* ----------------------------------------------------------- */
/* 曲譜存貯格式 uchar code 數(shù)組名{音高,音長(zhǎng),音高,音長(zhǎng)....} */
/* 音高由三位數(shù)字組成: */
/* 個(gè)位是表示 1~7 這七個(gè)音符. */
/* 十位是表示音符所在的音區(qū),1-低音,2-中音,3-高音; */
/* 百位表示這個(gè)音符是否要升半音 0(不寫)-不升,1-升半音。 */
/* 音長(zhǎng)最多由三位數(shù)字組成: */
/* 個(gè)位表示音符的時(shí)值,其對(duì)應(yīng)關(guān)系是: */
/* 數(shù)值(n) 0 1 2 3 4 5 6 */
/* --------------------------------------------- */
/* 幾分音符 1 2 4 8 16 32 64 */
/* 即:音符=2^n ,這樣做的目的是為了節(jié)省曲譜的存貯空間。 */
/* 十位表示音符的演奏效果(0-2),0-普通,1-連音,2-頓音。 */
/* 百位是符點(diǎn)位,0(不寫)-無符點(diǎn),1-有符點(diǎn)。 */
/* ----------------------------------------------------------- */
/* 調(diào)用演奏子程序的方法為: */
/* play(樂曲數(shù)組名,調(diào)號(hào),升降八度,演奏速度,開始指針,結(jié)束指針) */
/* 調(diào)號(hào)(0-11)是指樂曲升多少個(gè)半音演奏;升降八度(1-3)是指在演奏 */
/* 在哪個(gè)八度演奏: 1-降八度,2-不升不降,3-升八度.開始指針(0- ) */
/* 是從哪個(gè)音符開始演奏,結(jié)束指針是演奏到哪個(gè)音符為止. */
/* ----------------------------------------------------------- */
//本程序用T0 來產(chǎn)生音調(diào),用T1 產(chǎn)生音長(zhǎng)
#include reg51.h>
#define uchar unsigned char
#define yx 4/5 /* 定義普通音符演奏的長(zhǎng)度分率 */
#define plen 2 /* 定義晶振的時(shí)鐘周期(us) */
#define uchar unsigned char
#define uint unsigned int
sbit speaker=P3^5;
/* ------------------下面是曲譜 ------------------------------ */
uchar code sound[100]=
{25,2,23,3,25,3,31,1,26,2,31,3,26,3,25,1,25,2,21,3,22,3,23,2,22,3,21,3,22,0,
25,2,23,3,25,3,31,102,27,3,26,2,31,2,25,1,25,2,22,3,23,3,24,102,17,3, 21,0};
uchar tc0,tc1,sc0,sc1; /* 音長(zhǎng)和音符兩個(gè)計(jì)數(shù)器初值暫存 */
void play(sound,dh,sj,speed,point1,point2)
uchar code sound[]; /* 接受樂曲數(shù)組的地址 */
uchar speed,sj,dh; /* 速度、八度、調(diào)號(hào) */
uint point1,point2; /* 樂曲開始、結(jié)束指針 */
{
uint code fftab[12]={262,277,294,311,330,349,369,392,415,440,466,494}; /* 頻率表*/
uchar code stab[7]={0,2,4,5,7,9,11}; /* 1~7 在頻率表中的位置 */
uchar code ltab[7]={1,2,4,8,16,32,64};
uchar tl,ts,sl,sm,sh,slen,xg,ii,fd;
uint point,hz,tc,sc,len,len0,len1,len2,len4,i,ftab[12];
speaker=1;
for(i=0;i12;i++) /* 根據(jù)調(diào)號(hào)及升降八度來計(jì)算音符頻率 */
{
ii=i+dh;
if(ii>11)
{
ii=ii-12;
ftab[i]=fftab[ii]*2;
}
else
ftab[i]=fftab[ii];
if(sj==1) ftab[i]>>=2;
if(sj==3) ftab[i]=2;
}
point=point1;
ts=sound[point];
tl=sound[point+1]; /* 讀出第一個(gè)音符和它時(shí)時(shí)值 */
tc=65535-10000/plen; /* 算出10ms 的初裝值 */
tc0=tc%256; /* 計(jì)算TL1 應(yīng)裝入的初值 */
tc1=tc/256; /* 計(jì)算TH1 應(yīng)裝入的初值 */
len0=12000/speed; /* 算出1 分音符的長(zhǎng)度(幾個(gè)10ms) */
len4=len0/4; /* 算出4 分音符的長(zhǎng)度 */
len4=len4-len4*yx; /* 普通音最長(zhǎng)間隔標(biāo)準(zhǔn) */
TMOD=0x11;
TH1=tc1; TL1=tc0;
塵埃粒子計(jì)數(shù)器相關(guān)文章:塵埃粒子計(jì)數(shù)器原理 蜂鳴器相關(guān)文章:蜂鳴器原理
評(píng)論