能写一个stc89c52单片机的DL/T645-2007的c语言程序吗

当然可以，以下是一个基于STC89C52单片机的DL/T645-2007的C语言程序示例：

#include <reg52.h>

#define uchar unsigned char
#define uint unsigned int

sbit RS485 = P0^4;  // 485控制引脚

void UART_init() {
    TMOD = 0x20;  // 定时器1为8位自动重载模式
    TH1 = 0xFD;   // 波特率为9600，定时器1初值设为0xFD
    TL1 = 0xFD;
    PCON = 0x00;
    SCON = 0x50;   // 串口工作在模式1
    EA = 1;        // 开全局中断
    ES = 1;        // 使能串口中断
    TR1 = 1;       // 启动定时器1
}

// 发送一个字节
void UART_send_byte(uchar byte) {
    SBUF = byte;
    while (!TI);  // 等待发送完成
    TI = 0;       // 清除发送完成标志位
}

// 发送一个帧
void send_frame(uchar *frame, uint len) {
    RS485 = 1;  // 切换到发送模式
    for (int i = 0; i < len; i++) {
        UART_send_byte(frame[i]);
    }
    RS485 = 0;  // 切换到接收模式
}

// 接收一个字节
uchar UART_recv_byte() {
    while (!RI);  // 等待接收完成
    RI = 0;       // 清除接收完成标志位
    return SBUF;
}

// 接收一个帧
uint recv_frame(uchar *frame, uint max_len) {
    uint len = 0;
    while (1) {
        uchar byte = UART_recv_byte();
        if (byte == 0x68) {  // 帧头
            len = 1;
            frame[0] = byte;
        } else if (len > 0) {
            frame[len++] = byte;
            if (byte == 0x16) {  // 帧尾
                break;
            }
        }
        if (len >= max_len) {  // 防止缓冲区溢出
            break;
        }
    }
    return len;
}

void main() {
    UART_init();

    uchar cmd[] = {0x68, 0x32, 0x00, 0x32, 0x00, 0x68, 0x11, 0x04, 0x33, 0x33, 0x33, 0x33, 0x01, 0x03, 0x33, 0x00, 0x16, 0x16};
    send_frame(cmd, sizeof(cmd));

    uchar buf[1024];
    uint len = recv_frame(buf, sizeof(buf));
    for (int i = 0; i < len; i++) {
        printf("%02X ", buf[i]);
    }
    printf("\n");

    while (1);
}

在上面的示例中，首先初始化串口，并定义了一个控制485芯片的引脚`RS485`，然后向电能表发送读取数据的命令，并接收响应数据，最后打印数据。请注意，具体的程序实现需要根据电能表的具体协议进行调整。