发帖

功能齐全的电子琴——可以弹奏、记录、播放，LCD显示参数值

2016-7-13 22:42:18 4386

0 本帖最后由 pkintel 于 2016-7-13 22:41 编辑电子琴电路：http://pan.baidu.com/s/1qXWMtdy 电子琴程序：http://pan.baidu.com/s/1jIxwVwa 6 IMG_20160713_213531.jpg (518.99 KB, 下载次数: 7) IMG_20160713_213546.jpg (673.53 KB, 下载次数: 11) IMG_20160713_213555.jpg (677.39 KB, 下载次数: 10) 电子琴LCD1602版【程序仿真】.rar 89.59 KB , 下载次数: 21
2016-7-13 22:42:18　　评论淘帖0 举报相关推荐 • 八音自动播放电子琴设计 3 • 电子琴设计资料 2 • 基于FPGA的电子琴设计 11 • 带存储功能的电子琴 37 • 简易电子琴设计及FPGA功能验证 31 • 简易电子琴 6 • 电子琴设计 250 • 电子琴的设计与实现 26 • 简易电子琴 44 • 玩具电子琴的设计 0 8 个讨论

0 //程序： #include #include #define uchar unsigned char #define uint unsigned int *it RS = P2^5; it RW = P2^6; it LCDEN = P2^7; it LCD_BUSY = P0^7; //lcd1602忙碌标志位 #define LCD_DATA P0 //P0口接LCD数据口 #define PKEY P1 //定义4x4按键接的IO口行扫描 it PLAY = P3^7; it SPK = P2^0; #define ALLSONG 3 //歌曲总数按实际写 #define CODEMAX 30 //最大音符数 uchar tone_h; uchar tone_l; uchar t1_flag = 0; //用于记录定时器1进入中断的次数 uchar PressTime = 0; //按键按下的时间（节拍） uchar code chuzhi[3][16]={ //音调对应的计数初值 0xff,0xff, //用任意值占0位，因为音调从1开始 0xf8,0x8c,//低1 0xf9,0x5b,// 2 0xfa,0x15,// 3 0xfa,0x67,// 4 0xfb,0x04,// 5 0xfb,0x90,// 6 0xfc,0x0c,//低7 0xff,0xff,//占0位 0xfc,0x44,//中1 0xfc,0xac,// 2 0xfd,0x09,// 3 0xfd,0x34,// 4 0xfd,0x82,// 5 0xfd,0xc8,// 6 0xfe,0x06,//中7 0xff,0xff,//占0位 0xfe,0x22,//高1 0xfe,0x56,// 2 0xfe,0x85,// 3 0xfe,0x9a,// 4 0xfe,0xc1,// 5 0xfe,0xe4,// 6 0xff,0x03 //高7 }; //===================== //=== LCD部分 //===================== //== 延时函数 ================== void lcd1602_delayms(uint ms)//延时？个 ms { uchar a,b,c; while(ms--) { for(c=1;c>0;c--) for(b=142;b>0;b--) for(a=2;a>0;a--); } } //========================================== //忙碌检测 //========================================== void busy_check() { / RW = 1; //读 RS = 0; //指令寄存器 LCD_DATA = 0xFF;//实验证明读数时要将I/O口要置1 LCDEN = 0; _nop_(); _nop_(); _nop_(); _nop_(); LCDEN = 1;// EN高电平读信息负跳变执行指令 _nop_(); _nop_(); _nop_(); _nop_(); while(1) { if(LCD_BUSY == 0)//P07 == 0跳出循环 break; }/ lcd1602_delayms(2);//采用延时法 } //================== //写指令 //================== void lcdwrcom(uchar command) { busy_check(); RW = 0;//写 RS = 0;//指令寄存器 LCD_DATA = command; LCDEN = 1;//负跳变写入指令 _nop_(); _nop_(); _nop_(); _nop_(); LCDEN = 0; } //========================================== //写数据数字、字母、标点符号都是数据 //========================================== void lcdwrdata(uchar lcd_data) { busy_check(); RW = 0;//写 RS = 1;//数据寄存器 LCD_DATA = lcd_data; LCDEN = 1;//负跳变写入指令 _nop_(); _nop_(); _nop_(); _nop_(); LCDEN = 0; } //================= //lcd1602初始化 //================= void LCD_Init() { lcd1602_delayms(15);//必要 lcd1602上电到电压稳定需要时间 RW = 0;//写 RS = 0;//指令寄存器 LCD_DATA = 0x38;// 0x38设置显示模式为：16X2 显示,5X7 点阵,8 位数据接口' LCDEN = 1; _nop_(); _nop_(); _nop_(); _nop_(); LCDEN = 0; lcd1602_delayms(5); lcdwrcom(0x0c);//打开显示无光标不闪烁 lcdwrcom(0x06);//指令3 光标右移屏幕所有文字移动无效 lcdwrcom(0x01);// 清显示，光标复位到地址00H位置。 } //========================================== //LCD扩展函数： //========================================== //========================================== //定位下一步要写数的地址 //========================================== void address(uchar hang,uchar lie) { uchar location; if(hang == 0) location = 0x80\|lie; else location = 0xC0\|lie; lcdwrcom(location); } //========================================== //显示字母、单个字符 //========================================== void printchar(uchar hang,uchar lie,uchar letter) { address(hang,lie); lcdwrdata(letter); } //========================================== //显示单词（字符数组） //========================================== void printword(uchar hang,uchar lie,uchar word) { uchar i = 0; address(hang,lie); for(i = 0;word[i] != '';i++) { //address(hang,lie+i); lcdwrdata(word[i]); } } //====================================================== //**** 生日快乐 ** uint code srkl[] = { 205,205,406,405,411,807, 205,205,406,405,412,811, 205,205,415,413,411,407,406, 314,114,413,411,413,812, 305,105,406,405,411,807, 305,105,406,405,412,811, 305,105,415,413,411, 407,406,314,114,413,411,412,811,410, 0xffff }; //***恋曲1990***** uint code lq1990[] = { 613,213,412,411,613,213,412,411,613,213,412,411,1213, 110, //前奏 215,215,215,215,413,412, //乌溜溜的黑眼珠 613,211,211,212,413,1206, //和你的笑脸 212,213,212,213,415,213,212, //怎么也难忘记 612,211,211,206,405,1213,110, //你容颜的转变 215,215,215,215,213,212, //轻飘飘的旧时 613,211,211,212,213,1206, //光就这么溜走 212,213,212,213,415,213,212, //转头回去看看 612,205,213,212,413,1211,110, //时已匆匆数年 215,215,215,215,413,412, //苍茫茫的天涯 613,211,211,212,413,1206, //路是你的漂泊 212,213,212,213,415,213,212, //寻寻觅觅长相 612,211,211,206,405,1213,110, //守是我的脚步 215,215,215,215,213,212, //黑漆漆的孤枕 613,211,211,212,213,1206, //边是你的温柔 212,213,212,213,415,213,212, //醒来时的清晨 612,205,213,212,413,1211,110, //里是我的哀愁 215,215,215,215,413,412, //轰隆隆的雷雨 613,211,211,212,413,1206, //声在我的窗前 212,213,212,213,415,213,212, //怎么也难忘记 612,211,211,206,405,1213,110, //你离去的转变 215,215,215,215,213,212, //孤单单的身影 613,211,211,212,213,1206, //后寂寥的心情 212,213,212,213,415,213,212, //永远无怨 612,205,213,212,413,1211,110, //的是我的双眼 615,213,415,416, //或许明日 621,216,421,416, //太阳西下 415,415,415,416,1213, //倦鸟已归时 212,213,212,213,415,413, //你将已经踏上 612,211,411,413,1212,210, //旧时的归途 613,213,412,413, //人生难得 615,213,415,416, //再次寻觅 421,421,421,422,1216, //相知的伴侣 221,221,221,221,416,415, //生命终究难舍 212,412,212,412,413,1215,1610, 1610, //蓝蓝的白云天 0xFFFF, }; //========================== //粗略延时函数 //========================== void delayms(uint ms)//延时？个 ms { uchar a,b,c; while(ms--) { for(c=1;c>0;c--) for(b=142;b>0;b--) for(a=2;a>0;a--); } } //====================== //定时器1 测量按键持续的节拍数 //====================== void Timer1_Init(void) { EA = 1; ET1 = 1; TMOD &= 0x0F; TMOD \|= 0x10; TH1 = (65536-25000)/256; TL1 = (65536-25000)%256; //25ms中断一次 } void timer1() interrupt 3 { TH1 = (65536-25000)/256; TL1 = (65536-25000)%256; //25ms中断一次 t1_flag++; if(t1_flag == 5) //125ms { t1_flag = 0; if(PressTime < 16) //最多16 即最长4秒 PressTime++; } } //====================== //按键扫描函数【行扫描】 //低4位接行，高4位接列 /键值分布 0 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 / //====================== uchar keyScan(void) { uchar hang; uchar key; uchar temp; for(hang = 0;hang < 4;hang++) { PKEY = ~(1< temp = PKEY&0xF0; //取高4位的值 temp >>= 4; //将高四位右移到低四位 if(temp != 0x0F) //有按键按下 { switch(temp) { case 14: key = 4hang+0;break; //temp:1110 case 13: key = 4hang+1;break; //temp:1101 case 11: key = 4hang+2;break; //temp:1011 case 7: key = 4hang+3;break; //temp:0111 } break; //有键按下，获取键值后，终止扫描 } else //没有按键按下返回255 key = 255; } return key; } //====================== //节拍延时 //====================== void delay125ms(uint pai) //延时？125ms 即？个节拍 { uchar a,b,c; while(pai--) { for(c=239;c>0;c--) for(b=104;b>0;b--) for(a=1;a>0;a--); } } //====================== //定时器0 产生音调 //====================== void Timer0_Init(void) { EA = 1; ET0 = 1; TMOD &= 0xF0; TMOD \|= 0x01; PT0 = 1; TH0 = 255; TL0 = 255; } //====================== //定时器0中断每进入一次，SPK取反 //====================== void timer0() interrupt 1 { TH0 = tone_h; TL0 = tone_l; SPK = ~SPK; } //====================== //存储弹奏的歌曲 //0xffff代表歌曲结束 //千位与百位表示节拍 //十位：低中高音[分别是0,1,2] //个位：音调[0~7] [0代表不发声] //====================== uint music[CODEMAX] = { 215,215,215,215,413,412, //乌溜溜的黑眼珠 613,211,211,212,413,1206, //和你的笑脸 212,213,212,213,415,213,212, //怎么也难忘记 612,211,211,206,405,1213,110, //你容颜的转变 0xffff, }; //==================================== //播放函数 //播放完毕后返回1，否则返回0 //music：歌曲数组，note：发第几个音 //==================================== uchar PlayMusic(uint music,uint note) { uchar yin1; //低中高音 0,1,2 uchar yin2; //音调 0~7 0代表不发声，但有节拍 uchar jiepai; if(music[note] == 0xffff) return 1; else { if(music[note]%10 != 0) //音调不为0 【音调为0时表示不发声，但有节拍】 { yin1 = music[note]%100/10; yin2 = music[note]%10; tone_h = TH0 = chuzhi[yin1][yin22 ]; //音调高位【二维数组第1维表示低中高音，第二维表示音调】 tone_l = TL0 = chuzhi[yin1][yin22 + 1]; //音调低位 TR0 = 1; //开启定时器0 开始发声 } jiepai = music[note]/100; //========== 显示状态信息 =============== printword(1,0,"NO."); printchar(1,3,note/100%10 + '0'); //第几音符，百位 printchar(1,4,note/10%10 + '0'); //第几音符，十位 printchar(1,5,note%10 + '0'); //第几音符，个位 if(yin1 == 0) printchar(1,14,'L'); //低音 else if(yin1 == 1) printchar(1,14,'M'); //中音 else if(yin1 == 2) printchar(1,14,'H'); //高音 printchar(1,15,yin2+'0'); //音调 printword(1,9,"P:"); //节拍 printchar(1,11,jiepai/10%10 + '0'); printchar(1,12,jiepai%10 + '0'); delay125ms(jiepai); //节拍 TR0 = 0; //已经响够节拍数，停止发声。 TR1 = 0; //停止显示节拍 delayms(30); //每个节拍结束后，停一段时间 return 0; } } //====================== //主函数 //====================== void main(void) { uchar key = 255; uchar save = 0; uint note = 0; //音符 uchar note2 = 0; uchar play_flag = 0; uchar yin1 = 0; //低中高音 0,1,2 uchar yin2 = 1; //音调 0~7 0代表不发声，但有节拍 uchar PlayID = 0; //播放歌曲的序号 uchar PlayIDb = 0; //上次播放的歌曲序号 music[CODEMAX-1] = 0xffff; //防止歌曲数组无0xffff出现错误 Timer0_Init(); Timer1_Init(); LCD_Init(); while(1) { if(PLAY == 0) //按下PLAY键 { PLAY = 0; //引脚置0 进入播放模式 //切换了播放歌曲，从第0个音符开始播放， if(PlayID != PlayIDb) { PlayIDb = PlayID; note = 0; } //========== 显示状态信息 =============== printword(0,9,"Song:"); //歌曲编号 printchar(0,14,PlayID/10%10 + '0'); //歌曲编号，十位 printchar(0,15,PlayID%10 + '0'); //歌曲编号，个位 //==================== 重点 ======================== if(play_flag %2 == 0) //play_flag为偶数时播放，奇数时暂停播放 { printword(0,0,"MOD:Play "); //播放模式 if(PlayID == 0) { if(PlayMusic(music,note) == 0) //播放音符 note++; //为结束播放下一个音符 else { if(PlayID < ALLSONG-1) PlayID++;//播放下一首 else PlayID = 0; } } else if(PlayID == 1) { if(PlayMusic(srkl,note) == 0) //播放音符 note++; //为结束播放下一个音符 else { if(PlayID < ALLSONG-1) PlayID++; //播放下一首 else PlayID = 0; } } else if(PlayID == 2) { if(PlayMusic(lq1990,note) == 0) //播放音符 note++; //为结束播放下一个音符 else { if(PlayID < ALLSONG-1) PlayID++; //播放下一首 else PlayID = 0; } } } //=================================================================== key = keyScan(); //要稍微按久一点才有反应 if(key == 15) //按下15号按键，停止播放 { lcdwrcom(0x01);// 清显示，光标复位到地址00H位置。 PLAY = 1; note = 0; //停止后再按播放，从头开始播放。 play_flag = 0; TR0 = 0; tone_h = TH0 = chuzhi[2][22]; tone_l = TL0 = chuzhi[2][22+1]; TR0 = 1; delayms(100); //按键后响一声 TR0 = 0; while(keyScan() != 255); //放开按键时(255时) 跳出循环 } else if(key == 13) //按下13号键暂停与暂停后播放 { play_flag++; if(play_flag %2 == 0) printchar(1,7,' '); //播放 else printchar(1,7,'P'); //暂停 TR0 = 0; tone_h = TH0 = chuzhi[2][22]; tone_l = TL0 = chuzhi[2][22+1]; TR0 = 1; delayms(100); //开始或者暂停都响一声 TR0 = 0; while(keyScan() != 255); //放开按键时(255时) 跳出循环 } else if(key == 12) //播放上一首 { if(PlayID > 0) PlayID--; else PlayID = ALLSONG-1; TR0 = 0; tone_h = TH0 = chuzhi[2][22]; tone_l = TL0 = chuzhi[2][22+1]; TR0 = 1; delayms(100); //按键后响一声 TR0 = 0; while(keyScan() != 255); //放开按键时(255时) 跳出循环 } else if(key == 14) //播放下一首 { if(PlayID < ALLSONG-1) PlayID++; else PlayID = 0; TR0 = 0; tone_h = TH0 = chuzhi[2][22]; tone_l = TL0 = chuzhi[2][22+1]; TR0 = 1; delayms(100); //按键后响一声 TR0 = 0; while(keyScan() != 255); //放开按键时(255时) 跳出循环 } }//================= 弹奏模式 ===================== else if(PLAY == 1) { PlayID = 0; note = 0; //=============== 显示状态信息 ================== printword(0,0,"MOD:Press"); //弹奏模式 if(save == 1) printword(0,10,"Record"); else { printword(0,10," "); note2 = 0;} printword(1,0,"NO."); printchar(1,3,note2/100%10 + '0'); //第几音符，百位 printchar(1,4,note2/10%10 + '0'); //第几音符，十位 printchar(1,5,note2%10 + '0'); //第几音符，个位 key = keyScan(); if(key == 0) //按下0键开始记录 { if(save == 0) //第一次按表示开始弹奏 { save = 1; //标记，存储 note2 = 0; tone_h = TH0 = chuzhi[0][12]; tone_l = TL0 = chuzhi[0][12+1]; TR0 = 1; delayms(100); //开始录制响一短低音 TR0 = 0; } else //第二次按表示弹奏结束写入结束符0xffff { save = 0; music[note2] = 0xffff; tone_h = TH0 = chuzhi[1][32]; tone_l = TL0 = chuzhi[1][32+1]; TR0 = 1; delayms(100); //录制完成响一短高音 TR0 = 0; } while(keyScan() != 255); //放开按键时(255时) 跳出循环 } else if(key != 255) //按下1~15键 { t1_flag = 0; PressTime = 0; TH1 = (65536-25000)/256; TL1 = (65536-25000)%256; //25ms中断一次 TR1 = 1; //开启定时器1，开始计算按键按下时间 //判断被按下按键的键值 if(key >= 1 && key <= 3) //低音 5~7 { yin1 = 0; yin2 = key+4; } //音调对应的定时器初值，在二维数组中的位置 else if(key >= 4 && key <= 11) //0音与中音1~7 { yin1 = 1; yin2 = key - 4; } else if(key >= 12 && key <= 15) //高音1~4 { yin1 = 2; yin2 = key - 11; } tone_h = TH0 = chuzhi[yin1][yin22]; //音调高位【二维数组第1维表示低中高音，第二维表示音调】 tone_l = TL0 = chuzhi[yin1][yin22+1]; //音调低位 if(yin2 != 0) //非0音时，开启定时器0，发声 TR0 = 1; while(1) //释放按键时跳出循环 { //========== 显示状态信息 =============== printword(1,9,"P:"); //节拍 printchar(1,11,PressTime/10%10 + '0'); printchar(1,12,PressTime%10 + '0'); if(yin1 == 0) printchar(1,14,'L'); //低音 else if(yin1 == 1) printchar(1,14,'M'); //中音 else if(yin1 == 2) printchar(1,14,'H'); //高音 printchar(1,15,yin2+'0'); //音调 key = keyScan(); if(key == 255) //放开按键 { TR1 = 0; TR0 = 0; //停止发声 if(save == 1) //save变量为1时，将弹奏的信息保存 { TR1 = 0; //关闭定时器1，停止 music[note2] = (uint)PressTime100 + yin110 + yin2; if(note2 < CODEMAX - 2) //长度有限制 note2++; } break; } } } else //无键按下 { printword(1,9,"P:__ __"); } } } }

