单片机实现简单音乐发生器
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;//若按键松开,则停止计数,不产生脉冲输出
}
}
}
}
单片机音乐发生 相关文章:
- Windows CE 进程、线程和内存管理(11-09)
- RedHatLinux新手入门教程(5)(11-12)
- uClinux介绍(11-09)
- openwebmailV1.60安装教学(11-12)
- Linux嵌入式系统开发平台选型探讨(11-09)
- Windows CE 进程、线程和内存管理(二)(11-09)