设为首页收藏本站
开启辅助访问 切换到宽版

 找回密码
 立即注册

QQ登录

只需一步，快速开始

热门： 51单片机 | 24小时必答区 | 单片机教程 | 单片机DIY制作 | STM32 | Cortex M3 | 模数电子 | 电子DIY制作 | 音响/功放 | 拆机乐园 | Arduino | 嵌入式OS | 程序设计

搜索
»论坛 › 嵌入式/单片机论坛 › 51单片机 › 单片机电子琴ppt课件+仿真+源代码
返回列表 发新帖
查看: 2889|回复: 0
打印 上一主题 下一主题
收起左侧

单片机电子琴ppt课件+仿真+源代码

[复制链接]
跳转到指定楼层
楼主
ID:244243 发表于 2018-1-5 14:35 | 只看该作者 |只看大图 回帖奖励 |倒序浏览 |阅读模式


全部资料51hei下载地址：
单片机电子琴.zip (417.49 KB, 下载次数: 58)



下面是电子琴ppt课件内容预览


仿真原理图如下（proteus仿真工程文件可到本帖附件中下载）


  
器件
  
型号
  
单片机（1个）
  
AT89C52
  
八位排阻（1个）
  
RESPACK-8
  
振荡电容（2个）
  
22PF
  
上电复位电容（1个）
  
10uF
  
复位端下拉电阻（1个）
  
10KΩ
  
晶振（1个）
  
CRYSTAL
  
扬声器（1个）
  
SOUNDER
  
数码管（1个）
  
DIPIO
  
小型微动按键（16个）
  
BUTTON

