dcs與變頻器、adam4000的接口方案-資料下載頁(yè)
2025-05-11 22:32本頁(yè)面
【正文】 .Channel(i).Index If j 999 Then Signal(j).Value = TempPt(i) If TempPt(i) 1000 Then Signal(j).CalValue = TempPt(i) End If Next Case Else GoTo N1 End Select Else = strPIDCommand amp。 Chr(13) 39。采集機(jī)發(fā)送 PID指令 strPIDCommand = End If If strPIDCommand Then strPIDCommand = N1: If Second(Now) SendTime Then If OnComm And (ConnectState Or RemoteConnectState) Then SendTime = Second(Now) j = Int(UBound(Signal) / 15) For i = 0 To j 1 str = @ amp。 i For k = 0 To 14 str = str amp。 / amp。 Signal(i * 15 + k).CalValue Next BroadMsg str Sleep (10) Next If UBound(Signal) j * 15 0 Then str = @ amp。 j For k = 0 To UBound(Signal) j * 15 str = str amp。 / amp。 Signal(j * 15 + k).CalValue Next BroadMsg str End If OnComm = False End If End If = RGB(255, 0, 0) = True Exit Sub N: = Format(Time, hh:mm:ss) amp。 amp。 amp。 AddAlarm OnComm = False = True End Sub
高考資料相關(guān)推薦
鄂ICP備17016276號(hào)-1