Did anyanye try CR1000 to control other instrument by send Hex string?
I need to contral a digital servo motor with folling string to make it turn to a specific position(angle),eg.
Send Hexstring :"FF FF 01 0A 03 29 32 00 00 00 00 5F 00 37 " to make it back to home point and Hexstring :"FF FF 01 0A 03 29 32 00 08 00 00 5F 00 2F " for half turn to run,etc
You need to either load the data into an array of longs or a string.
Then use SerialOutBlock to send it out.
Be sure to NOT use format 0 in SerialOpen.
Public SendCommand As Boolean
'Note that the last Long has extra nulls added to the end. Each long is 4 bytes
Dim Position1(4) As Long = {&hFFFF010A, &h03293200, &h0000005F, &h00370000}
'Main Program
BeginProg
SerialOpen (Com1,9600,3,0,50)
Scan (1,Sec,0,0)
If SendCommand Then
SerialOutBlock (Com1,Position1(),14)
SendCommand = false
EndIf
NextScan
EndProg
Many thanks for your help！ I am still working on it.