基于51的电子琴设计-电子工程世界

分享到: 微博; QQ; 微信; LinkedIn

下面我们要为这个音符建立一个表格，有助于单片机通过查表的方式来获得相应的数据
低音0－19之间，中音在20－39之间，高音在40－59之间
TABLE:        DW 0,63628,63835,64021,64103,64260,64400,64524,0,0
                   DW 0,63731,63928,0,64185,64331,64463,0,0,0
                   DW 0,64580,64684,64777,64820,64898,64968,65030,0,0
                   DW 0,64633,64732,0,64860,64934,64994,0,0,0
                   DW 0,65058,65110,65157,65178,65217,65252,65283,0,0
                   DW 0,65085,65134,0,65198,65235,65268,0,0,0
                   DW 0
2、音乐的音拍，一个节拍为单位（C调）

对于不同的曲调我们也可以用单片机的另外一个定时/计数器来完成。
下面就用AT89S51单片机产生一首“生日快乐”歌曲来说明单片机如何产生的。
在这个程序中用到了两个定时/计数器来完成的。其中T0用来产生音符频率，T1用来产生音拍。
5．程序框图
电子琴

图4.22.2
6．汇编源程序
KEYBUF      EQU 30H
STH0        EQU 31H
STL0        EQU 32H
TEMP        EQU 33H
            ORG 00H
            LJMP START
            ORG 0BH
            LJMP INT_T0
START:      MOV TMOD,#01H
            SETB ET0
            SETB EA
WAIT:
            MOV P3,#0FFH
            CLR P3.4
            MOV A,P3
            ANL A,#0FH
            XRL A,#0FH
            JZ NOKEY1
            LCALL DELY10MS
            MOV A,P3
            ANL A,#0FH
            XRL A,#0FH
            JZ NOKEY1
            MOV A,P3
            ANL A,#0FH
            CJNE A,#0EH,NK1
            MOV KEYBUF,#0
            LJMP DK1
NK1:        CJNE A,#0DH,NK2
            MOV KEYBUF,#1
            LJMP DK1
NK2:        CJNE A,#0BH,NK3
            MOV KEYBUF,#2
            LJMP DK1
1NK3:        CJNE A,#07H,NK4
            MOV KEYBUF,#3
            LJMP DK1
NK4:        NOP
DK1:
            MOV A,KEYBUF
            MOV DPTR,#TABLE
            MOVC A,@A+DPTR
            MOV P0,A
            MOV A,KEYBUF
            MOV B,#2
            MUL AB
            MOV TEMP,A
            MOV DPTR,#TABLE1
            MOVC A,@A+DPTR
            MOV STH0,A
            MOV TH0,A
            INC TEMP
            MOV A,TEMP
            MOVC A,@A+DPTR
            MOV STL0,A
            MOV TL0,A
            SETB TR0
DK1A:       MOV A,P3
            ANL A,#0FH
            XRL A,#0FH
            JNZ DK1A
            CLR TR0
NOKEY1:
            MOV P3,#0FFH
            CLR P3.5
            MOV A,P3
            ANL A,#0FH
            XRL A,#0FH
            JZ NOKEY2
            LCALL DELY10MS
            MOV A,P3
            ANL A,#0FH
            XRL A,#0FH
            JZ NOKEY2
            MOV A,P3
            ANL A,#0FH
            CJNE A,#0EH,NK5
            MOV KEYBUF,#4
            LJMP DK2
NK5:        CJNE A,#0DH,NK6
            MOV KEYBUF,#5
            LJMP DK2
NK6:        CJNE A,#0BH,NK7
            MOV KEYBUF,#6
            LJMP DK2
NK7:        CJNE A,#07H,NK8
            MOV KEYBUF,#7
            LJMP DK2
NK8:        NOP
DK2:
            MOV A,KEYBUF
            MOV DPTR,#TABLE
            MOVC A,@A+DPTR
            MOV P0,A
            MOV A,KEYBUF
            MOV B,#2
            MUL AB
            MOV TEMP,A
            MOV DPTR,#TABLE1
            MOVC A,@A+DPTR
            MOV STH0,A
            MOV TH0,A
            INC TEMP
            MOV A,TEMP
            MOVC A,@A+DPTR
            MOV STL0,A
            MOV TL0,A
            SETB TR0
DK2A:       MOV A,P3
            ANL A,#0FH
            XRL A,#0FH
            JNZ DK2A
            CLR TR0
