亚洲男人的天堂网站,国产成人黄色裸体视频

/**************************************************************
程序名稱：模擬電子琴
**************************************************************/
#include<reg52.h> //定義頭文件
#define uchar unsigned char //宏定義
#define led P0 //定義LED等位P0口
#define sw_port P1 //中間變量。。。使按鍵和led對應(yīng)
sbit buzzer=P2^7; //揚(yáng)聲器管腳
sbit key1=P3^2; //播放音樂與彈奏歌曲轉(zhuǎn)換
sbit key3=P3^4; //掉電存儲按鍵
sbit key4=P3^5; //播放掉電存儲的歌曲
sbit keybofang=P3^3; //播放剛才彈奏的歌曲
sbit key7=P3^0; //音調(diào)鍵。。。和歌曲鍵
sbit key8=P3^1; //音調(diào)鍵。。。和歌曲鍵
sbit key6=P1^7;
sbit key5=P1^6;
sbit sda=P1^1; //24c02數(shù)據(jù)線
sbit scl=P1^0; //24c02時(shí)鐘線
uchar keyd,i,keys,b; //定義變量
uchar tone_H; //定義變量
uchar tone_L; //定義變量
void beat_125(unsigned char); //聲明函數(shù)
uchar code beat1[]={16,8,8,8,8,4,4,16,8,4,4,8,4,4,4, //歌曲1節(jié)拍
4,4,4,16,16,8,8,4,4,12,8,16,16,8,4,4,4,4,16};
uchar code song1[]={6,5,3,5,7,6,5,6,3,5,6,5,3, //歌曲1簡譜
2,1,6,5,3,2,2,3,5,5,6,3,2,1,5,3,2,1,6,1,1,15};
uchar code beat2[]={7,7,7, 7,8,9, 1,2,3, 6,2,4, 4,4,4, 12, //歌曲二節(jié)拍
8,2,2, 4,4,4, 8,2,2, 4,4,4, 2,2,4,4, 12,};
uchar code song2[]={1,2,8, 8,5,1, 3,3,3, 5,4,3, //歌曲二簡譜
5,4,3, 2, 2,1,0, 1,2,3, 4,3,2, 3,4,5, 5,4,3, 2,1,15};
uchar code beat4[]={4,4,4, 6,2,4, 4,4,4, 6,2,4, 4,4,4, 12,
8,2,2, 4,4,4, 8,2,2, 4,4,4, 2,2,4,4, 12,};
uchar code song4[]={1,1,1, 3,2,1, 3,3,3, 5,4,3,
5,4,3, 2, 2,1,0, 1,2,3, 4,3,2, 3,4,5, 5,4,3, 2,1, 15};
uchar code tone[]={115,102,91,86,77,68,61,57}; //歌曲音調(diào)
unsigned int code tone1[]={1012,956,852,759,716,638,568,506,478,426,379,531,10}; //歌曲音調(diào)
uchar song3[43]; //定義空數(shù)組
void play(uchar*,uchar*); //演奏歌曲函數(shù)
void delay8um(uchar); //第一8um延時(shí)函數(shù)
void sound(uchar); //彈奏發(fā)聲函數(shù)
/*******************************************
函數(shù)功能：節(jié)拍的延時(shí)的基本單位，用于24c08簡單延時(shí)
******************************************/
void delay() //簡單延時(shí)函數(shù)
{;;}
/*******************************************
函數(shù)功能：節(jié)拍的延時(shí)的基本單位，延時(shí)1ms
******************************************/
void delay1ms(uchar x) //1um延時(shí)函數(shù)
{
uchar j;
while(x--)
for(j=120;j>0;j--);
}
/**************************************************************
函數(shù)功能：24c02驅(qū)動程序用IIC總線進(jìn)行傳輸
**************************************************************/
void init_c02() //24c02初始化
{
sda=1;
delay();
scl=1;
delay();
}
void start_c02() //24c02的啟動信號
{
scl=1;
delay();
sda=1;
delay();
sda=0;
delay();
}
void stop_c02() //24c02停止信號
{
sda=0;
delay();
scl=1;
delay();
sda=1;
delay();
}
void response_c02() //24c02的應(yīng)答信號
{
uchar i;
scl=1;
delay();
while((sda==1)&&(i<250))i++;
scl=0;
delay();
}
void write_c02byte(uchar date) //對24c02寫一個(gè)字節(jié)
{
uchar i,temp;
temp=date;
for(i=0;i<8;i++)
{
temp=temp<<1;
scl=0;
delay();
sda=CY;
delay();
scl=1;
delay();
}
scl=0;
delay();
sda=1;
delay();
}
uchar read_c02byte() //對24c02讀一個(gè)字節(jié)
{
uchar i,k;
scl=0;
delay();
sda=1;
delay();
for(i=0;i<8;i++)
{
scl=1;
delay();
k=(k<<1)|sda;
scl=0;
delay();
}
return k;
}
void write_addc02(uchar address,uchar date) //對24c02寫一個(gè)數(shù)據(jù)
{
start_c02();
write_c02byte(0xa0);
response_c02();
write_c02byte(address);
response_c02();
write_c02byte(date);
response_c02();
stop_c02();
}
uchar read_addc02(uchar address) //從24c02讀一個(gè)數(shù)據(jù)
{
uchar date;
start_c02();
write_c02byte(0xa0);
response_c02();
write_c02byte(address);
response_c02();
start_c02();
write_c02byte(0xa1);
response_c02();
date=read_c02byte();
// response_c02;
stop_c02();
return date;
}
/**************************************************************
函數(shù)功能：主函數(shù)。。。。。。。。。。。。
**************************************************************/
void main() //主函數(shù)
{
uchar yd,temp,jj,tt; //定義變量
uchar t1,i; //定義變量
t1=0; //初始化 t1
yd=0; //初始化t2
buzzer=1; //初始化蜂鳴器
EA=1; //打開定時(shí)總中斷
TMOD=0x01; //設(shè)置定時(shí)器模式定時(shí)器0工作在方式1
ET0=1; //打開定時(shí)器0中斷
while(1) //主循環(huán)
{
led=0x3c;
sw_port=0xff;
keys=~sw_port; //將led與按鍵結(jié)合起來
switch(keys) //進(jìn)入鍵盤選擇
{
case 0x04:sound(0);temp=1;yd=0;break; //如果鍵盤1被按下發(fā)音do，同時(shí)設(shè)置標(biāo)志temp，將數(shù)字計(jì)入yd
case 0x08:sound(1);temp=1;yd=1;break; //如果鍵盤2被按下發(fā)音ruai，同時(shí)設(shè)置標(biāo)志temp，將數(shù)字計(jì)入yd
case 0x10:sound(2);temp=1;yd=2;break; //如果鍵盤3被按下發(fā)音mi，同時(shí)設(shè)置標(biāo)志temp，將數(shù)字計(jì)入yd
case 0x20:sound(3);temp=1;yd=3;break; //如果鍵盤4被按下發(fā)音fa，同時(shí)設(shè)置標(biāo)志temp，將數(shù)字計(jì)入yd
}
if(key5==0) //如果鍵盤5被按下發(fā)音la，同時(shí)設(shè)置標(biāo)志temp，將數(shù)字計(jì)入yd
{
while(!key5) // 松手檢測
sound(4);
temp=1;yd=4;
}
if(key6==0) //如果鍵盤6被按下發(fā)音xi，同時(shí)設(shè)置標(biāo)志temp，將數(shù)字計(jì)入yd
{
while(!key6) // 松手檢測
sound(5);
temp=1;yd=5;
}
if(key7==0) //如果鍵盤7被按下發(fā)音xi，同時(shí)設(shè)置標(biāo)志temp，將數(shù)字計(jì)入yd
{
while(!key7) // 松手檢測
sound(6);
temp=1;yd=6;
}
if(key8==0) //如果鍵盤8被按下發(fā)音高音do，同時(shí)設(shè)置標(biāo)志temp，將數(shù)字計(jì)入yd
{
while(!key8) //松手檢測
sound(7); //播放高音do。。
temp=1;yd=7;
}
if(temp==1) //標(biāo)志位，如果標(biāo)志位為1，則說明有按鍵被按下
{
temp=0; //將標(biāo)識位歸零
song3[t1++]=yd; //將數(shù)據(jù)存入song3[]數(shù)組
}
if(key3==0) //將數(shù)據(jù)存入24c02 ，掉電存儲按鍵
{
delay1ms(10);
if(key3==0) //檢測是否key3被按下
{
P0=0; //如果被按下，將led打開
while(!key3); //松手檢測
song3[t1++]=30;
init_c02(); //初始化24c02
for(i=0;i<40;) //進(jìn)入循環(huán)
{
write_addc02(i,song3[i++]); //將數(shù)據(jù)依次寫入24c02
delay1ms(10); //延時(shí)
}
P0=1; //led關(guān)閉
}
}
if(key4==0) //讀取24c02中的數(shù)據(jù)，掉電播放
{
delay1ms(10);
if(key4==0)
{ //檢測是否有鍵被按下
while(!key4); //松手檢測
init_c02(); //初始化
P0=0; //將led打開
tt=1; //將tt初值設(shè)為0
while(read_addc02(tt)!=30) //進(jìn)入while循環(huán)
{
jj=read_addc02(tt++);
tone_H=(65536-tone1[jj])/256; //設(shè)定初值
tone_L=(65536-tone1[jj])%256; //設(shè)定初值
TH0=tone_H; //賦值TH0高八位
TL0=tone_L; //賦值TL0低八位
TR0=1; //打開定時(shí)器
beat_125(3); //延時(shí)
TR0=0;
beat_125(4); //關(guān)閉定時(shí)器
}
P0=1; //關(guān)閉led
}
}
if(keybofang==0)
{
while(!keybofang); //檢測回放鍵是否被按下
song3[t1++]=30;
// t1=0;
while(song3[i]!=30) //進(jìn)入while循環(huán)。
{
tone_H=(65536-tone1[song3[i]])/256;
tone_L=(65536-tone1[song3[i]])%256;
TH0=tone_H;
TL0=tone_L;
TR0=1; //開啟定時(shí)器
beat_125(3);
TR0=0; //關(guān)閉定時(shí)器
i++;
beat_125(4); //將i值加一
}
}
if(key1==0)
{
delay1ms(10);
if(key1==0) //檢測key1是否被按下
{
while(!key1);
P0=0; //關(guān)閉led
while(key1) //進(jìn)入循環(huán)
{
if(key7==0) //檢測key7是否被按下
{
delay1ms(10);
if(key7==0)
{
P0=0xaa; //設(shè)置led燈亮個(gè)數(shù)
while(!key7); //等待釋放
play(song1,beat1); //演奏歌曲1
P0=0xff; //關(guān)閉led
}
}
if(key8==0) //檢測是否key8鍵被按下
{
delay1ms(10);
if(key8==0)
{
P0=0xaa; //設(shè)置led燈亮
while(!key8); //松手檢測
play(song2,beat2); //播放歌曲2
P0=0xff; //關(guān)閉led
}
}
if(key6==0) //檢測是否key6鍵被按下
{
delay1ms(10);
if(key6==0)
{
P0=0xaa; //設(shè)置led燈亮
while(!key6); //松手檢測
play(song4,beat4); //播放歌曲4
P0=0xff; //關(guān)閉led
}
}
}
while(!key1); //檢測key1是否被按下
P0=1; //如果被按下。退出該函數(shù)。。并關(guān)閉led
}
}
}
}
/**************************************************************
函數(shù)功能：從數(shù)組中播放歌曲
**************************************************************/
void play(uchar*song,uchar*beat) //播放歌曲函數(shù)
{
i=0; //設(shè)置初始值
while(song[i]!=15) // 進(jìn)入循環(huán)函數(shù)
{
tone_H=(65536-tone1[song[i]])/256; //定義初值
tone_L=(65536-tone1[song[i]])%256; //定義初值
TH0=tone_H; //賦值
TL0=tone_L; //賦值
TR0=1; //打開定時(shí)器0
beat_125(beat[i]); //讀取節(jié)拍函數(shù)
i++; //自加
TR0=0; //關(guān)閉led
}
}
/**************************************************************
函數(shù)功能：定時(shí)器T0的中斷服務(wù)子程序，使P2.7引腳輸出音頻方波
**************************************************************/
void tone_timer() interrupt 1 //中斷子程序
{
TH0=tone_H;
TL0=tone_L;
buzzer=~buzzer; //揚(yáng)聲器開關(guān)控制
}
/**************************************************************
函數(shù)功能：產(chǎn)生節(jié)拍的函數(shù)
**************************************************************/
void beat_125(uchar x) //節(jié)拍。。
{
uchar i,j,k; //125ms延時(shí)函數(shù)。。
for(i=0;i<x;i++)
for(j=0;j<125;j++)
for(k=0;k<120;k++);
}
/**************************************************************
函數(shù)功能：8um簡易延時(shí)
**************************************************************/
void delay8um(uchar x) //8ms延時(shí)函數(shù)
{
uchar i,j;
for(i=0;i<x;i++)
for(j=0;j<1;j++);
}

復(fù)制代碼