4.用 AT89S51 单片机的P2口控制8个LED(共阳接法)依次右移1位点亮(亮200ms)。即P2.7亮一P2.6亮→··•·•一P2.1→P2.0亮，重复循环。 写出该程序

在编写AT89S51单片机的程序控制P2口的8个LED依次右移点亮时，我们通常使用C语言进行编程。以下是一个简单的示例程序，用于实现你所描述的功能：

#include <REGX51.H> // 包含AT89S51单片机的寄存器定义

// 延时函数，用于产生200ms的延迟
void delay_200ms() {
    unsigned int i, j;
    for(i = 0; i < 100; i++) {
        for(j = 0; j < 112; j++) {
            /* 空循环，延时的具体时间需要根据实际晶振频率调整 */
        }
    }
}

void main() {
    unsigned char led_pattern = 0x80; // 初始模式，P2.7亮，其余熄灭
    while(1) { // 无限循环
        P2 = ~led_pattern; // 输出到P2口，因为是共阳接法，所以需要取反
        delay_200ms(); // 延时200ms
        
        led_pattern = led_pattern >> 1; // 将LED模式右移一位
        if(led_pattern == 0x00) {
            led_pattern = 0x80; // 如果全部熄灭，重新设置为P2.7亮
        }
    }
}

请注意，上述代码中的`delay_200ms`函数需要根据你的单片机的实际晶振频率进行调整以达到大约200ms的延时。代码中的延时循环次数是基于一个假设的晶振频率，实际使用时可能需要增加或减少循环次数以满足实际需要。