NOKEY2:
            MOV P3,#0FFH
            CLR P3.6
            MOV A,P3
            ANL A,#0FH
            XRL A,#0FH
            JZ NOKEY3
            LCALL DELY10MS
            MOV A,P3
            ANL A,#0FH
            XRL A,#0FH
            JZ NOKEY3
            MOV A,P3
            ANL A,#0FH
            CJNE A,#0EH,NK9
            MOV KEYBUF,#8
            LJMP DK3
NK9:        CJNE A,#0DH,NK10
            MOV KEYBUF,#9
            LJMP DK3
NK10:       CJNE A,#0BH,NK11
            MOV KEYBUF,#10
            LJMP DK3
NK11:       CJNE A,#07H,NK12
            MOV KEYBUF,#11
            LJMP DK3
NK12:       NOP
DK3:
            MOV A,KEYBUF
            MOV DPTR,#TABLE
            MOVC A,@A+DPTR
            MOV P0,A
            MOV A,KEYBUF
            MOV B,#2
            MUL AB
            MOV TEMP,A
            MOV DPTR,#TABLE1
            MOVC A,@A+DPTR
            MOV STH0,A
            MOV TH0,A
            INC TEMP
            MOV A,TEMP
            MOVC A,@A+DPTR
            MOV STL0,A
            MOV TL0,A
            SETB TR0
DK3A:       MOV A,P3
            ANL A,#0FH
            XRL A,#0FH
            JNZ DK3A
            CLR TR0
NOKEY3:
            MOV P3,#0FFH
            CLR P3.7
            MOV A,P3
            ANL A,#0FH
            XRL A,#0FH
            JZ NOKEY4
            LCALL DELY10MS
            MOV A,P3
            ANL A,#0FH
            XRL A,#0FH
            JZ NOKEY4
            MOV A,P3
            ANL A,#0FH
            CJNE A,#0EH,NK13
            MOV KEYBUF,#12
            LJMP DK4
NK13:       CJNE A,#0DH,NK14
            MOV KEYBUF,#13
            LJMP DK4
NK14:       CJNE A,#0BH,NK15
            MOV KEYBUF,#14
            LJMP DK4
NK15:       CJNE A,#07H,NK16
            MOV KEYBUF,#15
            LJMP DK4
NK16:       NOP
DK4:
            MOV A,KEYBUF
            MOV DPTR,#TABLE
            MOVC A,@A+DPTR
            MOV P0,A
            MOV A,KEYBUF
            MOV B,#2
            MUL AB
            MOV TEMP,A
            MOV DPTR,#TABLE1
            MOVC A,@A+DPTR
            MOV STH0,A
            MOV TH0,A
            INC TEMP
            MOV A,TEMP
            MOVC A,@A+DPTR
            MOV STL0,A
            MOV TL0,A
            SETB TR0
DK4A:       MOV A,P3
            ANL A,#0FH
            XRL A,#0FH
            JNZ DK4A
            CLR TR0
NOKEY4:
            LJMP WAIT
DELY10MS:
            MOV R6,#10
D1:         MOV R7,#248
            DJNZ R7,$
            DJNZ R6,D1
            RET
INT_T0:
            MOV TH0,STH0
            MOV TL0,STL0
            CPL P1.0
            RETI
TABLE:      DB 3FH,06H,5BH,4FH,66H,6DH,7DH,07H
            DB 7FH,6FH,77H,7CH,39H,5EH,79H,71H
TABLE1:     DW 64021,64103,64260,64400
            DW 64524,64580,64684,64777
            DW 64820,64898,64968,65030
            DW 65058,65110,65157,65178
            END
7．C语言源程序
#include
unsigned char code table[]={0x3f,0x06,0x5b,0x4f,
                            0x66,0x6d,0x7d,0x07,
                            0x7f,0x6f,0x77,0x7c,
                            0x39,0x5e,0x79,0x71};
unsigned char temp;
unsigned char key;
unsigned char i,j;
unsigned char STH0;
unsigned char STL0;
unsigned int code tab[]={64021,64103,64260,64400,
                          64524,64580,64684,64777,
                          64820,64898,64968,65030,
                          65058,65110,65157,65178};
