【proteus练一练2.15】4X4 矩阵键盘控制条形LED显示

proteus

欢迎大家跟帖或发帖讨论，一起解决问题。。。
/*  名称：4X4 矩阵键盘控
制条形 LED显示
  说明：运行本例时，按
下的按键值越大点亮的
LED越多。
*/
#include
#include
#define uchar unsigned char
#define uint unsigned int
//矩阵键盘按键特征码表
uchar code KeyCodeTable[]={0x11,0x12,0x14,0x18,0x21,
0x22,0x24,0x28,0x41,0x42,0x44,0x48,0x81,0x82,0x84,0x88};
//延时
void DelayMS(uint x)
{
uchar i;
while(x--) for(i=0;i<120;i++);
}
//键盘扫描
uchar Keys_Scan()
{
uchar sCode,kCode,i,k;
//低4 位置0，放入 4 行
P1=0xf0;
//若高4 位出现 0，则有键按下
if((P1&0xf0)!=0xf0)
{
  DelayMS(2);
  if((P1&0xf0)!=0xf0)
  {
sCode=0xfe; //行扫描码初值
for(k=0;k<4;k++) //对4 行分别进行扫描
{
P1=sCode;
if((P1&0xf0)!=0xf0)
{
   kCode=~P1;
   for(i=0;i<16;i++) //查表得到按键序号并返回
   if(kCode==KeyCodeTable)
   return(i);
}
else
   sCode=_crol_(sCode,1);
}
  }
}
return(-1);
}
//主程序
void main()
{
uchar i,P2_LED,P3_LED;
uchar KeyNo=-1;  //按键序号，-1 表示无按键
while(1)
{
  KeyNo=Keys_Scan(); //扫描键盘获取按键序号 KeyNo
   if(KeyNo!=-1)
  {
P2_LED=0xff;
P3_LED=0xff;
for(i=0;i<=KeyNo;i++) //键值越大，点亮的 LED越多
{
if(i<8)
P3_LED>>=1;
else
P2_LED>>=1;
}
P3=P3_LED; //点亮条形 LED
P2=P2_LED;
  }
}
}
proteus 仿真图：

游客
，如果您要查看本帖隐藏内容请回复

scccx8106 · 2017-4-27 10:53:25

谢谢楼主，正在学习

scccx8106 · 2017-4-27 10:57:31

/*  名称：播放音乐
  说明：程序运行时播放生日快乐歌，  未使用定时器中断，所有频率完全用延时实现
*/
#include
#define uchar unsigned char
#define uint unsigned int
***it BEEP=P3^7;
//生日快乐歌的音符频率表，不同频率由不同的延时来决定
uchar code SONG_TONE[]={212,212,190,212,159,169,212,212,190,212,142,159,
   212,212,106,126,159,169,190,119,119,126,159,142,159,0};
//生日快乐歌节拍表，节拍决定每个音符的演奏长短
uchar code SONG_LONG[]={9,3,12,12,12,24,9,3,12,12,12,24,
9,3,12,12,12,12,12,9,3,12,12,12,24,0};
//延时
void DelayMS(uint x)
{
uchar t;
while(x--) for(t=0;t<120;t++);
}
//播放函数
void PlayMusic()
{
uint i=0,j,k;
while(SONG_LONG!=0||SONG_TONE!=0)
{ //播放各个音符，SONG_LONG 为拍子长度
  for(j=0;j   {
BEEP=~BEEP;
//SONG_TONE 延时表决定了每个音符的频率
for(k=0;k   }
  DelayMS(10);
  i++;
}
}
void main()
{
BEEP=0;
while(1)
{
  PlayMusic(); //播放生日快乐
  DelayMS(500); //播放完后暂停一段时间
}
}

pomen6 · 2017-4-28 00:03:13

学习学习

蜡青哥 · 2017-5-22 19:23:24

回复看看

程继航 · 2017-5-31 08:15:58

看看什么情况~~~~~~

揭谛_d8e · 2017-5-31 08:47:15

正在学习。。多谢楼主～～～

揭谛_d8e · 2017-5-31 08:49:40

正在学习～～正在学习～～

揭谛_d8e · 2017-5-31 09:23:24

哎哟哎哟你说我们要不要在一起？

啦啦啦00 · 2017-6-2 16:58:16

感谢楼主，程序很有用，帮助很大，子

fontex · 2017-6-8 17:18:24

谢谢！

fontex · 2017-6-8 17:25:29

回复也看不到图片？

她说爱 · 2017-6-13 16:29:19

学习一下

她说爱 · 2017-6-13 16:32:29

学习

zhao124063 · 2017-6-21 15:42:13

lyxtshr · 2017-6-22 02:25:50

正在找资料学习当中，过来看看

吴佳涛 · 2017-6-24 11:48:29

受教了谢谢

嘟嘟宝宝 · 2017-6-24 22:51:32

COOL!!

lennon008 · 2017-6-25 09:07:11

chew_elecfans · 2017-6-26 21:59:48

感谢楼主分享。。。。。。

chj110 · 2017-7-7 23:19:20

谢谢啦

搜索历史

【proteus练一练2.15】4X4 矩阵键盘控制条形LED显示

相关推荐

117 条评论

评论

精选推荐

站长推荐 /6