台湾应广单片机编程第五季03nokiatune

只看该作者 · 2020-6-27 22:51

台湾应广单片机编程第五季他来了

https://www.bilibili.com/video/BV12f4y117Xr/

只看该作者 · 2020-6-27 23:21

/*******************PMS150G************************/
/******************N0kia_tune**********************/
/*****************QQ774145445**********************/
/******************20200627************************/
#include "extern.h"
feng bit pa.5;
anjian bit pa.6
void gao(); //高电平时间固定
void di(); //低电平时间
void chang(); //音阶长度
void yue(); //音乐
word x; //音阶长度
word y,ya; //低电平时间
/**************************************************/
void FPPA0 (void)
{
.ADJUST_IC SYSCLK=IHRC/2 // SYSCLK=IHRC/4

$ feng out,Low; //Out_Low, Out_High
$ anjian in,High;
paph.6=1;
yue();
while(1)
{
nop;
if(!anjian)
{
yue();
}

}
}

/**************************************************/

void gao() //高电平时间
{
feng =1;
.delay 700;//400+300;
feng =0;
}

/**************************************************/
void di() //低电平时间
{
ya =y;
while(ya)
{
ya--;
nop; nop; nop;
}
}

/**************************************************/
void chang() //音节阶长度
{
while(x)
{
x--;
gao(); //高电平时间固定
di(); //低电平时间
}
}

/**************************************************/
void yue() //音乐
{
/**************************************************/ //5
x=167; //音阶长度
y=590; //低电平时间
chang();
/**************************************************/ //4
x=145; //音阶长度
y=680; //低电平时间
chang();
/**************************************************/ //6
x=183; //音阶长度
y=1202; //低电平时间
chang();
/**************************************************/ //7
x=207; //音阶长度
y=1020; //低电平时间
chang();
/**************************************************/ //3
x=137; //音阶长度
y=726; //低电平时间
chang();
/**************************************************/ //2
x=125; //音阶长度
y=862; //低电平时间
chang();
/**************************************************/ //4
x=146; //音阶长度
y=1519; //低电平时间
chang();
/**************************************************/ //5
x=164; //音阶长度
y=1338; //低电平时间
chang();
/**************************************************/ //2
x=122; //音阶长度
y=839; //低电平时间
chang();
/**************************************************/ //1
x=110; //音阶长度
y=952; //低电平时间
chang();
/**************************************************/ //3
x=139; //音阶长度
y=1610; //低电平时间
chang();
/**************************************************/ //5
x=164; //音阶长度
y=1338; //低电平时间
chang();
/**************************************************/ //1
x=661; //音阶长度
y=970; //低电平时间
chang();
/**************************************************/
}

/**************************************************/

台湾应广单片机编程第五季03nokiatune

相关下载

相关帖子

技术高手奖章