1024手机基地看电影,午夜福利视频导航,国产精品福利在线一区,亚洲欧美日韩另类成人,在线观看午夜日本理论片,成年超爽免费网站,国产精品成人免费,精品动作一级毛片,成人免费观看网站,97精品伊人久久大香蕉

 找回密碼
 立即注冊

QQ登錄

只需一步,快速開始

搜索
查看: 1585|回復(fù): 0
打印 上一主題 下一主題
收起左側(cè)

電子琴的制作

[復(fù)制鏈接]
跳轉(zhuǎn)到指定樓層
樓主
ID:361803 發(fā)表于 2018-6-29 15:24 | 只看該作者 回帖獎勵 |倒序瀏覽 |閱讀模式
程序如下 :
#include <AT89X51.H>
unsigned char key,KTH0,KTL0;
sbit sp=P1^0;
unsigned int code tab[]={64021,64103,64260,64400,   
                          64524,64580,64684,64777,
                          64820,64898,64968,65030,
                          65058,65110,65157,65178};

void t0(void) interrupt 1 using 0
{
  TH0=KTH0;
  TL0=KTL0;
  P1_0=~P1_0;
}

//??????
void ys()
{unsigned char aaa,bbb;
for(aaa=200;aaa>0;aaa--)
  for(bbb=0;bbb<20;bbb++);
}
void main(void)
{key=0;TMOD=0X01;EA=1;ET0=1;
while(1)
{
  P2=0x7f;
  if(P2!=0x7f)
  {
   ys();
   while(P2!=0x7f)
    {
  switch(P2)
      {case 0x77:key=7;break;
    case 0x7b:key=4;break;
       case 0x7d:key=1;break;
    case 0x7e:key=0;break;
      }
     P0=~key;
  KTH0=tab[key]/256;
     KTL0=tab[key]%256;
  TR0=1;
    }
   }
  P2=0xbf;
  if(P2!=0xbf)
  {
   ys();
   if(P2!=0xbf)
    {
  switch(P2)
   {case 0xb7:key=8;break;
    case 0xbb:key=5;break;
           case 0xbd:key=2;break;
    case 0xbe:key=13;break;
          }
     P0=~key;
  KTH0=tab[key]/256;
     KTL0=tab[key]%256;
  TR0=1;
    }
   }
  P2=0xdf;
  if(P2!=0xdf)
  {
   ys();
   if(P2!=0xdf)
    {
  switch(P2)
   {case 0xd7:key=9;break;
    case 0xdb:key=6;break;
           case 0xdd:key=3;break;
    case 0xde:key=14;break;
          }
     P0=~key;
  KTH0=tab[key]/256;
     KTL0=tab[key]%256;
  TR0=1;
    }
   }
  P2=0xef;
  if(P2!=0xef)
{
   ys();
   if(P2!=0xef)
    {
  switch(P2)
   {case 0xe7:key=10;break;
    case 0xeb:key=11;break;
           case 0xed:key=12;break;
    case 0xee:key=15;break;
          }
     P0=~key;
  KTH0=tab[key]/256;
     KTL0=tab[key]%256;
  TR0=1;
    }
   }   
}
}
#include <AT89X51.H>
unsigned char key,KTH0,KTL0;
sbit sp=P1^0;
unsigned int code tab[]={64021,64103,64260,64400,   
                          64524,64580,64684,64777,
                          64820,64898,64968,65030,
                          65058,65110,65157,65178};

void t0(void) interrupt 1 using 0
{
  TH0=KTH0;
  TL0=KTL0;
  P1_0=~P1_0;
}

