RMCLink COM Component RMCLink.ReadBitField Method |
Reads a bit field (range of bits) from an integer (L) register in the RMC, and converts the binary value of the bits to a long integer. ReadBitField is typically used to read the value of a multiple-bit parameter in the RMC70, RMC150, or RMC200.
Visual Basic (Declaration) |
Function ReadBitField ( _ file As Long, _ element As Long, _ fieldStart As Long, _ fieldLen As Long _ ) As Long |
Visual Basic (Usage) |
Dim instance As RMCLink Dim file As Long Dim element As Long Dim fieldStart As Long Dim fieldLen As Long Dim returnValue As Long
returnValue = instance.ReadBitField(file, element, fieldStart, fieldLen) |
file
File number of the register with the bit to be read. See the RMCLink Register Reference for details.
element
Element number of the register with the bit to be read. See the RMCLink Register Reference for details.
fieldStart
Number of the least significant bit (0-31) of the register's bit field. Bits are numbered from least to most significant.
fieldLen
Total number of bits in the bit field (1-32).
The value of the bit field is returned.
This method is synchronous, which means that it will not return until the read is completed, which may take several seconds. If this method is called on the main thread, then the application will likely be unresponsive until this method completes. For applications where this is not acceptable, this and other synchronous methods should be called from a worker thread, and may use the CancelRequest method to cancel an in progress request.
Error Code |
Description |
rmcEOutOfMemory = 5 |
Out of memory. |
rmcEInvalidArg = 7 |
One of the file, element, fieldStart, or fieldLen parameters are out of range. |
rmcEDisconnecting = 1002 |
Link is being disconnected by another thread. |
rmcEDisconnected = 1005 |
The link has not been connected. |
rmcESocketInternal = 1008 |
Internal socket error. |
rmcECancelled = 1010 |
Operation cancelled by call to CancelRequest. |
rmcETimeout = 1011 |
Operation timed out. |
rmcESocketGracefullyClosed = 1014 |
TCP/IP connection closed by remote device. |
rmcESocketReadError = 1015 |
Connection error while waiting for response from the remote device. |
rmcESocketInvReadLen = 1016 |
Connection error while waiting for response from the remote device. |
rmcESocketWriteError = 1017 |
Connection error while sending request to the remote device. |
rmcESocketInvWriteLen = 1018 |
Connection error while sending request to the remote device. |
rmcESerialIOE = 1021 |
Serial IOE error. |
rmcESerialFramingError = 1022 |
Serial framing error. |
rmcESerialBreak = 1023 |
Serial Break error. |
rmcESerialOverrun = 1024 |
Serial overrun. |
rmcESerialRxOverrun = 1025 |
Serial receive overrun. |
rmcESerialParityError = 1026 |
Serial parity error. |
rmcESerialTxFull = 1027 |
Serial transmitter full. |
rmcEConnectionBroken = 1028 |
Connection broken. |
rmcEPartialWrite = 1029 |
Unable to send full request to the remote device. |
rmcEBadAddress = 1032 |
Attempt to read beyond the end of a file. |
rmcEUSBInternal1 = 1051 |
Internal USB driver error. |
rmcEUSBOperationAborted = 1053 |
Unsuccessful transfer of data between the PC and the controller. Ensure that the physical connection between the PC and controller is still intact. |
rmcEUSBDisconnected = 1054 |
The controller appears to have been disconnected from the USB port. Ensure that the physical connection between the PC and controller is still intact. |
The following code example illustrates the use of the ReadBitField method.
Visual Basic 6 / VBA |
Option Explicit
Public Sub Sample()
' Declare and create the RMCLinkServer COM object.
Dim srv As New RMCLinkServer
' Use our RMCLinkServer to create the correct type of RMCLink object.
Dim rmc As RMCLink
Set rmc = srv.CreateEthernetLink(dtRMC70, "192.168.0.22")
' Establish the connection.
rmc.Connect
' Read bits 10-11 of L8:0 (Axis 0 Target State bits A and B)
Dim Value As Long
Value = rmc.ReadBitField(fn70StatusAxis0, 0, 10, 2)
resultText = "Target State = " & Value
' Close the connection.
rmc.Disconnect
End Sub
|
VBScript |
Option Explicit
Dim srv, rmc, value
' First we need to create the RMCLinkServer COM object.
Set srv = CreateObject("RMCLink.RMCLinkServer")
' Use our RMCLinkServer to create the correct type of RMCLink object.
' NOTE: VBScript does not support enumerations, so we use the literal value (dtRMC70=2).
Set rmc = srv.CreateEthernetLink(2, "192.168.0.22")
' Establish the connection.
rmc.Connect
' Read bits 10-11 of L8:0 (Axis 0 Target State bits A and B)
value = rmc.ReadBitField(8,0,10,2)
WScript.Echo "Target State = " & value
' Close the connection.
rmc.Disconnect
|
JScript |
// First we need to create the RMCLinkServer COM object.
var srv = new ActiveXObject("RMCLink.RMCLinkServer");
// Use our RMCLinkServer to create the correct type of RMCLink object.
// NOTE: JScript does not support enumerations, so we use the literal value (dtRMC70=2).
var rmc = srv.CreateEthernetLink(2, "192.168.0.22");
// Establish the connection.
rmc.Connect();
// Read bits 10-11 of L8:0 (Axis 0 Target State bits A and B)
var value = rmc.ReadBitField(8,0,10,2);
WScript.echo("Target State = " + value);
// Close the connection.
rmc.Disconnect();
|
See Also
RMCLink Class | RMCLink COM Component
Copyright (c) 2024 Delta Computer Systems, Inc. dba Delta Motion