#include<KR4x4.h>
sbit P3_7=P3^7;
uchar t,i=0,TH,TL;
uchar FREQ_TH[]={ 0xFC,0xFC,0xFC,0xFD,
0xFD,0xFD,0xFD,
0xFB,0xFC,0xFC,0xFC,
0xFD,0xFD,0xFD};
uchar FREQ_TL[]={ 0x2A,0x95,0xC7,0x22,
0x73,0xBB,0xDC,
0xEF,0x62,0xC7,0xF6,
0x4B,0x98,0xDC};
void speaker(uchar key);
void DELAY(unsigned long time);
void main()
{ uchar c;
EA=1;
while(1)
{
c=keyscan();
switch(c)
{
case 0x11: TH=FREQ_TH[0];TL=FREQ_TL[0];speaker(c);break;
case 0x21: TH=FREQ_TH[1];TL=FREQ_TL[1];speaker(c);break;
case 0x41: TH=FREQ_TH[2];TL=FREQ_TL[2];speaker(c);break;
case 0x81: TH=FREQ_TH[3];TL=FREQ_TL[3];speaker(c);break;
case 0x12: TH=FREQ_TH[4];TL=FREQ_TL[4];speaker(c);break;
case 0x22: TH=FREQ_TH[5];TL=FREQ_TL[5];speaker(c);break;
case 0x42: TH=FREQ_TH[6];TL=FREQ_TL[6];speaker(c);break;
case 0x82: break;
case 0x14: TH=FREQ_TH[7];TL=FREQ_TL[7];speaker(c);break;
case 0x24: TH=FREQ_TH[8];TL=FREQ_TL[8];speaker(c);break;
case 0x44: TH=FREQ_TH[9];TL=FREQ_TL[9];speaker(c);break;
case 0x84: TH=FREQ_TH[10];TL=FREQ_TL[10];speaker(c);break;
case 0x18: TH=FREQ_TH[11];TL=FREQ_TL[11];speaker(c);break;
case 0x28: TH=FREQ_TH[12];TL=FREQ_TL[12];speaker(c);break;
case 0x48: TH=FREQ_TH[13];TL=FREQ_TL[13];speaker(c);break;
case 0x88: break;
default: break;
}
}
}
void speaker(uchar key)
{
uchar b;
ET1=1;
EA=1;
TMOD=0x10;
TR1=1;
b=keyscan();
while(b==key)
{
DELAY(2);
b=keyscan();
}
P3_7=1;
TR1=0;
}
void timer1() interrupt 3 using 1
{
TL1=TL;
TH1=TH;
P3_7=~P3_7;
}
void DELAY(unsigned long time)
{
unsigned long n;
for(n=0;n<500*time;n++);
}
dianziqin.rar_proteus 电子琴_单片机 电子琴_电子琴proteus_电子琴仿真
版权申诉
183 浏览量
2022-09-20
16:56:52
上传
评论
收藏 666B RAR 举报
小波思基
- 粉丝: 70
- 资源: 1万+
最新资源
- 论文(最终)_20240430235101.pdf
- 基于python编写的Keras深度学习框架开发,利用卷积神经网络CNN,快速识别图片并进行分类
- 最全空间计量实证方法(空间杜宾模型和检验以及结果解释文档).txt
- 5uonly.apk
- 蓝桥杯Python组的历年真题
- 2023-04-06-项目笔记 - 第一百十九阶段 - 4.4.2.117全局变量的作用域-117 -2024.04.30
- 2023-04-06-项目笔记 - 第一百十九阶段 - 4.4.2.117全局变量的作用域-117 -2024.04.30
- 前端开发技术实验报告:内含4四实验&实验报告
- Highlight Plus v20.0.1
- 林周瑜-论文.docx
资源上传下载、课程学习等过程中有任何疑问或建议,欢迎提出宝贵意见哦~我们会及时处理!
点击此处反馈
评论0