单片机实现简单音乐发生器

本例实现了一个基于51单片机控制的简单音乐发生器，用户可以在16键的键盘上演奏简单的乐曲
本例设计的关键有两点
1.首先要铸取各音符所对应的计数值列表
2。参考LM386的芯片资料设计出正确的音频功放电路
下面是电路和程序






/*****************************************/
/* Copyright (c) 2005, 通信工程学院 */
/* All rights reserved. */
/* 作 者：戴 佳 */
/*****************************************/

#include "MusInstru.h"

/* 键消抖延时函数 */
void delay(void)
{
uchar i;
for (i=300;i>0;i--);
}

/* 键扫描函数 */
uchar getkey(void)
{
uchar scancode,tmpcode;

if ((P1&0xf0)==0xf0)
return(0);

scancode = 0xfe;
while((scancode&0x10)!=0) // 逐行扫描
{
P1 = scancode; // 输出行扫描码
if ((P1&0xf0)!=0xf0) // 本行有键按下
{
tmpcode = (P1&0xf0)|0x0f;

/* 返回特征字节码，为1的位即对应于行和列 */
return((~scancode)+(~tmpcode));
}
else scancode = (scancode<<1)|0x01; // 行扫描码左移一位
}
}

/* 定时器0中断服务子程序 */
void time0_int(void) interrupt 1 using 0
{
/* 设置计数初值 */
TH0 = STH0;
TL0 = STL0;
P20=~P20; // 反相，产生输出脉冲
}

/* 主程序 */
void main()
{
uchar key,k;

TMOD = 0x01; // T0，工作方式1

ET0 = 1;
EA = 1;

while(1)
{
P1 = 0xf0; // 发全0行扫描码
if ((P1&0xf0)!=0xf0) // 若有键按下
{
delay(); // 延时去抖动
if ((P1&0xf0)!=0xf0) // 延时后再判断一次，去除抖动影响
{
key = getkey(); // 调用键盘扫描函数

// 根据获取的按键位置得到k值
switch(key)
{
case 0x11: // 1行1列
k = 0;
break;
case 0x21: // 1行2列
k = 1;
break;
case 0x41: // 1行3列
k = 2;
break;
case 0x81: // 1行4列
k = 3;
break;
case 0x12: // 2行1列
k = 4;
break;
case 0x22: // 2行2列
k = 5;
break;
case 0x42: // 2行3列
k = 6;
break;
case 0x82: // 2行4列
k = 7;
break;
case 0x14: // 3行1列
k = 8;
break;
case 0x24: // 3行2列
k = 9;
break;
case 0x44: // 3行3列
k = 10;
break;
case 0x84: // 3行4列
k = 11;
break;
case 0x18: // 3行4列
k = 12;
break;
case 0x28: // 3行4列
k = 13;
break;
case 0x48: // 3行4列
k = 14;
break;
case 0x88: // 3行4列
k = 15;
break;
default:
break;
}

P20 = ~P20; // 反相

/* 根据所得的k值设定计数器1的计数初值 */
STH0 = tab[k]/256;
STL0 = tab[k]%256;

TR0 = 1; // 开始计数

P1 = 0xf0; // 发全0行扫描码
while ((P1&0xf0)!=0xf0) // 若没有松开按键
{
P1 = 0xf0;
}

TR1 = 0; // 若按键松开，则停止计数，不产生脉冲输出
}
}
}
}