2016-7-13 22:42:54 评论举报 1^# pkintel

0 不知道两个按键同时按下会怎样

2016-7-14 00:33:53 评论举报 2^# 1206571750

0 楼主牛逼

2016-7-14 01:06:39 评论举报 3^# 王翎

0 这个不错，可以收藏下

2016-7-14 10:23:22 评论举报 4^# chenwei6991627

0 不错不错

2016-7-14 10:58:45 评论举报 5^# Benj

0 1206571750 发表于 2016-7-14 00:33 不知道两个按键同时按下会怎样没有处理同时按下两个键的情况，按键扫描函数只能返回一个键值。

2016-7-14 11:54:47 评论举报 6^# pkintel

0 学习学习。看看啦

2016-7-14 12:32:57 评论举报 7^# 黄峰华

0 提示: 作者被禁止或删除内容自动屏蔽

2016-7-14 13:05:58 评论举报 8^# 头像被屏蔽

声明：本文内容及配图由入驻作者撰写或者入驻合作网站授权转载。文章观点仅代表作者本人，不代表电子发烧友网立场。文章及其配图仅供工程师学习之用，如有内容图片侵权或者其他问题，请联系本站作侵删。侵权投诉

发表新帖

精选推荐

关于中断知识学习总结笔记

726 浏览 0 评论
支持外扩sd卡功能的串口数据库模块

