#include

unsigned char tone;

unsigned char op;

sbit led=P1^1;

sbit spk=P1^0;

sbit key1=P3^2;       //两只老虎演奏按键

sbit key2=P3^3;       //1~i演奏按键

unsigned char code shuma[]={0xC0,0xF9,0xA4,0xB0,0x99,0x92,0x82,0xF8,0x80,0x90};

//用于使定时器初值变化以产生相应频率的定时

unsigned char code yinfu_H[]=

{0xfb,0xfc,0xfc,0xfc,0xfd,0xfd,0xfd,0xfd,0x00};

unsigned char code yinfu_L[]=

{0xe9,0x5c,0xc1,0xef,0x45,0x92,0xd0,0xee,0x00};

void delay(unsigned int N)

{

unsigned int j=N;

while(j--)

{

unsigned char i;

for(i=0;i<250;i++);

}

}

unsigned  char code laohu[]=

{1,2,3,1,1,2,3,1,3,4,5,3,4,5,5,6,5,4,3,1,5,6,5,4,3,1,3,1,1,3

,1,1};//两只老虎乐谱

unsigned  char code  laohuys[]=

{220,220,220,220,220,220,220,220,220,220,235,220,220,210,150

,150,

170,170,200,200,150,150,170,170,200,200,244,240,250,244,220,

250};

//定时器初始化

void initTimer(void)

{

TMOD=0x01;

TH0=yinfu_H[tone];

TL0=yinfu_L[tone];

}

//定时器T0中断服务程序

void timer0(void) interrupt 1

{

TH0=yinfu_H[tone];

TL0=yinfu_L[tone];

spk=~spk;        //

}

void laohu_yz()//两只老虎 演奏程序

{

unsigned char i;

for(i=0;i<32;i++)

{

led=1;

tone=laohu[i]-1;

delay(laohuys[i]/1.2);

led=0;    //每个音符闪烁一次

delay(laohuys[i]/1.5);

}

}

void yuep_yz()//1~i音符演奏程序

{

unsigned char i;

for(i=0;i<16;i++)

{

led=1;

if(i<8)

{

tone=i;

}

else

{

tone=15-i;

}

delay(220);

led=0;

delay(180);

}

}

void jianpan()

{

op=P2;

switch(op)

{

case 0xfe:led=0;tone=0;P0=shuma[1];TR0=1;break;

case 0xfd:led=0;tone=1;P0=shuma[2];TR0=1;break;

case 0xfb:led=0;tone=2;P0=shuma[3];TR0=1;break;

case 0xf7:led=0;tone=3;P0=shuma[4];TR0=1;break;

case 0xef:led=0;tone=4;P0=shuma[5];TR0=1;break;

case 0xdf:led=0;tone=5;P0=shuma[6];TR0=1;break;

case 0xbf:led=0;tone=6;P0=shuma[7];TR0=1;break;

case 0x7f:led=0;tone=7;P0=shuma[8];TR0=1;break;

default:break;

}

delay(4);

TR0=0;

led=1;

P0=0xff;

}

//主程序

void main(void)

{

initTimer();

ET0=1;

EA=1;

spk=0;

while(1)

{

if(key1==0)//判断K1键是否按下

{

delay(10);

if(key1==0)

{

TR0=1;

laohu_yz();

spk=0;

}

}

else if(key2==0)//判断K2键是否按下

{

delay(10);

if(key2==0)

{

TR0=1;

yuep_yz();

spk=0;

}

}

jianpan();//键盘检测

}

}