91av视频/亚洲h视频/操亚洲美女/外国一级黄色毛片 - 国产三级三级三级三级

  • 大小: 48.23 KB
    文件類型: .rar
    金幣: 1
    下載: 0 次
    發(fā)布日期: 2024-12-05
  • 語言: 其他
  • 標(biāo)簽:

資源簡介

我做的電子琴,21個(gè)音,一般歌曲基本上都能夠彈奏、多多指教。呵呵呵、、

資源截圖

代碼片段和文件信息

#include
#define?uchar?unsigned?char
#define?uint?unsigned?int
sbit?P34=P3^4;
sbit?P35=P3^5;
sbit?P36=P3^6;
sbit?P37=P3^7;
sbit?P20=P2^0;
uchar?code?table[]={0x3f0x060x5b0x4f0x660x6d0x7d0x070x7f
?0x6f0x770x7c0x390x5e0x790x71
};
uint?code?tab[]={6402164103642606440064524645806468464777
??6482064898649686503065058651106515765178
?};
uchar?tempkeyijSTH0STL0;
void?delay(uint);

void?main()
{
TMOD=0x01;
EA=1;
ET0=1;
while(1)
{
P3=0xff;
P34=0;
temp=P3;
temp&=0x0f;
if(temp!=0x0f)
{
delay(10);
temp=P3;
temp&=0x0f;
if(temp!=0x0f)
{
temp=P3;
temp&=0x0f;
switch(temp)
{
case?0x0e:key=0;break;
case?0x0d:key=1;break;
case?0x0b:key=2;break;
case?0x07:key=3;break;
}
temp=P3;
P20=~P20;
P0=table[key];
STH0=tab[key]/256;
STL0=tab[key]%256;
TR0=1;
temp&=0x0f;
while(temp!=0x0f)
{
temp=P3;
temp&=0x0f;
}
TR0=0;
}
}
P3=0xff;
P35=0;
temp=P3;
temp&=0x0f;
if(temp!=0x0f)
{
delay(10);
temp=P3;
temp&=0x0f;
if(temp!=0x0f)
{
temp=P3;
temp&=0x0f;
switch(temp)
{
case?0x0e:key=4;break;
case?0x0d:key=5;break;
case?0x0b:key=6;break;
case?0x07:key=7;break;
}
temp=P3;
P20=~P20;
P0=table[key];
STH0=tab[key]/256;
STL0=tab[key]%256;
TR0=1;
temp&=0x0f;
while(temp!=0x0f)
{
temp=P3;
temp&=0x0f;
}
TR0=0;
}
}
P3=0xff;
P36=0;
temp=P3;
temp&=0x0f;
if(temp!=0x0f)
{
delay(10);
temp=P3;
temp&=0x0f;
if(temp!=0x0f)
{
temp=P3;
temp&=0x0f;
switch(temp)
{
case?0x0e:key=8;break;
case?0x0d:key=9;break;
case?0x0b:key=10;break;
case?0x07:key=11;break;
}
temp=P3;
P20=~P20;
P0=table[key];
STH0=tab[key]/256;
STL0=tab[key]%256;
TR0=1;
temp&=0x0f;
while(temp!=0x0f)
{
temp=P3;
temp&=0x0f;
}
TR0=0;
}
}
P3=0xff;
P37=0;
temp=P3;
temp&=0x0f;
if(temp!=0x0f)
{
delay(10);
temp=P3;
temp&=0x0f;
if(temp!=0x0f)
{
temp=P3;
temp&=0x0f;
switch(temp)
{
case?0x0e:key=12;break;
case?0x0d:key=13;break;
case?0x0b:key=14;break;
case?0x07:key=15;break;
}
temp=P3;
P20=~P20;
P0=table[key];
STH0=tab[key]/256;
STL0=tab[key]%256;
TR0=1;
temp&=0x0f;
while(temp!=0x0f)
{
temp=P3;
temp&=0x0f;
}
TR0=0;
}
}
}
}

void?delay(uint?z)
{
uint?xy;
for(x=z;x>0;x--)
?for(y=110;y>0;y--);
}

void?timer0()?interrupt?1
{
TH0=STH0;
TL0=STL0;
P20=~P20;
}

?屬性????????????大小?????日期????時(shí)間???名稱
-----------?---------??----------?-----??----

????.......?????????0??2010-04-11?23:53??電子琴\電子琴_Uv2.Bak

?????文件???????6376??2005-03-22?15:22??電子琴\STARTUP.A51

?????文件????????156??2010-04-25?00:58??電子琴\電子琴.plg

?????文件???????2837??2010-04-12?00:32??電子琴\dzq.c

?????文件??????14049??2010-04-13?21:57??電子琴\STARTUP.LST

?????文件?????????57??2010-04-13?21:57??電子琴\電子琴.lnp

?????文件??????11438??2010-04-13?21:57??電子琴\電子琴.M51

?????文件???????1925??2010-04-13?21:57??電子琴\電子琴.hex

?????文件???????2185??2010-04-12?00:32??電子琴\電子琴.Uv2

?????文件????????768??2010-04-25?00:58??電子琴\電子琴.PWI

?????文件?????????48??2010-04-12?10:58??電子琴\新建?文本文檔.txt

?????文件??????91245??2010-04-13?20:23??電子琴\Last?Loaded?電子琴.DBK

?????文件??????91245??2010-04-13?21:23??電子琴\電子琴.DSN

?????文件????????758??2010-04-13?21:57??電子琴\STARTUP.OBJ

?????文件??????10180??2010-04-13?21:57??電子琴\dzq.LST

?????文件???????8001??2010-04-13?21:57??電子琴\dzq.OBJ

?????文件???????7318??2010-04-13?21:57??電子琴\電子琴

????.......??????1039??2010-04-13?21:57??電子琴\電子琴_Opt.Bak

?????文件???????1043??2010-04-25?00:58??電子琴\電子琴.Opt

?????目錄??????????0??2010-04-11?20:21??電子琴

-----------?---------??----------?-----??----

???????????????250668????????????????????20


評(píng)論

共有 條評(píng)論

相關(guān)資源