資源簡介
8音符電子琴,用8音符的頻率進行的設計,有源程序和硬件電路圖,還可在此基礎上進行擴展。

代碼片段和文件信息
#include?
#include?
#define?uchar?unsigned?char
#define?uint?unsigned?int
sbit?P3_0=P3^0;
uchar?code?bzqh[]={0x000xfe0xfe0xfe0xfe0xfe0xfe0xff0xff};
uchar?data?bzql[]={0x000x220x560x850x9a0x310xe30x030x10};
uchar?yes=0x00;
uchar?KeyNO=0;
void?DelayMS(uint?ms)
{
? uchar?t;
while(ms--)
{
? for(t=0;t<120;t++);
}
}
void?cj()
{
P1=0x0f;
if(P1!=0x0f)
{
DelayMS(10);
if(P1!=0x0f)
{
yes=0x01;
}
}
}
void?fxj_f_bzq()
{ uchar?Tmp;
Tmp=0x00;
P1=0x0f;
?
Tmp?=?P1?^?0x0f;
DelayMS(1);
switch(Tmp)
{
? case?1:?KeyNO?=1;?break;
case?2:?KeyNO?=2;?break;
case?4:?KeyNO?=3;?break;
case?8:?KeyNO?=4;?break;
default:?KeyNO?=0;
}
P1?=?0xf0;
Tmp=0x00;
Tmp?=?((P1?>>?4)?^?0x0f);
switch(Tmp)
{
? case?1:?KeyNO=(KeyNO?+0x00);?break;
case?2:?KeyNO=(KeyNO?+0x04);?break;
default:?KeyNO?=0;
}
}
void?bf()
{
uchar?iii;
TH0=bzqh[KeyNO];
TL0=bzql[KeyNO];
for(ii=0;ii<200;ii++)
{ for(i=0;i<2;i++)
{
TR0=1;
while(TF0==0)
{}
??? TR0=0;
??? TF0=0;
P3_0=~P3_0;
TH0=bzqh[KeyNO];
TL0=bzql[KeyNO];
}
}
???TR0=0;
???TF0=0;
???P3_0=0;
???DelayMS(1);
???TH0=bzqh[0];
TL0=bzql[0];
}
void?main()
{??
P1=0x0f;
P3_0=1;
TMOD=0x01;
TH0=bzqh[0];
TL0=bzql[0];
while(1)
{
? cj();
if(yes==0x01)
{?
yes=0x00;
fxj_f_bzq();
bf();
}
P1=0x0f;
}
}
?屬性????????????大小?????日期????時間???名稱
-----------?---------??----------?-----??----
?????文件???????4604??2014-05-23?23:10??8音符電子琴\源程序\dzq
?????文件???????1431??2014-05-23?23:08??8音符電子琴\源程序\dzq.c
?????文件???????1316??2014-05-23?23:10??8音符電子琴\源程序\dzq.hex
?????文件?????????23??2014-05-23?23:10??8音符電子琴\源程序\dzq.lnp
?????文件???????4413??2014-05-23?23:10??8音符電子琴\源程序\dzq.LST
?????文件???????7333??2014-05-23?23:10??8音符電子琴\源程序\dzq.M51
?????文件???????5112??2014-05-23?23:10??8音符電子琴\源程序\dzq.OBJ
?????文件???????2002??2014-05-23?23:10??8音符電子琴\源程序\dzq.plg
?????文件??????55181??2014-05-23?23:10??8音符電子琴\源程序\dzq.uvopt
?????文件??????13216??2014-05-18?17:56??8音符電子琴\源程序\dzq.uvproj
?????文件??????55181??2014-05-23?17:33??8音符電子琴\源程序\dzq_uvopt.bak
?????文件??????????0??2014-05-18?12:29??8音符電子琴\源程序\dzq_uvproj.bak
?????文件??????81441??2014-05-20?20:59??8音符電子琴\硬件電路\Last?Loaded?sdff.DBK
?????文件??????81441??2014-05-20?20:59??8音符電子琴\硬件電路\sdff.DSN
?????文件????????768??2015-03-17?14:34??8音符電子琴\硬件電路\sdff.PWI
?????目錄??????????0??2015-03-22?20:23??8音符電子琴\源程序
?????目錄??????????0??2015-03-22?20:23??8音符電子琴\硬件電路
?????目錄??????????0??2015-03-22?20:24??8音符電子琴
-----------?---------??----------?-----??----
???????????????313462????????????????????18
評論
共有 條評論