void main(void)
{
TMOD=0x01;
ET0=1;
EA=1;
while(1)
    {
      P3=0xff;
      P3_4=0;
      temp=P3;
      temp=temp & 0x0f;
      if (temp!=0x0f)
        {
          for(i=50;i>0;i--)
          for(j=200;j>0;j--);
          temp=P3;
          temp=temp & 0x0f;
          if (temp!=0x0f)
            {
              temp=P3;
              temp=temp & 0x0f;
              switch(temp)
                {
                  case 0x0e:
                    key=0;
                    break;
                  case 0x0d:
                    key=1;
                    break;
                  case 0x0b:
                    key=2;
                    break;
                  case 0x07:
                    key=3;
                    break;
                }
              temp=P3;
              P1_0=~P1_0;
              P0=table[key];
              STH0=tab[key]/256;
              STL0=tab[key]%6;
              TR0=1;
              temp=temp & 0x0f;
              while(temp!=0x0f)
                {
                  temp=P3;
                  temp=temp & 0x0f;
                }
              TR0=0;
            }
        }
      P3=0xff;
      P3_5=0;
      temp=P3;
      temp=temp & 0x0f;
      if (temp!=0x0f)
        {
          for(i=50;i>0;i--)
          for(j=200;j>0;j--);
          temp=P3;
          temp=temp & 0x0f;
          if (temp!=0x0f)
            {
              temp=P3;
              temp=temp & 0x0f;
              switch(temp)
                {
                  case 0x0e:
                    key=4;
                    break;
                  case 0x0d:
                    key=5;
                    break;
                  case 0x0b:
                    key=6;
                    break;
                  case 0x07:
                    key=7;
                    break;
                }
              temp=P3;
              P1_0=~P1_0;
              P0=table[key];
              STH0=tab[key]/256;
              STL0=tab[key]%6;
              TR0=1;
              temp=temp & 0x0f;
              while(temp!=0x0f)
                {
                  temp=P3;
                  temp=temp & 0x0f;
                }
              TR0=0;
            }
        }
      P3=0xff;
      P3_6=0;
      temp=P3;
      temp=temp & 0x0f;
      if (temp!=0x0f)
        {
          for(i=50;i>0;i--)
          for(j=200;j>0;j--);
          temp=P3;
          temp=temp & 0x0f;
          if (temp!=0x0f)
            {
              temp=P3;
              temp=temp & 0x0f;
              switch(temp)
                {
                  case 0x0e:
                    key=8;
                    break;
                  case 0x0d:
                    key=9;
                    break;
                  case 0x0b:
                    key=10;
                    break;
                  case 0x07:

关键字：电子琴引用地址：基于51的电子琴设计

上一篇：拉幕式数码管显示技术原理与分析
下一篇：基于51的模拟计算器数字输入及显示

推荐阅读最新更新时间：2024-03-16 15:51

51单片机入门 - 中断的使用

1、中断：放下手中的事情去处理另一种事情。 2、定时器中断定时器是单片机模块的一个资源，确确实实存在的一个模块，中断是单片机的一种运行机制。不是一回事，不只是定时器才能触发中断。对单片机的操作主要是操作IO口和操作寄存器的。 x * 8 + 3 = 向量地址 —— x为中断函数编号 3、数码管动态扫描余晖效应：（10ms） P0 = 0xff； // 消隐 EA = 0; ET0 = 0; // 开总中断，开定时器0中断 #include reg52.h typedef unsigned int uint; typedef unsigned char uchar;

[单片机]

任意波形/函数发生器AFG3251C的特点优势和应用范围

产品概述无可比拟的性能、通用性、直观的操作和经济性，使AFG3000 系列函数、任意波形和脉冲发生器成为业内最实用的仪器。杰出的性能和多功能性用户可以选择12 种不同的标准波形。可以以高采样率生成长度达128 K 的任意波形。在脉冲波形上，可以独立设置上升沿和下降沿时间。可以将外部信号连接并叠加到输出信号上。双通道型号可以生成两个完全相同或截然不同的信号。所有仪器都带有高度稳定的时基，每年漂移仅± 1 ppm。直观的用户界面，一目了然地显示更多的信息大屏幕一目了然地显示所有相关波形参数和波形图。这为您信号设置提供了全面的信心，使您能够把重点放在手边的任务上。快捷键可以直接进入常用函数和参数。通过结构清楚的菜单，可

[测试测量]

在51单片机上用定时器实现按键长按、短按功能

我们在项目中常常需要在只有一个按键的情况下，来实现长按执行某个功能，短按执行另一个功能。鉴于此，用51搭的核心板实测，亲测可行。好了，废话少说，简单粗暴，直接贴上程序结构。主函数（） { } 在进入while大循环中，先要配置定时器。在while中核心是：使用两个if块判断,第一个if块判断按键是否按下，在第一个if块里面只进行按键按下标志位设置和定时器计数。在第二个if块里根据第一个if块定时器计数来执行长短按功能，记得在退出第二个if块时，按键按下标志位（press_flag）和定时器计数变量（count）都要清零。 …… 定时器配置和中断服务程序就不贴出来了。

[单片机]

浅谈Small RTOS51 下CAN总线数据收发实现

1 CAN总线简介　　现场总线（Fieldbus）是近年来迅速发展起来的一种工业数据总线，它主要解决工业现场的智能化仪器仪表、控制器、执行机构等现场设备间的数字通信以及这些现场控制设备和高级控制系统之间的信息传递问题。由于现场总线简单、可靠、经济实用等一系列突出的优点，因而受到了许多标准团体和计算机厂商的高度重视。现场总线（Fieldbus）是20世纪80年代末、90年代初国际上发展形成的，用于现场总线技术　　过程自动化、制造自动化、楼宇自动化等领域的现场智能设备互连通讯网络。它作为工厂数字通信网络的基础，沟通了生产过程现场及控制设备之间及其与更高控制管理层次之间的联系。它不仅是一个基层网络，而且还是一种开放式、新

[嵌入式]

51单片机学前预备知识

一.单片机的概念：在一片集成电路芯片上集成微处理器、存储器、I/O接口电路，从而构成了单芯片微型计算机，即单片机。扩展阅读： 51 单片机是什么二.单片机的用途：工业自动化：数据采集，测控技术; 智能仪器仪表：数字示波器、数字信号源、数字万用表、感应电流表等; 消费类电子产品:洗衣机、电冰箱、空调机、手机等; 凡是与控制或简单计算有关的电子设备都可以用单片机来实现，再根据具体实际情况选择不同性能的单片机，如：atmel，stc，pic，avr，凌阳，80C51，arm等。三.怎么学单片机：实践第一;补充必要的理论知识，即缺什么补什么;做工程项目积累经验。(可在网络上搜索些题目，也可自己有什么想法大胆的去试

[单片机]

51单片机-定时器&数码管扫描显示

1.定时器中断实现间隔切换在第六章第4讲的测试代码中提到过数码管微闪烁问题，这是由于三八译码器的IO端口切换的间隔时间不均匀导致，这部分的问题宋老师已经在《手把手教你学51单片机》文档6.4.2节有详细解释，并在6.5.2节里解决了这个问题。数码管扫描函数我们使用定时器0强制实现间隔1ms切换三八译码器的IO输出，这样保证了每个数码管被点亮的时间都是均匀的。我们在主函数里不停地执行数码管显示函数。这里是测试代码，用定时器1实现add间隔50ms自增1，数码管显示add的值。 #include reg52.h #include function.h //详见第六章第8讲 #include timer.h u32 a

[单片机]

MCS-51系列单片机串行接口控制寄存器SCON

MCS-51系列单片机串行口控制寄存器SCON是一个特殊功能寄存器，地址为98H，具有位寻址功能。SCON的格式如下：　　各位功能说明如下：　　　　1.SM0、SM1：串行口的工作方式选择位。　　　　2.SM2：多机通信控制位。　　　　对于于方式2和方式3，如SM2置为1，则只有接收到的第9位数据（RB8）为“1”,才激活接收中断标志位RI；而当SM2置为0时，则不论第9位数据为“0”还是为“1”，都将前8位数据装入SBUF中，并置位RI产生中断请求。对于方式1，如SM2=1，则只有接收到有效的停止位才会激活RI。对于方式0，SM2应该为0。　　　　3.REN：允许串行接收位。　　　　REN位

[单片机]

基于8051主控芯片TM52F1376的咖啡机应用方案

目前市面上的咖啡机种类非常多，按照操作方式分为半自动和全自动两大类型。无论是哪种类型的咖啡机都有十分强大的市场需求，为了满足这个需求，本文主要介绍一款简单化的咖啡机产品整体解决方案，基于TM52F1376单片机，通过集成多种功能在芯片上，提供更高的性能，更低的成本，能快速进入市场。本方案由AC-DC电源芯片与MCU主控两部分组成，MCU内置触摸模块，LED/LCD显示驱动模块，多路PWM输出，UART通信接口，带基准电压源的ADC以及EEPROM存储器等模块，方案拓扑图如下：基于TM52F1376芯片的咖啡机具有良好的人机交互体验，用户可通过智能触摸来设置功能，温度检测功能可通过LED/LCD显示驱动模块实时显示出来

[单片机]

基于80<font color='red'>51</font>主控芯片TM52F1376的咖啡机应用方案

热门资源推荐
热门放大器推荐

小广播

添点儿料...

无论热点新闻、行业分析、技术干货……

发布文章

热门活动

换一批

基于51的电子琴设计

设计资源 培训 开发板 精华推荐

设计资源培训开发板精华推荐