【proteus练一练2.28】演奏音阶

proteus

/*  名称：演奏音阶
  说明：本例使用定时器演奏一段音
阶，播放由 K1 控制。
*/
#include
#define uchar unsigned char
#define uint unsigned int
***it K1=P1^0;
***it SPK=P3^4;
uint i=0; //音符索引
//14 个音符放在方式 2 下的定时寄存器
（TH0,TL0）
uchar code HI_LIST[]={0,226,229,232,233,236,238,240,241,242,244,245,246,247,248};
uchar code LO_LIST[]={0,4,13,10,20,3,8,6,2,23,5,26,1,4,3};
//定时器0 中断函数
void T0_INT() interrupt 1
{
TL0=LO_LIST;
TH0=HI_LIST;
SPK=~SPK;
}
//延时
void DelayMS(uint ms)
{
uchar t;
while(ms--) for(t=0;t<120;t++);
}
//主程序
void main()
{
TMOD=0x00; //T0 方式 0
IE=0x82;
SPK=0;
while(1)
{
  while(K1==1);  //未按键等待
  while(K1==0);  //等待释放
  for(i=1;i<15;i++)
  {
TR0=1; //播放一个音符 DelayMS(500); //播放延时 TR0=0; DelayMS(50); }  } } proteus 仿真图：

游客
，如果您要查看本帖隐藏内容请回复