#include<reg51.h>
#define uint unsigned int
#define uchar unsigned char
sbit dula=P2^6;
sbit wela=P2^7;
uchar code table[]={0xc0,0xf9,0xa4,0xb0,0x99,0x92,0x82,0xf8,0x80,0x90,0x88,0x83,0xc6,0xa1,0x86,0x8e};
uchar code table1[]={0x01,0x02,0x04,0x08,0x10,0x20,0x40,0x80};
uchar a,b,c,bai,shi,ge,d,e,f,temp,key;
void delay(uint z)
{
uint y;
while(z--)
for(y=500;y>0;y--);
}
/*void time0() interrupt 1
{
TR0=0;
TH0=(65536-50000)/256;
TL0=(65536-50000)%256;
a++;
if(a==20)
{
a=0;
temp++;
d++;
e++;
f++;
if(f==8)f=0;
if(e==8)e=0;
if(d==8)d=0;
bai=temp/100;
shi=temp%100/10;
ge=temp%10;
}
TR0=1;
}*/
void display(uchar bai,uchar shi,uchar ge)
{ wela=1;
P0=table1[f];
wela=0;
dula=1;
P0=table[bai];
dula=0;
delay(1);
wela=1;
P0=table1[e];
wela=0;
dula=1;
P0=table[shi];
dula=0;
delay(1);
wela=1;
P0=table1[d];
wela=0;
dula=1;
P0=table[ge];
dula=0;
delay(1);
}
void keyscan()
{
P3=0xfe;
temp=P3;
temp=temp&0xf0;
if(temp!=0xf0)
{
temp=P3;
switch(temp)
{
case 0xee:key=1;break;
case 0xde:key=2;break;
case 0xbe:key=3;break;
case 0x7e:key=4;break;
}
while(temp!=0xf0)
{
temp=P3;
temp=temp&0xf0;
}
}
P3=0xfd;
temp=P3;
temp=temp&0xf0;
if(temp!=0xf0)
{
temp=P3;
switch(temp)
{
case 0xed:key=5;break;
case 0xdd:key=6;break;
case 0xbd:key=7;break;
case 0x7d:key=8;break;
}
while(temp!=0xf0)
{
temp=P3;
temp=temp&0xf0;
}
}
P3=0xfb;
temp=P3;
temp=temp&0xf0;
if(temp!=0xf0)
{
temp=P3;
switch(temp)
{
case 0xeb:key=9;break;
case 0xdb:key=10;break;
case 0xbb:key=11;break;
case 0x7b:key=12;break;
}
while(temp!=0xf0)
{
temp=P3;
temp=temp&0xf0;
}
}
P3=0xf7;
temp=P3;
temp=temp&0xf0;
if(temp!=0xf0)
{
temp=P3;
switch(temp)
{
case 0xe7:key=13;break;
case 0xd7:key=14;break;
case 0xb7:key=15;break;
case 0x77:key=16;break;
}
while(temp!=0xf0)
{
temp=P3;
temp=temp&0xf0;
}
}
}
void main()
{
d=0;
e=1;
f=2;
/* TMOD=0x01;
TH0=(65536-50000)/256;
TL0=(65536-50000)%256;
EA=1;
ET0=1;
TR0=1;*/
while(1)
{
keyscan();
bai=key/100;
shi=key%100/10;
ge=key%10;
display(bai,shi,ge);
}
}
没有合适的资源?快使用搜索试试~ 我知道了~
51单片机PROTEUS超值仿真 附源程序
共61个文件
bak:8个
dbk:4个
hex:4个
4星 · 超过85%的资源 需积分: 9 48 下载量 89 浏览量
2010-09-22
18:27:47
上传
评论
收藏 169KB RAR 举报
温馨提示
8051单片机PROTEUS仿真8051单片机PROTEUS仿真8051单片机PROTEUS仿真8051单片机PROTEUS仿真8051单片机PROTEUS仿真8051单片机PROTEUS仿真8051单片机PROTEUS仿真
资源推荐
资源详情
资源评论
收起资源包目录
proteus.rar (61个子文件)
proteus
串口
Text1.c 1KB
a_Uv2.Bak 0B
a.Opt 953B
a.M51 6KB
1.DSN 94KB
Text1.OBJ 1KB
a.lnp 23B
Last Loaded 1.DBK 88KB
1.PWI 1KB
a.Uv2 2KB
a_Opt.Bak 1KB
a.plg 0B
a.hex 357B
Text1.LST 3KB
a 1KB
新建文件夹
2.c 2KB
2.hex 1KB
2.Uv2 2KB
2_Opt.Bak 1022B
ledc51.PWI 768B
2 2KB
2.plg 0B
Last Loaded ledc51.DBK 143KB
hui 4KB
2.M51 10KB
2.lnp 19B
2_Uv2.Bak 2KB
2.LST 5KB
2.Opt 1022B
2.OBJ 3KB
ledc51.DSN 139KB
lcd+key
3.lnp 19B
3.M51 6KB
3.plg 0B
3.LST 3KB
3_Uv2.Bak 2KB
3.c 910B
3.hex 572B
Last Loaded lcd51.DBK 116KB
3.Uv2 2KB
3 1KB
3.OBJ 2KB
lcd51.PWI 742B
lcd51.DSN 116KB
3.Opt 950B
3_Opt.Bak 948B
led点阵
Text1.c 720B
1.lnp 23B
Last Loaded dianzhen.DBK 72KB
dianzhen.DSN 71KB
1 1KB
1_Uv2.Bak 0B
1.Opt 998B
Text1.OBJ 2KB
1.M51 6KB
dianzhen.PWI 768B
1_Opt.Bak 1000B
1.plg 0B
1.Uv2 2KB
1.hex 896B
Text1.LST 2KB
共 61 条
- 1
资源评论
- kongjiang12014-04-14有用的资源 不错
fzc465882932
- 粉丝: 0
- 资源: 20
上传资源 快速赚钱
- 我的内容管理 展开
- 我的资源 快来上传第一个资源
- 我的收益 登录查看自己的收益
- 我的积分 登录查看自己的积分
- 我的C币 登录后查看C币余额
- 我的收藏
- 我的下载
- 下载帮助
最新资源
资源上传下载、课程学习等过程中有任何疑问或建议,欢迎提出宝贵意见哦~我们会及时处理!
点击此处反馈
安全验证
文档复制为VIP权益,开通VIP直接复制
信息提交成功