51单片机中级实验例程：DS1302时钟LCD1602显示（可以按键设置时钟），LCD1602显示红外值，蜂鸣器音乐之八月桂花，门铃设计，音乐播放器 具体如下：DS1302时钟LCD1602显示（可以按键设置时钟）LCD1602滚动显示LCD1602显示红外值LCD1602显示矩阵按键键值LCD显示温度 串口接收温度LED流水 定时器秒表门铃设计音乐播放器按键控制数码管按键控制蜂鸣器蜂鸣器音乐之八月桂花定时器秒表（查询方式）矩阵按键数码管移位显示
void Play(unsigned char *Sound,unsigned char Signature,unsigned Octachord,unsigned int Speed)
{
unsigned int NewFreTab[12]; //新的频率表
unsigned char i,j;
unsigned int Point,LDiv,LDiv0,LDiv1,LDiv2,LDiv4,CurrentFre,Temp_T,SoundLength;
unsigned char Tone,Length,SL,SH,SM,SLen,XG,FD;
for(i=0;i<12;i ) // 根据调号及升降八度来生成新的频率表
{
j = i Signature;
if(j > 11)
{
j = j-12;
NewFreTab[i] = FreTab[j]*2;
}
else
NewFreTab[i] = FreTab[j];
if(Octachord == 1)
NewFreTab[i]>>=2;
else if(Octachord == 3)
NewFreTab[i]<<=2;
}
SoundLength = 0;
while(Sound[SoundLength] != 0x00) //计算歌曲长度
{
SoundLength =2;
}
Point = 0;
Tone = Sound[Point];
Length = Sound[Point 1]; // 读出第一个音符和它时时值
LDiv0 = 12000/Speed; // 算出1分音符的长度(几个10ms)
LDiv4 = LDiv0/4; // 算出4分音符的长度
LDiv4 = LDiv4-LDiv4*SOUND_SPACE; // 普通音最长间隔标准
TR0 = 0;
TR1 = 1;
while(Point < SoundLength)
{
SL=Tone%10; //计算出音符
SM=Tone/10%10; //计算出高低音
SH=Tone/100; //计算出是否升半
CurrentFre = NewFreTab[SignTab[SL-1] SH]; //查出对应音符的频率
if(SL!=0)
{
if (SM==1) CurrentFre >>= 2; //低音
if (SM==3) CurrentFre <<= 2; //高音
Temp_T = 65536-(50000/CurrentFre)*10/(12000000/SYSTEM_OSC);//计算计数器初值
Sound_Temp_TH0 = Temp_T/256;
Sound_Temp_TL0 = Temp_T%256;
TH0 = Sound_Temp_TH0;
TL0 = Sound_Temp_TL0 12; //加12是对中断延时的补偿
}
SLen=LengthTab[Length%10]; //算出是几分音符
XG=Length/10%10; //算出音符类型(0普通1连音2顿音)
FD=Length/100;
LDiv=LDiv0/SLen; //算出连音音符演奏的长度(多少个10ms)
if (FD==1)
LDiv=LDiv LDiv/2;
if(XG!=1)
if(XG==0) //算出普通音符的演奏长度
if (SLen<=4)
LDiv1=LDiv-LDiv4;
else
LDiv1=LDiv*SOUND_SPACE;
else
LDiv1=LDiv/2; //算出顿音的演奏长度
else
LDiv1=LDiv;
if(SL==0) LDiv1=0;
LDiv2=LDiv-LDiv1; //算出不发音的长度
if (SL!=0)
{
TR0=1;
for(i=LDiv1;i>0;i--) //发规定长度的音
{
while(TF1==0);
TH1 = Sound_Temp_TH1;
TL1 = Sound_Temp_TL1;
TF1=0;
}
}
if(LDiv2!=0)
{
TR0=0; BeepIO=0;
for(i=LDiv2;i>0;i--) //音符间的间隔
{
while(TF1==0);
TH1 = Sound_Temp_TH1;
TL1 = Sound_Temp_TL1;
TF1=0;
}
}
Point =2;
Tone=Sound[Point];
Length=Sound[Point 1];
}
BeepIO = 0;
}【文件目录】51单片机中级实验例程├── DS1302时钟LCD1602显示（可以按键设置时钟）
│ ├── 程序
│ │ ├── STARTUP.A51
│ │ ├── ds1302.c
│ │ ├── ds1302.h
│ │ ├── lcd.c
│ │ ├── lcd.h
│ │ ├── main.c
│ │ ├── pro
│ │ ├── pro.M51
│ │ ├── pro.hex
│ │ ├── pro.uvgui.Administrator
│ │ ├── pro.uvopt
│ │ └── pro.uvproj
│ └── 接线图.jpg
├── LCD1602滚动显示
│ ├── 程序
│ │ ├── 滚动显示
│ │ ├── 滚动显示.M51
│ │ ├── 滚动显示.c
│ │ ├── 滚动显示.hex
│ │ ├── 滚动显示.uvgui.Administrator
│ │ ├── 滚动显示.uvopt
│ │ └── 滚动显示.uvproj
│ └── 接线图.jpg
├── LCD1602显示红外值
│ ├── 程序
│ │ ├── STARTUP.A51
│ │ ├── lcd.c
│ │ ├── lcd.h
│ │ ├── main.c
│ │ ├── pro
│ │ ├── pro.M51
│ │ ├── pro.hex
│ │ ├── pro.uvopt
│ │ └── pro.uvproj
│ └── 接线图.jpg
├── LCD1602显示矩阵按键键值
│ ├── 程序
│ │ ├── STARTUP.A51
│ │ ├── lcd.c
│ │ ├── lcd.h
│ │ ├── main.c
│ │ ├── pro
│ │ ├── pro.M51
│ │ ├── pro.hex
│ │ ├── pro.uvgui.Administrator
│ │ ├── pro.uvopt
│ │ └── pro.uvproj
│ └── 接线图.jpg
├── LCD显示温度 串口接收温度
│ ├── LCD1602显示温度接线图.jpg
│ ├── 程序
│ │ ├── STARTUP.A51
│ │ ├── lcd.c
│ │ ├── lcd.h
│ │ ├── main.c
│ │ ├── pro
│ │ ├── pro.M51
│ │ ├── pro.hex
│ │ ├── pro.uvopt
│ │ ├── pro.uvproj
│ │ ├── temp.c
│ │ └── temp.h
│ └── 串口设置图.jpg
├── LED流水 定时器
│ ├── 程序
│ │ ├── LED
│ │ ├── LED.M51
│ │ ├── LED.hex
│ │ ├── LED.uvgui.Administrator
│ │ ├── LED.uvopt
│ │ ├── LED.uvproj
│ │ └── main.c
│ └── 接线图.jpg
├── 秒表
│ ├── 程序
│ │ ├── main.c
│ │ ├── template
│ │ ├── template.M51
│ │ ├── template.hex
│ │ ├── template.uvgui.Administrator
│ │ ├── template.uvopt
│ │ └── template.uvproj
│ └── 接线图.jpg
├── 门铃设计
│ ├── 程序
│ │ ├── 定时器设计的门铃
│ │ ├── 定时器设计的门铃.M51
│ │ ├── 定时器设计的门铃.c
│ │ ├── 定时器设计的门铃.hex
│ │ ├── 定时器设计的门铃.uvgui.Administrator
│ │ ├── 定时器设计的门铃.uvopt
│ │ └── 定时器设计的门铃.uvproj
│ └── 接线图.jpg
├── 音乐播放器
│ ├── 程序
│ │ ├── SoundPlay.h
│ │ ├── main.c
│ │ ├── music.h
│ │ ├── template
│ │ ├── template.M51
│ │ ├── template.hex
│ │ ├── template.uvgui.Administrator
│ │ ├── template.uvopt
│ │ └── template.uvproj
│ └── 接线图.jpg
├── 按键控制数码管
│ ├── 程序
│ │ ├── main.c
│ │ ├── template
│ │ ├── template.M51
│ │ ├── template.hex
│ │ ├── template.uvgui.Administrator
│ │ ├── template.uvopt
│ │ └── template.uvproj
│ └── 接线图.jpg
├── 按键控制蜂鸣器
│ ├── 程序
│ │ ├── main.c
│ │ ├── template
│ │ ├── template.M51
│ │ ├── template.hex
│ │ ├── template.uvgui.Administrator
│ │ ├── template.uvopt
│ │ └── template.uvproj
│ └── 接线图.jpg
├── 蜂鸣器音乐之八月桂花
│ ├── 程序
│ │ ├── STARTUP.A51
│ │ ├── beep
│ │ ├── beep.M51
│ │ ├── beep.Opt
│ │ ├── beep.c
│ │ ├── beep.hex
│ │ ├── beep.uvgui.Administrator
│ │ ├── beep.uvopt
│ │ └── beep.uvproj
│ └── 接线图.jpg
├── 定时器秒表（查询方式）
│ ├── 程序
│ │ ├── main.c
│ │ ├── template
│ │ ├── template.M51
│ │ ├── template.hex
│ │ ├── template.uvgui.Administrator
│ │ ├── template.uvopt
│ │ └── template.uvproj
│ └── 接线图.jpg
└── 矩阵按键数码管移位显示
├── 程序
│ ├── STARTUP.A51
│ ├── main.c
│ ├── pro
│ ├── pro.M51
│ ├── pro.hex
│ ├── pro.uvgui.Administrator
│ ├── pro.uvopt
│ └── pro.uvproj
└── 接线图.jpg
28 directories, 132 files
评论