利用C語言實現八弦激光豎琴圖片詳見：http://www.zg4o1577.cn/bbs/dpj-52056-1.html
==============所需元件==========================
激光頭 * 8
5mm光敏電阻 * 8
開關 * 1
輕觸按鍵 * 1
usb座或DC座 * 1
1k電阻 *2
10k電阻 * 10
3mmLED * 1
無源蜂鳴器 * 1
s8550三極管 * 1
排針（用于下載） * 1
STC89C52單片機 * 1
DIP40的單片機座 * 1
12M晶振 * 1
30pf瓷片電容 * 2
10uf電解電容 * 1
===============用到的工具=======================
電烙鐵、焊錫絲、助焊劑可選、剪鉗、鑷子、熱熔膠槍與熱熔膠
================================================
===============激光豎琴使用說明=================
================================================
8個激光束 —— 對應中音的1、2、3、4、5、6、7，還有高音1
注意事項 —— 手彈奏時，請選取光線較弱的室內。當彈奏不靈敏時，請轉到更暗的環境。
電路原理圖如下：
0.png (110.9 KB, 下載次數: 129)
下載附件
2018-5-20 14:53 上傳
單片機源程序如下:
- //********* 51簡易電子琴程序 *****************
- #include<reg52.h>
- #define uint unsigned int
- #define uchar unsigned char
- sbit fmq=P0^0;//定義P0.0口為蜂鳴器信號輸出
- uint z;
- uint code tone[8]={0xfc44,0xfcac,0xfd09,0xfd34,0xfd82,0xfdc8,0xfe06,0xfe22};//對應每個單調的計數初值
- uchar code keymode[8]={0xfe,0xfd,0xfb,0xf7,0xef,0xdf,0xbf,0x7f};//按鍵值，對應io:0,1,2,3,4,5,6,7
- /************************************
- *********按鍵掃描函數***************/
- void anjian()//用整個P2口作為音調的輸入按鍵（獨立按鍵方式）
- {
-
- P2=0xff;//讀數據先置1
- if(P2==~keymode[0]) //1
- {
- z=tone[0];
- P1=keymode[0];
- }
- /**/
- if(P2==~keymode[1]) //2
- {
- z=tone[1];
- P1=keymode[1];
- }
- /**/
- if(P2==~keymode[2]) //3
- {
- z=tone[2];
- P1=keymode[2];
- }
- /**/
- if(P2==~keymode[3]) //4
- {
- z=tone[3];
- P1=keymode[3];
- }
- /**/
- if(P2==~keymode[4]) //5
- {
- z=tone[4];
- P1=keymode[4];
- }
- /**/
- if(P2==~keymode[5]) //6
- {
- z=tone[5];
- P1=keymode[5];
- }
- /***/
- if(P2==~keymode[6]) //7
- {
- z=tone[6];
- P1=keymode[6];
- }
- /* */
- if(P2==~keymode[7]) //1.
- {
- z=tone[7];
- P1=keymode[7];
- }
- }
- /************************************/
- void zdkg()
- {
- if(P2==0xff)
- {
- P1=0xff;
- TR1=0;//如果沒有按鍵按下，就關閉定時器中斷
- fmq=1;//同時也關閉蜂鳴器
- }
- else //否則就進入中斷
- {
- TR1=1;
- }
- }
- /*************************************************
- ****************主函數****************************
- *************************************************/
- void main()
- {
- EA=1;//開總中斷
- ET1=1;//定時器T1中斷允許
- TMOD=0x10;//使用定時器T1的模式1
- TH1=(65536-500)/256;//定時器T1的高8位重新賦初值
- TL1=(65536-500)%256;//定時器T1的低8位重新賦初值
- P1=0xff;//先關所有LED燈
- while(1)
- {
-
- anjian();//按鍵掃描函數
- zdkg();
-
- }
- }
- /*定時器T1的中斷服務程序*/
- void Time1(void) interrupt 3 using 1//
- { fmq=~fmq; //每進入一次中斷就取反一次，快速的進入退出中斷，就會聽到蜂鳴器發出的音調
- TH1=z/256;//定時器T1的高8位重新賦初值
- TL1=z%256;//定時器T1的低8位重新賦初值
- }
-
所有資料51hei提供下載:
8弦激光豎琴.zip
(157.65 KB, 下載次數: 193)
2018-5-20 14:36 上傳
點擊文件名下載附件
下載積分: 黑幣 -5
|
[復制鏈接]
QQ好友和群
QQ空間
騰訊微博
騰訊朋友
收藏
淘帖
頂
踩
