ex5-8.c

在Keil环境下

/*
标题：范例 5-8
版本：1.0
Target：89S51
程序描述：Port A 连接8颗LED，并且经由RS232连接到主电脑的COM1主电脑上执行本节所附的VB程序之后,可以在主电脑的程序执行画面设定port 1的8颗LED亮或灭。
/* ***************************************************** */
#include <Regx51.h>
#include <stdio.h>

#define XTAL        11059200
#define baudrate    9600

static void com_isr(void) interrupt SIO_VECTOR using 1
{
        if(RI) {
                P1=SBUF;
                RI=0;
                return;
        }
        if(TI!=0) TI=0;
}
void com_initialize(void) {
        PCON |= 0x80;
        TMOD=0x20;
        TH1=(unsigned char) (256-(XTAL/(16L*12L*baudrate)));
        TR1=(unsigned char) (256-(XTAL/(16L*12L*baudrate)));
        SCON=0x50;
        ES=1;
        TR1=1;
}

void main (void)  {
        
        EA=1;
        com_initialize();
        while(1) ;
}