reg_sci = [85 90 4 230 128 00 25]; fwrite(scom, reg_sci); d =fread(scom,3); DataLength = d(3); d =fread(scom, DataLength);

这段代码中使用了串口通信，将一个长度为7的数组`reg_sci`写入串口，然后读取了3个字节的数据并将其中的第3个字节赋值给`DataLength`变量。接着再读取`DataLength`个字节的数据并保存到`d`数组中。

根据代码来看，这段代码的作用应该是将一些数据通过串口发送给外部设备，并从外部设备接收一些数据。但是具体的数据内容和通信协议需要结合实际情况进行分析。