单片机源程序如下:
  1. #include <AT89X51.H>
  2. unsigned char code table[]={0x3f,0x06,0x5b,0x4f,
  3.                             0x66,0x6d,0x7d,0x07,
  4.                             0x7f,0x6f,0x77,0x7c,
  5.                             0x39,0x5e,0x79,0x71};
  6. unsigned char temp;
  7. unsigned char key;
  8. unsigned char i,j;
  9. unsigned char STH0;
  10. unsigned char STL0;
  11. unsigned int code tab[]={64021,64103,64260,64400,
  12.                           64524,64580,64684,64777,
  13.                           64820,64898,64968,65030,
  14.                           65058,65110,65157,65178};

  16. void main(void)
  17. {
  18.   TMOD=0x01;
  19.   ET0=1;
  20.   EA=1;
  21.   while(1)
  22.     {
  23.       P3=0xff;
  24.       P3_4=0;
  25.       temp=P3;
  26.       temp=temp & 0x0f;
  27.       if (temp!=0x0f)
  28.         {
  29.           for(i=50;i>0;i--)
  30.           for(j=200;j>0;j--);
  31.           temp=P3;
  32.           temp=temp & 0x0f;
  33.           if (temp!=0x0f)
  34.             {
  35.               temp=P3;
  36.               temp=temp & 0x0f;              
  37.               switch(temp)
  38.                 {
  39.                   case 0x0e:
  40.                     key=3;
  41.                     break;
  42.                   case 0x0d:
  43.                     key=2;
  44.                     break;
  45.                   case 0x0b:
  46.                     key=1;
  47.                     break;
  48.                   case 0x07:
  49.                     key=0;
  50.                     break;
  51.                 }
  52.               temp=P3;
  53.             
  54.               P0=table[key];
  55.               STH0=tab[key]/256;
  56.               STL0=tab[key]%256;
  57.               TR0=1;
  58.               temp=temp & 0x0f;              
  59.               while(temp!=0x0f)
  60.                 {
  61.                   temp=P3;
  62.                   temp=temp & 0x0f;              
  63.                 }
  64.               TR0=0;
  65.             }
  66.         }
  67.   
  68.       P3=0xff;
  69.       P3_5=0;
  70.       temp=P3;
  71.       temp=temp & 0x0f;
  72.       if (temp!=0x0f)
  73.         {
  74.           for(i=50;i>0;i--)
  75.           for(j=200;j>0;j--);
  76.           temp=P3;
  77.           temp=temp & 0x0f;
  78.           if (temp!=0x0f)
  79.             {
  80.               temp=P3;
  81.               temp=temp & 0x0f;              
  82.               switch(temp)
  83.                 {
  84.                   case 0x0e:
  85.                     key=7;
  86.                     break;
  87.                   case 0x0d:
  88.                     key=6;
  89.                     break;
  90.                   case 0x0b:
  91.                     key=5;
  92.                     break;
  93.                   case 0x07:
  94.                     key=4;
  95.                     break;
  96.                 }
  97.               temp=P3;
  98.               
  99.               P0=table[key];
  100.               STH0=tab[key]/256;
  101.               STL0=tab[key]%256;
  102.               TR0=1;
  103.               temp=temp & 0x0f;              
  104.               while(temp!=0x0f)
  105.                 {
  106.                   temp=P3;
  107.                   temp=temp & 0x0f;              
  108.                 }
  109.               TR0=0;
  110.             }
  111.         }
  112.   
  113.       P3=0xff;
  114.       P3_6=0;
  115.       temp=P3;
  116.       temp=temp & 0x0f;
  117.       if (temp!=0x0f)
  118.         {
  119.           for(i=50;i>0;i--)
  120.           for(j=200;j>0;j--);
  121.           temp=P3;
  122.           temp=temp & 0x0f;
  123.           if (temp!=0x0f)
  124.             {
  125.               temp=P3;
  126.               temp=temp & 0x0f;              
  127.               switch(temp)
  128.                 {
  129.                   case 0x0e:
  130.                     key=11;
  131.                     break;
  132.                   case 0x0d:
  133.                     key=10;
  134.                     break;
  135.                   case 0x0b:
  136.                     key=9;
  137.                     break;
  138.                   case 0x07:
  139.                     key=8;
  140.                     break;
  141.                 }
  142.               temp=P3;
  143.             
  144.               P0=table[key];
  145.               STH0=tab[key]/256;
  146.               STL0=tab[key]%256;
  147.               TR0=1;
  148.               temp=temp & 0x0f;              
  149.               while(temp!=0x0f)
  150.                 {
  151.                   temp=P3;
  152.                   temp=temp & 0x0f;              
  153.                 }
  154.               TR0=0;
  155.             }
  156.         }
  157.   
  158.       P3=0xff;
  159.       P3_7=0;
  160.       temp=P3;
  161.       temp=temp & 0x0f;
  162.       if (temp!=0x0f)
  163.         {
  164.           for(i=50;i>0;i--)
  165.           for(j=200;j>0;j--);
  166.           temp=P3;
  167.           temp=temp & 0x0f;
  168.           if (temp!=0x0f)
  169.             {
  170.               temp=P3;
  171.               temp=temp & 0x0f;              
  172.               switch(temp)
  173.                 {
  174.                   case 0x0e:
  175.                     key=15;
  176.                     break;
  177.                   case 0x0d:
  178.                     key=14;
  179.                     break;
  180.                   case 0x0b:
  181.                     key=13;
  182.                     break;
  183.                   case 0x07:
  184.                     key=12;
  185.                     break;
  186.                 }
  187.               temp=P3;
  188. ……………………

  190. …………限于本文篇幅 余下代码请从51黑下载附件…………
复制代码


分享到:  QQ好友和群QQ好友和群 QQ空间QQ空间 腾讯微博腾讯微博 腾讯朋友腾讯朋友
收藏收藏1 分享淘帖 顶顶 踩踩
回复

使用道具 举报

返回列表 发新帖
高级模式
B Color Image Link Quote Code Smilies
您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

手机版|小黑屋|51黑电子论坛 |51黑电子论坛6群 QQ 管理员QQ:125739409;技术交流QQ群281945664

Powered by 单片机教程网

快速回复 返回顶部 返回列表