global.bas

16 relay output channels and 16 isolated digital input channels LED indicators to show activated

Attribute VB_Name = "Module2"
Global Const MaxEntries = 255
Global Const MaxAIChl = 8
Global DeviceHandle As Long
Global ptDevGetFeatures As PT_DeviceGetFeatures
Global lpDevFeatures As DEVFEATURES
Global devicelist(0 To MaxEntries) As PT_DEVLIST
Global SubDevicelist(0 To MaxEntries) As PT_DEVLIST
Global ErrCde As Long
Global szErrMsg As String * 80
Global bRun As Boolean

Global ptAIGetConfig As PT_AIGetConfig
Global ptTCMuxRead As PT_TCMuxRead
Global BurnOutSupport As Boolean

Global BurnOutProperty(0 To MaxAIChl - 1) As Long