/**********************************************
名稱：電子琴演奏程序
作者：hs795
功能：按下按鍵蜂鳴器發出相應的音符，可以進行演奏！
p20接的按鍵用于播放示例音樂，p21用于停止當前播放音樂
?????????????????????????????????2011年4月16日
**********************************************/
#include
#define?unchar?unsigned?char
#define?unint?unsigned?int
sbit?beep=P3^1;//蜂鳴器接口
sbit?p30=P3^0;?//演示歌曲用
sbit?p31=P3^2;?//停止鍵
sbit?pk1=P3^3;?
sbit?pk2=P3^4;?
sbit?pk3=P3^5;?
//數碼管段碼表
unchar?code?LED[]={0xc00xf90xa40xb00x990x920x820xf80x800x900xff};//{0x3F0x060x5B0x4F0x660x6D0x7D0x070x7F0x6F0x00}
//以下定義低中高共21個音階的定時參數通過定時器來實現不同音頻的輸出
unint?code?ti[21][2]={
	{0xf80x8c}{0xf90x5c}{0xfa0x14}{0xfa0x67}{0xfb0x04}{0xfb0x90}{0xfc0x0c}??//低音
	{0xfc0x44}{0xfc0xb6}{0xfd0x09}{0xfd0x34}{0xfd0x82}{0xfd0xc8}{0xfe0x06}??//中音
	{0xfe0x22}{0xfe0x56}{0xfe0x8c}{0xfe0x9a}{0xfe0xc1}{0xfe0xe4}{0xff0x03}};?//高音
//簡譜由音階x[]和節拍y[]兩部分組成
//節拍為每個音階的輸出時間
//下列出現“+7”是為了得到中音
//**《兩只老虎》
unchar?code??x0[]={1+72+73+71+71+72+73+71+73+74+75+73+74+75+75+76+75+74+73+71+75+76+75+74+73+71+71+751+71+751+7};
unchar?code??y0[]={44444444448448313144313144448448};
//**《粉刷匠》
unchar?code??x1[]={5+73+75+73+75+73+71+72+74+73+72+75+75+73+75+73+75+73+71+72+74+73+72+71+72+7
					2+74+74+73+71+75+72+74+73+72+75+75+73+75+73+75+73+71+72+74+73+72+71+7};
unchar?code??y1[]={4444448444416444444844441644444484444164444448444416};
//**《祝你生日快樂》
unchar?code??x2[]={55651+7755652+71+7555+73+71+7764+74+73+71+72+71+7};
unchar?code??y2[]={8888816888881688888888888816};
//**《最幸福的人》
unchar?code??x3[]={3+75+76+76+76+76+76+73+143+142+142+143+142+147+77+76+75+75+76+77+71+146+76+75+76+72+142+142+141+142+142+143+141+147+76+7
				???5+75+75+76+77+77+77+71+142+142+141+147+76+7};
unchar?code??y3[]={224224222222842222222222822228222282222222222224};
//**《天邊的眷戀》
unchar?code?x5[]=?{3+73+72+73+73+701+72+71+77660066+76+75+75+75+72+72+71+72+7
					3+7003+73+76+76+75+75+75+702+72+75+73+72+71+70671+701+71+72+73+7770};
unchar?code?y5[]={2211821121144442221122222642
					22221142222211211822223184};
//**《心肝寶貝》
unchar?code?x6[]={3+73+73+72+73+72+71+71+71+73561+71+761+75+73+73+70

					6+76+76+75+76+73+75+75+75+73+75+73+72+72+71+761+73+7

					2+73+72+72+73+73+73+72+73+72+71+71+71+73561+71+761+7
					5+73+73+706+76+76+75+76+73+75+75+75+73+75+73+72+72+7
					1+761+76+75+73+75+75+75+75+76+75+73+72+72+72+72+72+7
					3+72+71+761+71+71+7033665561+71+71+71+7665+75+7
					5+76+75+73+73+72+72+

?屬性????????????大小?????日期????時間???名稱
-----------?---------??----------?-----??----

????.CA....??????7087??2011-04-27?00:40??單片機實現電子琴\單片機實現電子琴.c

????.CA....????171448??2011-07-13?15:03??單片機實現電子琴\單片機實現電子琴.DSN

????.CA....???????768??2011-10-08?21:17??單片機實現電子琴\單片機實現電子琴.PWI

????.CA....??????5897??2011-04-27?00:40??單片機實現電子琴\電子琴.hex

????.CA....?????13269??2011-04-19?14:21??單片機實現電子琴\電子琴.uvproj

????.C.D...?????????0??2012-02-25?23:14??單片機實現電子琴

-----------?---------??----------?-----??----

???????????????198469????????????????????6