首 页文档资料下载资料维修视频包年699元
请登录  |  免费注册
当前位置:精通维修下载 > 文档资料 > 家电技术 > 维修教程知识 > 单片机栏
利用蜂鸣器和单片机演奏简单的音乐电路设计
来源:本站整理  作者:佚名  2011-04-11 15:53:21



利用蜂鸣器和单片机演奏简单的音乐

实验原理图

 

实验程序

/* =========================================================== */

/* ----------------------------------------------------------- */

/* 曲谱存贮格式 uchar code 数组名{音高,音长,音高,音长....} */

/* 音高由三位数字组成: */

/* 个位是表示 1~7 这七个音符. */

/* 十位是表示音符所在的音区,1-低音,2-中音,3-高音; */

/* 百位表示这个音符是否要升半音 0(不写)-不升,1-升半音。 */

/* 音长最多由三位数字组成: */

/* 个位表示音符的时值,其对应关系是: */

/* 数值(n) 0 1 2 3 4 5 6 */

/* --------------------------------------------- */

/* 几分音符 1 2 4 8 16 32 64 */

/* 即:音符=2^n ,这样做的目的是为了节省曲谱的存贮空间。 */

/* 十位表示音符的演奏效果(0-2),0-普通,1-连音,2-顿音。 */

/* 百位是符点位,0(不写)-无符点,1-有符点。 */

/* ----------------------------------------------------------- */

/* 调用演奏子程序的方法为: */

/* play(乐曲数组名,调号,升降八度,演奏速度,开始指针,结束指针) */

/* 调号(0-11)是指乐曲升多少个半音演奏;升降八度(1-3)是指在演奏 */

/* 在哪个八度演奏: 1-降八度,2-不升不降,3-升八度.开始指针(0- ) */

/* 是从哪个音符开始演奏,结束指针是演奏到哪个音符为止. */

/* ----------------------------------------------------------- */

//本程序用T0 来产生音调,用T1 产生音长

#include <reg51.h>

#define uchar unsigned char

#define yx 4/5 /* 定义普通音符演奏的长度分率 */

#define plen 2 /* 定义晶振的时钟周期(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; /* 音长和音符两个计数器初值暂存 */

void play(sound,dh,sj,speed,point1,point2)

uchar code sound[]; /* 接受乐曲数组的地址 */

uchar speed,sj,dh; /* 速度、八度、调号 */

uint point1,point2; /* 乐曲开始、结束指针 */

{

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;i<12;i++) /* 根据调号及升降八度来计算音符频率 */

{

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]; /* 读出第一个音符和它时时值 */

tc=65535-10000/plen; /* 算出10ms 的初装值 */

tc0=tc%256; /* 计算TL1 应装入的初值 */

tc1=tc/256; /* 计算TH1 应装入的初值 */

len0=12000/speed; /* 算出1 分音符的长度(几个10ms) */

len4=len0/4; /* 算出4 分音符的长度 */

len4=len4-len4*yx; /* 普通音最长间隔标准 */

TMOD=0x11;

TH1=tc1; TL1=tc0;

关键词:

文章评论评论内容只代表网友观点,与本站立场无关!

   评论摘要(共 0 条,得分 0 分,平均 0 分)
Copyright © 2007-2017 down.gzweix.Com. All Rights Reserved .
页面执行时间:74,582.03000 毫秒