简易电子琴 - - Powered by Discuz!

标题: 简易电子琴 [打印本页]

作者: 心疯扬 时间: 2016-11-6 14:03
标题: 简易电子琴
看了课本之后，，，忍不住做了一个，，，，可惜毕竟蜂咛器声音不好听，也无法追求太好的感觉了，
不过，换成扬声器就好多了，只是，，，，，刚按几下，扬声器烧了，，，，

附上程序

#include <reg52.h>
sbit speaker=P1^0;
unsigned char keys;
unsigned char tone[]={108,102,91,86,77,68,61,57};
void sound(unsigned char);
void delay8weimiao(unsigned char );
main()
{P2=0xff;
  while(1)
{ keys=~P2;
switch(keys)
{ case 0x01:sound(0);break;
  case 0x02:sound(1);break;
  case 0x04:sound(2);break;
  case 0x08:sound(3);break;
  case 0x10:sound(4);break;
  case 0x20:sound(5);break;
  case 0x40:sound(6);break;
  case 0x80:sound(7);break;
}
}
}
void sound(unsigned char x)
{char i;
  for(i=0;i<60;i++)
{ speaker=1;
  delay8weimiao(tone[x]);
speaker=0;
  delay8weimiao(tone[x]);
}
}
void delay8weimiao(unsigned char x)
{unsigned char i,j;
for(i=0;i<x;i++)
for(j=0;j<1;j++);
}

dianziqin.rar

63.46 KB, 下载次数: 34, 下载积分: 黑币 -5

作者: 仓与无涯 时间: 2017-12-18 17:36
这么短，有长一点的吗

作者: 仓与无涯 时间: 2017-12-18 17:37
有长一点的嘛

欢迎光临 (http://www.51hei.com/bbs/)