777 浏览 1 评论
基于瑞萨FPB-RA4E2智能床头灯项目——1编译环境搭建与点亮驱动ws2812全彩LED

680 浏览 0 评论
嵌入式学习-飞凌嵌入式ElfBoard ELF 1板卡-LCD显示图片编程示例之介绍mmap

1149 浏览 0 评论
《DNESP32S3使用指南-IDF版_V1.6》第二章常用的C语言知识点

1120 浏览 0 评论

热门帖

【youyeetoo X1 windows 开发板体验】少儿AI智能STEAM积木平台

11805 浏览 31 评论

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

关注微信公众号

电子发烧友网

电子发烧友论坛

社区合作: 刘勇; 联系电话：15994832713; 邮箱地址：liuyong@huaqiu.com

社区管理: elecfans短短; 微信：elecfans_666; 邮箱：users@huaqiu.com

返回单片机/MCU论坛

回复

关闭

站长推荐 /6

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

- 技术社区: HarmonyOS技术社区

RISC-V MCU技术社区

FPGA开发者技术社区

- OpenHarmony开源社区: OpenHarmony开源社区

- 嵌入式论坛: ARM技术论坛

STM32/STM8技术论坛

嵌入式技术论坛

单片机/MCU论坛

RISC-V技术论坛

瑞芯微Rockchip开发者社区

FPGA|CPLD|ASIC论坛

DSP论坛

- 电路图及DIY: 电路设计论坛

DIY及创意

电子元器件论坛

专家问答

- 电源技术论坛: 电源技术论坛

无线充电技术

- 综合技术与应用: 机器人论坛

USB论坛

电机控制

模拟技术

音视频技术

综合技术交流

上位机软件（C/Python/Java等）

- 无线通信论坛: WIFI技术

蓝牙技术

天线|RF射频|微波|雷达技术

- EDA设计论坛: PCB设计论坛

DigiPCBA论坛

Protel|AD|DXP论坛

PADS技术论坛

Allegro论坛

multisim论坛

proteus论坛|仿真论坛

KiCad EDA 中文论坛

DFM|可制造性设计论坛

- 测试测量论坛: LabVIEW论坛

Matlab论坛

测试测量技术

传感技术

- 招聘/交友/外包/交易/杂谈: 项目外包

供需及二手交易

工程师杂谈|交友

招聘|求职|工程师职场

- 官方社区: 发烧友官方/活动

华秋商城

华秋电路

time

recommend

hot

post

—
—
—

版
块
导
航