Question

谁能帮我在proteus里给一个LED灯写个小程序

就是八个不同的按键，分别按下时依次显示1，2，3，4，5，6，7，8

Answer 1

ORG 0000H
JMP BEGIN
ORG 0030H
TABLE: ; 共阴极数码管显示代码表
DB 3FH,06H,5BH,4FH,66H ;01234
DB 6DH,7DH,07H,7FH,6fh ;56789

BEGIN:

MOV R4,#0
MOV A,R4 ;R4位标志值送A寄存器
AGAIN: MOV DPTR,#TABLE
MOVC A,@A+DPTR
MOV P1,A
LOOP1: MOV A,P3 ; 接收p3口的按键信号
CPL A
JZ LOOP1
LOOP2: RRC A ;有人按键信号则逐次移动判断
INC R4
JNC LOOP2
MOV A,R4

MOVC A,@A+DPTR ;找到相应位显示代码
MOV P1,A
LOOP3:

SJMP BEGIN
END

#include<reg51.h>
#define uchar unsigned char
uchar table[]={0x3f,0x06,0x5b,0x4f,0x66,0x6d,0x7d,0x07,0x7f};
main()

{
uchar i,key;
while(1)

{
i=0;
P1=table[i];
while(1)
{
key=P3;
if(key!=0)break;
}
switch(key)
{
case 0x01:i=1;break;
case 0x02:i=2;break;
case 0x04:i=3;break;
case 0x08:i=4;break;
case 0x10:i=5;break;
case 0x20:i=6;break;
case 0x40:i=7;break;
case 0x80:i=8;break;
default:break;
}
P1=table[i];//显示按下抢答器的号
}

}

追问

可以留下qq吗？求指教

追答

私信吧，我很少上QQ。

追问

追答

这是我曾经做的一个电子琴模拟程序，你参考一下，稍加修改应该就可以。

追问

你有proteus仿真没？

追答

没有保留，当时做完发上来，之后被其他东东覆盖了。

追问

我可以发给你文件你帮我改一点点东西吗？

追答

发过来吧

按你的电路修改了，没有显示。