//??????
void ys()
{unsigned char aaa,bbb;
for(aaa=200;aaa>0;aaa--)
  for(bbb=0;bbb<20;bbb++);
}
void main(void)
{key=0;TMOD=0X01;EA=1;ET0=1;
while(1)
{
  P2=0x7f;
  if(P2!=0x7f)
  {
   ys();
   while(P2!=0x7f)
    {
  switch(P2)
      {case 0x77:key=7;break;
    case 0x7b:key=4;break;
       case 0x7d:key=1;break;
    case 0x7e:key=0;break;
      }
     P0=~key;
  KTH0=tab[key]/256;
     KTL0=tab[key]%256;
  TR0=1;
    }
   }
  P2=0xbf;
  if(P2!=0xbf)
  {
   ys();
   if(P2!=0xbf)
    {
  switch(P2)
   {case 0xb7:key=8;break;
    case 0xbb:key=5;break;
           case 0xbd:key=2;break;
    case 0xbe:key=13;break;
          }
     P0=~key;
  KTH0=tab[key]/256;
     KTL0=tab[key]%256;
  TR0=1;
    }
   }
  P2=0xdf;
  if(P2!=0xdf)
  {
   ys();
   if(P2!=0xdf)
    {
  switch(P2)
   {case 0xd7:key=9;break;
    case 0xdb:key=6;break;
           case 0xdd:key=3;break;
    case 0xde:key=14;break;
          }
     P0=~key;
  KTH0=tab[key]/256;
     KTL0=tab[key]%256;
  TR0=1;
    }
   }
  P2=0xef;
  if(P2!=0xef)
{
   ys();
   if(P2!=0xef)
    {
  switch(P2)
   {case 0xe7:key=10;break;
    case 0xeb:key=11;break;
           case 0xed:key=12;break;
    case 0xee:key=15;break;
          }
     P0=~key;
  KTH0=tab[key]/256;
     KTL0=tab[key]%256;
  TR0=1;
    }
   }   
}
}
#include <AT89X51.H>
unsigned char key,KTH0,KTL0;
sbit sp=P1^0;
unsigned int code tab[]={64021,64103,64260,64400,   
                          64524,64580,64684,64777,
                          64820,64898,64968,65030,
                          65058,65110,65157,65178};

void t0(void) interrupt 1 using 0
{
  TH0=KTH0;
  TL0=KTL0;
  P1_0=~P1_0;
}

//??????
void ys()
{unsigned char aaa,bbb;
for(aaa=200;aaa>0;aaa--)
  for(bbb=0;bbb<20;bbb++);
}
void main(void)
{key=0;TMOD=0X01;EA=1;ET0=1;
while(1)
{
  P2=0x7f;
  if(P2!=0x7f)
  {
   ys();
   while(P2!=0x7f)
    {
  switch(P2)
      {case 0x77:key=7;break;
    case 0x7b:key=4;break;
       case 0x7d:key=1;break;
    case 0x7e:key=0;break;
      }
     P0=~key;
  KTH0=tab[key]/256;
     KTL0=tab[key]%256;
  TR0=1;
    }
   }
  P2=0xbf;
  if(P2!=0xbf)
  {
   ys();
   if(P2!=0xbf)
    {
  switch(P2)
   {case 0xb7:key=8;break;
    case 0xbb:key=5;break;
           case 0xbd:key=2;break;
    case 0xbe:key=13;break;
          }
     P0=~key;
  KTH0=tab[key]/256;
     KTL0=tab[key]%256;
  TR0=1;
    }
   }
  P2=0xdf;
  if(P2!=0xdf)
  {
   ys();
   if(P2!=0xdf)
    {
  switch(P2)
   {case 0xd7:key=9;break;
    case 0xdb:key=6;break;
           case 0xdd:key=3;break;
    case 0xde:key=14;break;
          }
     P0=~key;
  KTH0=tab[key]/256;
     KTL0=tab[key]%256;
  TR0=1;
    }
   }
  P2=0xef;
  if(P2!=0xef)
{
   ys();
   if(P2!=0xef)
    {
  switch(P2)
   {case 0xe7:key=10;break;
    case 0xeb:key=11;break;
           case 0xed:key=12;break;
    case 0xee:key=15;break;
          }
     P0=~key;
  KTH0=tab[key]/256;
     KTL0=tab[key]%256;
  TR0=1;
    }
   }   
}
}


分享到:  QQ好友和群QQ好友和群 QQ空間QQ空間 騰訊微博騰訊微博 騰訊朋友騰訊朋友
收藏收藏 分享淘帖 頂 踩
回復(fù)

使用道具 舉報

您需要登錄后才可以回帖 登錄 | 立即注冊

本版積分規(guī)則

小黑屋|51黑電子論壇 |51黑電子論壇6群 QQ 管理員QQ:125739409;技術(shù)交流QQ群281945664

Powered by 單片機教程網(wǎng)

快速回復(fù) 返回頂部 返回列表