單片機制作電子琴
已有 804 次閱讀2018-11-28 17:37
|
單片機電子琴
#include <reg51.h>
#include <intrins.h>
#define uint unsigned int
#define uchar unsigned char
sbit SPK = P3^7; //P3.7外接揚聲器
uint FreqTemp;
unsigned int code Freqtab[] = { //定時半周期的初始值
64021,64103,64260,64400, //低音3 4 5 6
64524,64580,64684,64777, //低音7,中音1 2 3
64820,64898,64968,65030, //中音4 5 6 7
65058,65110,65157,65178}; //高音1 2 3 4
uchar Keyscan(void) /* 按鍵掃描程序 */
{
uchar i, j, temp, Buffer[4] = {0xfe, 0xfd, 0xfb, 0xf7};
for(j = 0; j < 4; j++) { //循環四次,掃描四行
P1 = Buffer[j]; //在低四位分別輸出一個低電平
_nop_();
temp = 0x80; //計劃先讀出P1.7位
for(i = 0; i < 4; i++) { //循環四次,檢查四列
if(!(P1 & temp)) { //從高四位,截取1位
return (i + j * 4); //返回取得的按鍵值
}
temp >>= 1; //換右邊一位
} }
return 16; //沒有鍵按下就返回16
}
void Display(uchar k)
{
P2 = ((k / 10) << 4) + (k % 10);
}
void main()
{
uchar Key_Value = 16, Key_Temp1, Key_Temp2;//讀出的鍵值
TMOD = 0x01; //T0定時方式1
ET0 = 1; //允許T0中斷
EX0 = 1; //允許X0中斷
EA = 1;
while(1)
{
TR0 = 0; //暫不發音
Key_Temp1 = Keyscan(); //讀入按鍵
if(Key_Temp1 != 16)
{
Display(Key_Value); //顯示鍵值、延時消抖
Key_Temp2 = Keyscan(); //再讀一次
if (Key_Temp1 == Key_Temp2) //兩次相等
{
Key_Value = Key_Temp1; //就確認下來
FreqTemp = Freqtab[Key_Value]; //根據鍵值,取出定時半周期的初始值
Display(Key_Value); //顯示
TR0 = 1; //啟動定時器,發音
while (Keyscan() < 16); //等待釋放
SPK = 1; //停止發音
}
}
}
}
void T0_INT(void) interrupt 1 /* 按鍵中斷 */
{
TL0 = FreqTemp; //載入定時半周期的初始值
TH0 = FreqTemp >> 8;
SPK = ~SPK; //發音
}