Current location - Music Encyclopedia - NetEase Cloud Music - Ask 5 1 single chip microcomputer to play the program "the most dazzling national style" with a buzzer!
Ask 5 1 single chip microcomputer to play the program "the most dazzling national style" with a buzzer!
# include & ltreg 5 1 . h & gt；

sbit speaker=p 1^2；

Unsigned character timer 0h, timer 0l, time;

//Song soundtrack

code unsigned char sszymmh[]={6， 1，4，6， 1，2，5， 1，2，6， 1，4，6， 1，2，2，2， 1，2，4，2，2，2，2，

1,2,2,6, 1,8, 1,2,4, 1,2,2,5, 1,2, 1,2,2,2,2,2,3,2,2,

5,2,2,5,2,2,3,2,2,2,2,4,3,2,8,6,2,2,6,2,2,6,2,2,

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

2,2,8,3,2,2,3,2,2,5,2,2,3,2,2,2,2,2,3,2,2,2,2,2,

1,2,2,6, 1,4,5, 1,4,6, 1,8,

6, 1,4,6, 1,2,5, 1,2,6, 1,4,6, 1,2, 1,2,2, 1,2,4,2,2,2,

1,2,2,6, 1,8, 1,2,4, 1,2,2,5, 1,2, 1,2,2,2,2,2,3,2,2,

5,2,2,5,2,2,3,2,2,2,2,4,3,2,8,6,2,2,6,2,2,6,2,2,

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

2,2,8,3,2,2,3,2,2,5,2,2,3,2,2,2,2,2,3,2,2,2,2,2,

1,2,2,6, 1,4,5, 1,4,6, 1,8,

//We are going to sing.

3,2,2,3,2,2,5,2,2,3,2,2,3,2,2,5,2,2,5,2,2,6,2,2,

1,3,2,6,2,2,5,2,4,6,2,8,

//You are the most beautiful cloud on my horizon.

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

1,2,2,3,2,8,6, 1,2,6,2,2,6,2,2,5,2,2,2,2,2,3,2, 1,

2,2, 1, 1,2,2,2,2,2,3,2,8, 1,2,2,6, 1,2,6, 1,2, 1,2,2,

2,2,4,5, 1,2,5, 1,2,3,2,2,5,2,2,3,2,2,2,2,2, 1,2,8,

6, 1,2, 1,2,2,2,2,2,3,2,2,2,2,2, 1,2,2,5, 1,2,3, 1,2,

6, 1,8,

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

1,2,2,3,2,8,6, 1,2,6,2,2,6,2,2,5,2,2,2,2,2,3,2, 1,

2,2, 1, 1,2,2,2,2,2,3,2,8, 1,2,2,6, 1,2,6, 1,2, 1,2,2,

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

1,2,2,6, 1,2, 1,2,2,2,2,2,3,2,2,5,2,2,3,2,2,3,2,2,

5,2,2,6,2,8,6,2,8,

6,2,3,6,2, 1,6,2,2,6,2,2,6,2,3,5,2, 1,3,2,2,2,2,2,

2,2,3,2,2, 1,3,2,3,2,2, 1, 1,2,3,6, 1, 1,6, 1,4,6, 1,2,

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

1,2,2,2,2,2,3,2,8,6,2,2,5,2,2,3,2,2,2,2,2,5,2,2,

3,2,2,2,2,2, 1,2,2, 1,2,8,

6, 1,4,6, 1,2,5, 1,2,6, 1,4,6, 1,2, 1,2,2, 1,2,4,2,2,2,

1,2,2,6, 1,8, 1,2,4, 1,2,2,5, 1,2, 1,2,2,2,2,2,3,2,2,

5,2,2,5,2,2,3,2,2,2,2,4,3,2,8,6,2,2,6,2,2,6,2,2,

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

2,2,8,3,2,2,3,2,2,5,2,2,3,2,2,2,2,2,3,2,2,2,2,2,

1,2,2,6, 1,4,5, 1,4,6, 1,8,

6, 1,4,6, 1,2,5, 1,2,6, 1,4,6, 1,2, 1,2,2, 1,2,4,2,2,2,

1,2,2,6, 1,8, 1,2,4, 1,2,2,5, 1,2, 1,2,2,2,2,2,3,2,2,

5,2,2,5,2,2,3,2,2,2,2,4,3,2,8,6,2,2,6,2,2,6,2,2,

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

2,2,8,3,2,2,3,2,2,5,2,2,3,2,2,2,2,2,3,2,2,2,2,2,

1,2,2,6, 1,4,5, 1,4,6, 1,8,

3,2,2,3,2,2,5,2,2,3,2,2,3,2,2,5,2,2,5,2,2,6,2,2,

1,3,2,6,2,2,5,2,4,6,2,8,

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

1,2,2,3,2,8,6, 1,2,6,2,2,6,2,2,5,2,2,2,2,2,3,2, 1,

2,2, 1, 1,2,2,2,2,2,3,2,8, 1,2,2,6, 1,2,6, 1,2, 1,2,2,

2,2,4,5, 1,2,5, 1,2,3,2,2,5,2,2,3,2,2,2,2,2, 1,2,8,

6, 1,2, 1,2,2,2,2,2,3,2,2,2,2,2, 1,2,2,5, 1,2,3, 1,2,

6, 1,8,

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

1,2,2,3,2,8,6, 1,2,6,2,2,6,2,2,5,2,2,2,2,2,3,2, 1,

2,2, 1, 1,2,2,2,2,2,3,2,8, 1,2,2,6, 1,2,6, 1,2, 1,2,2,

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

1,2,2,6, 1,2, 1,2,2,2,2,2,3,2,2,5,2,2,3,2,2,3,2,2,

5,2,2,6,2,8,6,2,8,

6,2,3,6,2, 1,6,2,2,6,2,2,6,2,3,5,2, 1,3,2,2,2,2,2,

2,2,3,2,2, 1,3,2,3,2,2, 1, 1,2,3,6, 1, 1,6, 1,4,6, 1,2,

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

1,2,2,2,2,2,3,2,8,6,2,2,5,2,2,3,2,2,2,2,2,5,2,2,

3,2,2,2,2,2, 1,2,2, 1,2,8,

//You are the most beautiful cloud on my horizon.

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

1,2,2,3,2,8,6, 1,2,6,2,2,6,2,2,5,2,2,2,2,2,3,2, 1,

2,2, 1, 1,2,2,2,2,2,3,2,8, 1,2,2,6, 1,2,6, 1,2, 1,2,2,

2,2,4,5, 1,2,5, 1,2,3,2,2,5,2,2,3,2,2,2,2,2, 1,2,8,

6, 1,2, 1,2,2,2,2,2,3,2,2,2,2,2, 1,2,2,5, 1,2,3, 1,2,

6, 1,8,

6,2,8,6,2,8,0,0,8,3,2,2,5,2,2,3,2,2,5,2,2,

3,2,4,6, 1,3,6, 1, 1, 1,2,4,6, 1,2,3,2, 1,6, 1, 1, 1,2,3,

1,2, 1,2,2, 1, 1,2, 1,2,2, 1,3,2,8,3,2,4,6,2,3,6,2, 1,

5,2,4,2,2,3,2,2, 1,3,2,8,3,2, 1,2,2, 1, 1,2, 1,6, 1, 1,

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

5, 1,3,5, 1, 1,3, 1,4,5, 1,3,5, 1, 1, 1,2,8,6, 1,4, 1,2,3,

6, 1, 1,3,2,3,3,2, 1,2,2,3,3,2, 1,6,2,8,6,2,8,

//You are the most beautiful cloud on my horizon.

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

1,2,2,3,2,8,6, 1,2,6,2,2,6,2,2,5,2,2,2,2,2,3,2, 1,

2,2, 1, 1,2,2,2,2,2,3,2,8, 1,2,2,6, 1,2,6, 1,2, 1,2,2,

2,2,4,5, 1,2,5, 1,2,3,2,2,5,2,2,3,2,2,2,2,2, 1,2,8,

6, 1,2, 1,2,2,2,2,2,3,2,2,2,2,2, 1,2,2,5, 1,2,3, 1,2,

6, 1,8};

