If your language can call a DLL, you can use the U401 or U421

On the Liberty BASIC Community Forum was a posting asking:

Has anyone used LB to interface to USBmicro I/O modules see http://usbmicro.com/
RobotBasic & VB provide this functionality

The moderator “Rod” replied:

If I take the short VB example listed on the web page it would convert like this.

'open the .dll
Open "USBm.dll" for dll as #micro

'find device
CallDll #micro, "USBm_FindDevices", w as long, Result as long
if w then
    print "Device number ";w;" is open"
else
    print "Device not found"
    end
end if

'initiate the ports on device w
CallDll #micro, "USBm_InitPorts", w as long, Result as long

'open the .dll

Open "USBm.dll" for dll as #micro

'find device

CallDll #micro, "USBm_FindDevices", w as long, Result as long

if w then

print "Device number ";w;" is open"

else

print "Device not found"

end

end if

'initiate the ports on device w

CallDll #micro, "USBm_InitPorts", w as long, Result as long

Easy peasy.

Leave a Reply Cancel reply