單片機(jī)C語言電子琴

1、?單音#include <reg51. h> sbit beep 二 Pl"0;Sdefine soundT 65058 void tOinit ()TMODX 0x01;THO二 soundT/256;TL0=soundT%256;EA 二 1;ETO二 1;TRO 二 1;void tOserv() interrupt 1THO二 soundT/256;TL0=soundT%256;beep"beep;void main()tOinitO ;while(1);二?八個音#include <reg5l ? h>#define uint unsign

2、ed int#define uchar unsigned charuint codettable = 64580, 64684, 64777, 64820, 6489& 6496& 65030, 65058; uint soundT;sbit beep 二 FlOsbit keyl 二 P2P;sbit key2 二 P2l;sbit key3 二 P2"2;sbit key4 二 P23;sbit key5 二 P2"4;sbit key6=P2*'5;sbit key7 二 P2"6;sbit key8 二 P2"7;void

3、 delay(uint x)uint i, j;for (i=x;i>0;i-)for(j=U0;j>0;j-); void tOinit ()TMOM 0x01;THC二 soundT/256;TL0=soundT%256;EA 二 1;TRO=1;void tOserv() interrupt 1THO二 soundT/256;TL0=soundT%256;beep 二'beep;void keytest ()辻(P2!=0xff)辻(keyl=0)delay (5);辻(keyl -0) soundT=ttable0;if(key2=0)delay (5);辻(key

4、2=0) soundT=ttablel;if (key3=0)delay (5);辻(key3=0) soundT=ttable 2;if(key4=0)delay (5);辻(key4=0) soundT=ttable 3;if(key5=0) delay (5);辻 (key5=0) soundT=ttable4;if(key6=0)delay(5);i.f (key6=0) soundT=ttable5:if(key7=0)delay (5);辻 (key7=0) soundT=ttable6;if(key8=0)辻 (key80) soundT=ttable 7;TRO=1;else

5、TRO 二 0;void main()tOinitO ;while(1) keytest ();三. 播放音樂#include <reg51 ? h>#define uchar unsigned char#define uint unsigned intsbit beep 二 Pl/0;uint soundT, yjsj;uint code ttable = 0, 64580, 64684, 64777, 64820, 6489& 6496& 65030;uchar code mtable = 0xl2, 0x22, 0x32, 0x12,0x12,0x22, 0x

6、32, 0x12, 0x32,0x42,0x54, 0x32, 0x42, 0x54,0x51, 0x61, 0x51, 0x41, 0x32,0x12, 0x51, 0x61, 0x51, 0x41,0x32,0x12, 0;uchar mnum, temp, yj;void delay(uint x)uint i, j;for(i=x;i>0;i-)for(j=U0;j>0;j);void tOinit ()TH0=soundT/256;TL0=soundT%256;EA=1;ETO=1;TRO二 1;void tOserv() interrupt 1TH0=soundT/25

7、6;TL0=soundT%256;beep 二'beep;void main()tOinit ();TRO二 1;temp=mtablemnum;yj=temp>>4;yjsj= (temp&OxOf) *200;soundT 二 ttableyj;delay (yjsj);mnum+;TRO二 0;while(1);四?簡易電子琴#include <reg51 ? h>#define uint unsigned int#define uchar unsigned char uchar code table = 0x3f, 0x06, 0x5b, 0x4

8、f, 0x66, 0x6d, 0x7d, 0x07, 0x7f, 0x6f, 0x77, 0x7c, 0x39, Oxoe, 0x79, 0x71, 0 xOO);uint code ttable = 64400, 64524,64580,64684,64777, 64820, 64898, 64968, 65030,6505& 65110,65157, 6517& 65217, 65252, 65283; void keytest ();sbit beep 二 P20;uchar keynum=16, temp, jia, yj;uint soundT;void keytes

9、t ()Pl 二 OxOf; temp 二 Pl; temp=temp OxfO;Pl 二 temp; temp 二 Pl; switch(temp) case Oxee: keynum=0; break;case Oxed: keynum=l; break;case Oxeb: keynum=2;break;case 0xe7: keynum=3;break;case Oxde: keynum=4;break;case Oxdd: keynum=5;break;case Oxdb: keynum=6;break;case 0xd7: keynum=7;break;case Oxbe: key

10、num=8;break;case Oxbd: keynum=9;break;case Oxbb: keynum 二10; break;case 0xb7: keynum=ll;break;case 0x7e: keynum=12;break;case Ox7d: keynum=13;break;case 0x7b: keynum=14;break;case 0x77: keynum=15;break;default: break;void intinit()TMODX 0x21;THO二 soundT/256;TL0=soundT%256;TH1=253;TL1=253;TR1=1;PC0N=0x00;二 0x50;EA=1;ES=1;ETO=1;TRO=O;void tOserv() interrupt 1TH0=soundT/256;TL0=soundT%256; beep 二 'beep ； void spserO interrupt 4 if(RI=l) RI=0;temp=SBUF;SBUF=temp;if (temp 二二 '+')jia+;辻 (jia>=5) jia=5; if (temp 二二 ' 一 ')jia ;jia>=6) jia=O;辻(jiav=O)