//The scale frequency table is eight digits high.

code unsigned char FREQH[]={

0xF2，0xF3，0xF5，0xF5，0xF6，0xF7，0xF8，

0xF9，0xF9，0xFA，0xFA，0xFB，0xFB，0xFC，0xFC，// 1，2，3，4，5，6，7，8，I

0xFC、0xFD、0xFD、0xFD、0xFD、0xFE、

0xFE，0xFE，0xFE，0xFE，0xFE，0xFE，0x Fe，0xFF，

} ;

//Low-eight scale frequency table

code unsigned char FREQL[]={

0x42，0xC 1，0x 17，0xB6，0xD0，0xD 1，0xB6，

0x2 1，0xE 1，0x8C，0xD8，0x68，0xE9，0x5B，0x8F，// 1，2，3，4，5，6，7，8，I

0xEE，0x44，0x6B，0xB4，0xF4，0x2D，

0x47，0x77，0xA2，0xB6，0xDA，0xFA，0x 16，

};

Invalid delay (unsigned character t)

{

Unsigned character t1;

Unsigned length t2;

for(t 1 = 0； t 1 & lt； t； t 1++)

{

for(T2 = 0； t2 & lt2000; t2++)

{

;

}

}

TR0 = 0；

}

Void t0int () interrupt 1

{

TR0 = 0；

Speaker =! Loudspeaker;

TH0 = timer 0h;

TL0 = Timer TL0

TR0 = 1；

}

Invalid song ()

{

TH0 = timer 0h;

TL0 = Timer TL0

TR0 = 1；

Delay (time);

}

Invalid master (invalid)

{

Unsigned character k;

Unsigned int I；;

TMOD = 1； //Set CT0 timing mode to 1.

EA = 1；

ET0 = 1； //IE=0x82 //CPU interrupt, CT0 interrupt.

while( 1)

{

I = 0；

While (I< 1577){ // music array length, start again after singing.

k = sszymmh[I]+7 * sszymmh[I+ 1]- 1；

timer 0h = FREQH[k]；

timer 0 l = FREQL[k]；

time = sszymmh[I+2]；

I = I+3；

Song ();

}

}

}

For your reference

Related articles
  • Which folder is the background music for lol qualifying matches in?
  • Ethnic folk music of Asian countries and regions
  • What is the difference between kbs and mama?
  • How do you understand the articles "裊苢" and "Planting Yangge"?
  • 2021-2022 Shenzhen Shajing Golden Oyster Festival time, location and event details
  • Can I only use ITUNES songs on my ipod?
  • Introduction to Foshan New Sunshine Hotel
  • Which song is more suitable for aunties to dance to?
  • Dungeons and Warriors Opening Music
  • "Holding Hands" Lesson Plan

    • copyright 2024 Music Encyclopedia All rights reserved