' ------------------------------------------------------------------------
'
'    LC4HSAPI.TXT -- LC4HS API Declarations for Visual Basic
'
'              Copyright (C) 2000 Production Robots Engineering Ltd
' ------------------------------------------------------------------------

Declare Function Lc4hsSetup Lib "Lc4hs" Alias "Lc4hsSetup" (ByVal hWnd As Long, ByVal DeviceName As String, ByVal CheckAddress As Long) As Long
Declare Function Lc4hsOpen Lib "Lc4hs" Alias "Lc4hsOpen" (ByVal DeviceName As String) As Long
Declare Function Lc4hsInit Lib "Lc4hs" Alias "Lc4hsInit" (ByVal Card As Long) As Long
Declare Function Lc4hsFinish Lib "Lc4hs" Alias "Lc4hsFinish" (ByVal Card As Long) As Long
Declare Function Lc4hsGetCardStatus Lib "Lc4hs" Alias "Lc4hsGetCardStatus" (ByVal Card As Long, ByRef CardStatus As Long) As Long
Declare Function Lc4hsGetCardVersion Lib "Lc4hs" Alias "Lc4hsGetCardVersion" (ByVal Card As Long, ByRef CardVersion As Long) As Long
Declare Function Lc4hsGetChannelStatus4 Lib "Lc4hs" Alias "Lc4hsGetChannelStatus4" (ByVal Card As Long, ByRef Status As Long) As Long
Declare Function Lc4hsGetChannelStatus Lib "Lc4hs" Alias "Lc4hsGetChannelStatus" (ByVal Card As Long, ByVal Channel As Long, ByRef Status As Long) As Long
Declare Function Lc4hsGetZeroAD4 Lib "Lc4hs" Alias "Lc4hsGetZeroAD4" (ByVal Card As Long, ByRef ZeroAD As Long) As Long
Declare Function Lc4hsGetZeroAD Lib "Lc4hs" Alias "Lc4hsGetZeroAD" (ByVal Card As Long, ByVal Channel As Long, ByRef ZeroAD As Long) As Long
Declare Function Lc4hsGetCurrentWeight4 Lib "Lc4hs" Alias "Lc4hsGetCurrentWeight4" (ByVal Card As Long, ByRef CurrentWeight As Single) As Long
Declare Function Lc4hsGetCurrentWeight Lib "Lc4hs" Alias "Lc4hsGetCurrentWeight" (ByVal Card As Long, ByVal Channel As Long, ByRef CurrentWeight As Single) As Long
Declare Function Lc4hsPollCurrentWeight4 Lib "Lc4hs" Alias "Lc4hsPollCurrentWeight4" (ByVal Card As Long, ByRef CurrentWeight As Single) As Long
Declare Function Lc4hsPollCurrentWeight Lib "Lc4hs" Alias "Lc4hsPollCurrentWeight" (ByVal Card As Long, ByVal Channel As Long, ByRef CurrentWeight As Single) As Long
Declare Function Lc4hsGetCurrentAD4 Lib "Lc4hs" Alias "Lc4hsGetCurrentAD4" (ByVal Card As Long, ByRef CurrentAD As Long) As Long
Declare Function Lc4hsGetCurrentAD Lib "Lc4hs" Alias "Lc4hsGetCurrentAD" (ByVal Card As Long, ByVal Channel As Long, ByRef CurrentAD As Long) As Long
Declare Function Lc4hsPollCurrentAD4 Lib "Lc4hs" Alias "Lc4hsPollCurrentAD4" (ByVal Card As Long, ByRef CurrentAD As Long) As Long
Declare Function Lc4hsPollCurrentAD Lib "Lc4hs" Alias "Lc4hsPollCurrentAD" (ByVal Card As Long, ByVal Channel As Long, ByRef CurrentAD As Long) As Long
Declare Function Lc4hsGetDigitalOutput Lib "Lc4hs" Alias "Lc4hsGetDigitalOutput" (ByVal Card As Long, ByVal BitNo As Long, ByRef Value As Long) As Long
Declare Function Lc4hsSetDigitalOutput Lib "Lc4hs" Alias "Lc4hsSetDigitalOutput" (ByVal Card As Long, ByVal BitNo As Long, ByVal Value As Long) As Long
Declare Function Lc4hsGetDigitalInput Lib "Lc4hs" Alias "Lc4hsGetDigitalInput" (ByVal Card As Long, ByVal BitNo As Long, ByRef Value As Long) As Long
Declare Function Lc4hsReadIO Lib "Lc4hs" Alias "Lc4hsReadIO" (ByVal Card As Long, ByRef IOData As Long) As Long
Declare Function Lc4hsGetErrorMsg Lib "Lc4hs" Alias "Lc4hsGetErrorMsg" (ByVal Code As Long, ByVal lpBuffer As String, ByVal nSize As Long) As Long

