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

 找回密码
 立即注册

QQ登录

只需一步，快速开始

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

搜索
»论坛 › 嵌入式/单片机论坛 › 单片机仿真论坛 › 单片机4*4矩阵键盘电子琴仿真和源程序
返回列表 发新帖
查看: 4327|回复: 1
打印 上一主题 下一主题
收起左侧

单片机4*4矩阵键盘电子琴仿真和源程序

[复制链接]
跳转到指定楼层
楼主
ID:253741 发表于 2018-9-23 18:54 | 只看该作者 |只看大图 回帖奖励 |倒序浏览 |阅读模式
4x4电子琴 发出不同的声音。学校要求做无聊就做了.....
仿真原理图如下（proteus仿真工程文件可到本帖附件中下载）


Altium Designer画的原理图和PCB图如下：(51hei附件中可下载工程文件)


单片机源程序如下:
  1. #include <reg51.h>
  2. #define uint unsigned int
  3. #define uchar unsigned char
  4. #define output P1
  5. #define input P1
  6. enum KEY{key0,key1,key2,key3,key4,key5,key6,key7,key8,key9,key10,key11,key12,key13,key14,key15};
  7. unsigned int code Freqtab[] = {        
  8.      64021,64103,64260,64400,     
  9.      64524,64580,64684,64777,      
  10.      64820,64898,64968,65030,      
  11.      65058,65110,65157,65178};     
  12. uint FreqTemp;
  13. sbit SPEAK = P3^7;
  14. void delay1ms(uint n)   
  15. {
  16.     uint a,b,c;
  17.         for(c=n;c>0;c--)
  18.             for(b=199;b>0;b--)
  19.                 for(a=1;a>0;a--);
  20. }

  22. uint key_input(void)
  23. {
  24.         uchar temp1,temp2;                       
  25.         uchar num = 16;                          
  26.         output = 0x0f;               
  27.            temp1 = input;                       
  28.         if(0x0f != temp1)          
  29.         {                                          
  30.                 delay1ms(5);               
  31.                 temp1 = input;                       
  32.                 if(0x0f != temp1)                       
  33.                 {
  34.                         temp1 = temp1 & 0x0f;       
  35.                         output = 0xf0;                       
  36.                         delay1ms(1);                       
  37.                         temp2 = input;                       
  38.                         temp2 = temp2 & 0xf0;       
  39.                         temp1 = temp1 | temp2;       
  40.                 }
  41.         }
  42.         switch(temp1)
  43.         {
  44.                 case 0xee:num=0;break;  
  45.         case 0xde:num=1;break;  
  46.         case 0xbe:num=2;break;   
  47.         case 0x7e:num=3;break;
  48.                 case 0xed:num=4;break;               
  49.         case 0xdd:num=5;break;           
  50.         case 0xbd:num=6;break;            
  51.         case 0x7d:num=7;break;   
  52.                 case 0xeb:num=8;break;   
  53.         case 0xdb:num=9;break;   
  54.         case 0xbb:num=10;break;   
  55.         case 0x7b:num=11;break;   
  56.                 case 0xe7:num=12;break;   
  57.         case 0xd7:num=13;break;   
  58.         case 0xb7:num=14;break;   
  59.         case 0x77:num=15;break;      
  60.                 default:break;
  61.         }
  62.         return num;
  63. }
  64. void T0_INT(void) interrupt 1
  65. {
  66.      TL0 = FreqTemp;               
  67.      TH0 = FreqTemp >> 8;
  68.      SPEAK = ~SPEAK;                  
  69. }
  70. int main()
  71. {
  72.         TMOD = 0X01;               
  73.         EA = 1;
  74.         ET0 = 1;
  75.         TR0 = 0;
  76.         while(1)
  77.         {
  78.                 uint num,temp;
  79.                 num = key_input();
  80.                 temp = num;
  81.         if(16 != num)
  82.                 {
  83.                         FreqTemp = Freqtab[num];
  84.                         TR0 = 1;
  85.                         while(0xf0 != output);       
  86.                         TR0 = 0;
  87.                         SPEAK = 1;       
  88.                 }               
  89.         }
  90.         return 0;
  91. }
复制代码


所有资料51hei提供下载:
电子琴30.rar (91.92 KB, 下载次数: 76)


评分

参与人数 1黑币 +50 收起 理由
admin + 50 共享资料的黑币奖励！

查看全部评分

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

使用道具 举报

沙发
ID:681740 发表于 2020-1-5 22:13 | 只看该作者
你这个proteus不行啊
回复

使用道具 举报

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

本版积分规则

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

Powered by 单片机教程网

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