單片機串行控制led亮,程序沒有報錯,但是Proteus仿真不了,采用的是鍵盤掃,求大看看

ID:983158 · 發表于 2021-12-11 00:15

求大佬幫忙，看一下，數據傳輸還是掃描問題
甲機子的程序：

#include <reg51.h>
#define uchar unsigned char
#define uint unsigned int
sbit k1=P1^0;
sbit k2=P1^1;
sbit k3=P1^2;
unsigned char keyval;
uchar code DSY_CODE[]={0x3f,0x06,0x5b,0x4f,0x66,0x6d,0x7d,0x07,0x7f,0x6f};
void delay(uint xms)
{
uint x,y;
for(x=xms;x>0;x--)
for(y=110;y>0;y--);
}
void key_scan(void)
{
P1=0xff;
if((P1&0x0f)!=0x0f)
{
delay(10);
if(k1==0)
keyval=1;
if(k2==0)
keyval=2;
if(k3==0)
keyval=3;
}
}
void Putc_to_SerialPort(uchar c)
{
SBUF=c;
while(TI==0);
TI=0;
}
void main()
{
P0=0x00;
SCON=0x50;
TMOD=0x20;
PCON=0x00;
TL1=0xfd;
TI=RI=0;
TR1=1;
IE=0x90;
keyval=0;
while(1)
{
key_scan();
delay(100);
switch(keyval)
{
case 1: Putc_to_SerialPort('X'); break;
case 2: Putc_to_SerialPort('A');break;
case 3: Putc_to_SerialPort('B');break;
}
}
}
void Serial_INT() interrupt 4
{
if(RI)
{
RI=0;
if(SBUF>=0&&SBUF<=9)
{
P0=DSY_CODE[SBUF];
}
else
{
P0=0x00;
}
}
}

復制代碼

乙機的程序：

#include <reg51.h>
#define uchar unsigned char
#define uint unsigned int
sbit LED1=P1^0;
sbit LED2=P1^1;
sbit K2=P1^7;
uchar NumX=-1;
void DelayMS(uint ms)
{
      uchar i;
      while(ms--)
      {
            for(i=0;i<120;i++);
      }

}
void main()
{
      LED1=LED2=1;
      SCON=0x50;
      TMOD=0x20;
      TH1=0xfd;
      TL1=0xfd;
      PCON=0x00;
      RI=TI=0;
      TR1=1;
      IE=0x90;
      while(1)
      {
            DelayMS(100);
            if(K2==0)
            {
                     while(K2==0);
                     NumX=++NumX;
                     SBUF=NumX;
                     if(NumX==10)
                     {
                              NumX=-1;
                     }
                     while(TI==0);
                     TI=0;
            }
      }
}
void Serial_INT() interrupt 4
{
      if(RI)
      {
            RI=0;
            switch(SBUF)
            {

                     case 'X':  LED1=0;LED2=1;break;
                     case 'A':  LED2=0;LED1=1;break;
                     case 'B':  LED1=LED2=0;
            }
      }
}
麻煩大佬看下