通信乙.txt

来自「双机通信程序」· 文本 代码 · 共 36 行

#include<reg51.h>
#define uchar unsigned char 
#define uint unsigned int
uchar data leddata;
unsigned char a[]={0x3f,0x06,0x5b,0x4f,0x66,0x6d,0x7d,0x07,0x7f,0x6f,
0x77,0x7c,0x39,0x5e,0x79,0x71};
void xians()
{P1=leddata;}
void delay()
{uint i,k;
 for(k=100;k>0;k--)
 for(i=100;i>0;i--);}
void main()
{uchar j;
SCON=0x50;
 TMOD=0x20;
 TH1=0xe6;
 TL1=0xe6;
PCON=0x80;
TR1=1;
while(1)
{for(j=0;j<16;j++)
{while(~RI);
RI=0;
leddata=SBUF;
xians();
SBUF=a[j];
P2=a[j];
while(~TI);
TI=0;
delay();}
}
}