编写一个CRC（循环冗余校验）程序通常涉及以下步骤：
初始化CRC寄存器：
将CRC寄存器设置为特定的初始值，通常是`16FFFF`。
处理数据：
将待校验数据的每个字节与CRC寄存器的低8位进行异或运算，并将结果存回CRC寄存器。
移位操作：
将CRC寄存器向右移一位，最高位补零，并检查最低位（LSB）。
异或运算：
如果LSB为1，则将CRC寄存器与多项式码（通常是`16A001`）进行异或运算。
重复步骤3和4：
直到所有数据字节都处理完毕，通常需要移位8次。
```assembly
； 初始化CRC寄存器为16FFFF
MOVW AC0, 16FFFF
； 循环处理每个字节
MOVDL D0, LD6
INCD LD6
FOR AC2, +1, LW4
； 异或第一个字节与CRC寄存器低位
XORB *LD6, AC0
； 移位操作
FOR AC1, +1, +8
； 检查最低位并执行异或运算（如果需要）
； 这里假设不需要额外的异或操作，因为多项式码是固定的16A001
； 循环处理所有数据字节
； 这里假设数据长度存储在LD0中
MOVW LD0, Network1
FOR Network2, +1, LW4
； 退出循环
MOVW Network1, Network2
```
请注意，这个示例程序是一个简化的版本，实际应用中可能需要根据具体的CRC200算法和寄存器使用情况进行调整。此外，不同的处理器架构和编程环境可能需要不同的语法和指令。
如果你使用的是其他编程语言，如C或C++，可以参考以下示例代码：
```c
include
unsigned short crc200（unsigned char *data, int length） {
unsigned short crc = 0xFFFF；
for （int i = 0； i < length； i++） {
crc ^= data[i]；
for （int j = 0； j < 8； j++） {
if （crc & 0x8000） {
crc = （crc << 1） ^ 0xA001；
} else {
crc <<= 1；
}
}
}
return crc；
}
int main（） {
unsigned char data[] = {0x01, 0x02, 0x03, 0x04}；
int length = sizeof（data） / sizeof（data）；
unsigned short crc = crc200（data, length）；
printf（"CRC: %04X\n", crc）；
return 0；
}
```
这个C程序实现了CRC200算法，并打印出计算得到的CRC值。你可以根据具体需求修改输入数据和输出格式。
