constants.vb

汽车领can总线通讯程序

    Public Const XL_MOST_CTRL_TYPE_QUEUE_OVERFLOW = &H10
    Public Const XL_MOST_ASYNC_TYPE_QUEUE_OVERFLOW = &H11
    Public Const XL_MOST_CTRL_UNKNOWN_TYPE = &H12
    Public Const XL_MOST_CTRL_QUEUE_UNDERRUN = &H13
    Public Const XL_MOST_ASYNC_UNKNOWN_TYPE = &H14
    Public Const XL_MOST_ASYNC_QUEUE_UNDERRUN = &H15

    ' data for demanded timestamps
    Public Const XL_MOST_DEMANDED_START = 1

    Public Const XL_MOST_RX_DATA_SIZE = 1028
    Public Const XL_MOST_TS_DATA_SIZE = 12
    Public Const XL_MOST_RX_ELEMENT_HEADER_SIZE = 32
    Public Const XL_MOST_CTRL_RX_SPY_SIZE = 36
    Public Const XL_MOST_CTRL_RX_OS8104_SIZE = 28
    Public Const XL_MOST_SPECIAL_REGISTER_CHANGE_SIZE = 20
    Public Const XL_MOST_ERROR_EV_SIZE_4 = 4                           ' dwords
    Public Const XL_MOST_ERROR_EV_SIZE = 16                            ' bytes
    Public Const XL_MOST_BUS_STATISTIC_EV_SIZE = 48

    ' defines for the audio devices
    Public Const XL_MOST_DEVICE_CASE_LINE_IN = 0
    Public Const XL_MOST_DEVICE_CASE_LINE_OUT = 1
    Public Const XL_MOST_DEVICE_PC_LINE_OUT = 2
    Public Const XL_MOST_DEVICE_SPDIF_OUT = 3
    Public Const XL_MOST_DEVICE_BOTH_OUT = 4
    Public Const XL_MOST_DEVICE_PC_LINE_IN = 5
    Public Const XL_MOST_DEVICE_SPDIF_IN = 6

    ' defines for the XL_MOST_SYNC_MUTES_STATUS event
    Public Const XL_MOST_NO_MUTE = 0
    Public Const XL_MOST_MUTE = 1

    ' defines for the event sources in XLmostEvent
    Public Const XL_MOST_VN2600 = 1
    Public Const XL_MOST_OS8104A = 2
    Public Const XL_MOST_OS8104B = 4
    Public Const XL_MOST_SPY = 8

    ' defines for xlMostSetAllBypass and XL_MOST_ALLBYPASS
    Public Const XL_MOST_MODE_DEACTIVATE = 0
    Public Const XL_MOST_MODE_ACTIVATE = 1
    Public Const XL_MOST_MODE_FORCE_DEACTIVATE = 2

    Public Const XL_MOST_RX_BUFFER_CLEAR_ONCE = 2

    ' defines for xlMostSetTimingMode and the XL_MOST_TIMINGMODE_EV event.
    Public Const XL_MOST_TIMING_SLAVE = 0
    Public Const XL_MOST_TIMING_MASTER = 1


    ' defines for xlMostSetFrequency and the XL_MOST_FREQUENCY_EV event.
    Public Const XL_MOST_FREQUENCY_44100 = 0
    Public Const XL_MOST_FREQUENCY_48000 = 1
    Public Const XL_MOST_FREQUENCY_ERROR = 2

    ' defines for xlMostSetTxLight 
    Public Const XL_MOST_LIGHT_OFF = 0
    Public Const XL_MOST_LIGHT_FORCE_ON = 1                             ' unmodulated on
    Public Const XL_MOST_LIGHT_MODULATED = 2                            ' modulated light

    'defines for xlMostSetTxLightPower and the XL_MOST_TXLIGHT_POWER_EV event.
    Public Const XL_MOST_LIGHT_FULL = 3
    Public Const XL_MOST_LIGHT_3DB = 4

    ' defines for the XL_MOST
    Public Const XL_MOST_UNLOCK = 5
    Public Const XL_MOST_LOCK = 6
    Public Const XL_MOST_STATE_UNKNOWN = 9

    ' defines for the XL_MOST_CTRL_RX_OS8104 event (tx event)
    Public Const XL_MOST_TX_WHILE_UNLOCKED = &H80000000
    Public Const XL_MOST_TX_TIMEOUT = &H40000000
    Public Const XL_MOST_DIRECTION_RX = 0
    Public Const XL_MOST_DIRECTION_TX = 1

    Public Const XL_MOST_NO_QUEUE_OVERFLOW = 0
    Public Const XL_MOST_QUEUE_OVERFLOW = &H8000
    Public Const XL_MOST_COMMAND_FAILED = &H4000
    Public Const XL_MOST_INTERNAL_OVERFLOW = &H2000
    Public Const XL_MOST_MEASUREMENT_NOT_ACTIVE = &H1000
    Public Const XL_MOST_QUEUE_OVERFLOW_ASYNC = &H800
    Public Const XL_MOST_QUEUE_OVERFLOW_CTRL = &H400

    Public Const XL_MOST_NA_CHANGED = 1                             ' node address changed 
    Public Const XL_MOST_GA_CHANGED = 2                             ' group address changed 
    Public Const XL_MOST_APA_CHANGED = 4                            ' alternative packet address changed 
    Public Const XL_MOST_NPR_CHANGED = 8                            ' node position register changed 
    Public Const XL_MOST_MPR_CHANGED = &H10                         ' max position register changed 
    Public Const XL_MOST_NDR_CHANGED = &H20                         ' node delay register changed 
    Public Const XL_MOST_MDR_CHANGED = &H40                         ' max delay register changed 
    Public Const XL_MOST_SBC_CHANGED = &H80                         ' 
    Public Const XL_MOST_XTIM_CHANGED = &H100                       ' 
    Public Const XL_MOST_XRTY_CHANGED = &H200                       ' 

    ' defines for the MOST register (xlMostWriteRegister)
    Public Const XL_MOST_bGA = &H89                                    ' Group Address
    Public Const XL_MOST_bNAH = &H8A                                   ' Node Address High
    Public Const XL_MOST_bNAL = &H8B                                   ' Node Address Low
    Public Const XL_MOST_bSDC2 = &H8C                                  ' Source Data Control 2
    Public Const XL_MOST_bSDC3 = &H8D                                  ' Source Data Control 3
    Public Const XL_MOST_bCM2 = &H8E                                   ' Clock Manager 2
    Public Const XL_MOST_bNDR = &H8F                                   ' Node Delay
    Public Const XL_MOST_bMPR = &H90                                   ' Maximum Position
    Public Const XL_MOST_bMDR = &H91                                   ' Maximum Delay
    Public Const XL_MOST_bCM4 = &H93                                   ' Clock Manager 4
    Public Const XL_MOST_bSBC = &H96                                   ' Synchronous Bandwidth Control
    Public Const XL_MOST_bXSR2 = &H97                                  ' Transceiver Status 2

    Public Const XL_MOST_bRTYP = &HA0                                  ' Receive Message Type
    Public Const XL_MOST_bRSAH = &HA1                                  ' Source Address High
    Public Const XL_MOST_bRSAL = &HA2                                  ' Source Address Low
    Public Const XL_MOST_bRCD0 = &HA3                                  ' Receive Control Data 0 --> bRCD16 = bRCD0+16

    Public Const XL_MOST_bXTIM = &HBE                                  ' Transmit Retry Time
    Public Const XL_MOST_bXRTY = &HBF                                  ' Transmit Retries

    Public Const XL_MOST_bXPRI = &HC0                                  ' Transmit Priority
    Public Const XL_MOST_bXTYP = &HC1                                  ' Transmit Message Type
    Public Const XL_MOST_bXTAH = &HC2                                  ' Target Address High
    Public Const XL_MOST_bXTAL = &HC3                                  ' Target Address Low
    Public Const XL_MOST_bXCD0 = &HC4                                  ' Transmit Control Data 0 --> bXCD16 = bXCD0+16

    Public Const XL_MOST_bXTS = &HD5                                   ' Transmit Transfer Status

    Public Const XL_MOST_bPCTC = &HE2                                  ' Packet Control
    Public Const XL_MOST_bPCTS = &HE3                                  ' Packet Status

    ' defines 
    Public Const XL_MOST_SPY_RX_STATUS_NO_LIGHT = 1
    Public Const XL_MOST_SPY_RX_STATUS_NO_LOCK = 2
    Public Const XL_MOST_SPY_RX_STATUS_BIPHASE_ERROR = 4
    Public Const XL_MOST_SPY_RX_STATUS_MESSAGE_LENGTH_ERROR = 8
    Public Const XL_MOST_SPY_RX_STATUS_PARITY_ERROR = &H10
    Public Const XL_MOST_SPY_RX_STATUS_FRAME_LENGTH_ERROR = &H20
    Public Const XL_MOST_SPY_RX_STATUS_PREAMBLE_TYPE_ERROR = &H40
    Public Const XL_MOST_SPY_RX_STATUS_CRC_ERROR = &H80

    ' defines for status of async frames
    Public Const XL_MOST_ASYNC_NO_ERROR = 0
    Public Const XL_MOST_ASYNC_SBC_ERROR = &HC
    Public Const XL_MOST_ASYNC_NEXT_STARTS_TO_EARLY = &HD
    Public Const XL_MOST_ASYNC_TO_LONG = &HE

    Public Const XL_MOST_ASYNC_UNLOCK = &HF                           ' unlock occured within receiption of packet

    ' defines for XL_MOST_SYNC_PULSE_EV member trigger_source 
    Public Const SYNC_PULSE_EXTERNAL = 0
    Public Const SYNC_PULSE_OUR = 1

    ' ctrlType value within the XL_CTRL_SPY event 
    Public Const XL_MOST_CTRL_TYPE_NORMAL = 0
    Public Const XL_MOST_CTRL_TYPE_REMOTE_READ = 1
    Public Const XL_MOST_CTRL_TYPE_REMOTE_WRITE = 2
    Public Const XL_MOST_CTRL_TYPE_RESOURCE_ALLOCATE = 3
    Public Const XL_MOST_CTRL_TYPE_RESOURCE_DEALLOCATE = 4
    Public Const XL_MOST_CTRL_TYPE_GET_SOURCE = 5

    ' counterType for the xlMost****GenerateBusload function
    Public Const XL_MOST_BUSLOAD_COUNTER_TYPE_NONE = 0
    Public Const XL_MOST_BUSLOAD_COUNTER_TYPE_1_BYTE = 1
    Public Const XL_MOST_BUSLOAD_COUNTER_TYPE_2_BYTE = 2
    Public Const XL_MOST_BUSLOAD_COUNTER_TYPE_3_BYTE = 3
    Public Const XL_MOST_BUSLOAD_COUNTER_TYPE_4_BYTE = 4

    ' selection bits for xlMostGetDeviceStates / CMD_GET_DEVICE_STATE->selection_mask 
    Public Const XL_MOST_STATESEL_LIGHTLOCK = 1
    Public Const XL_MOST_STATESEL_REGISTERBUNCH1 = 2
    Public Const XL_MOST_STATESEL_BYPASSTIMING = 4
    Public Const XL_MOST_STATESEL_REGISTERBUNCH2 = 8
    Public Const XL_MOST_STATESEL_REGISTERBUNCH3 = &H10
    Public Const XL_MOST_STATESEL_VOLUMEMUTE = &H20
    Public Const XL_MOST_STATESEL_EVENTSOURCE = &H40
    Public Const XL_MOST_STATESEL_RXBUFFERMODE = &H80
    Public Const XL_MOST_STATESEL_ALLOCTABLE = &H100
    Public Const XL_MOST_STATESEL_SUPERVISOR_LOCKSTATUS = &H200
    Public Const XL_MOST_STATESEL_SUPERVISOR_MESSAGE = &H400

    ' defines MOST event size
    Public Const XL_MOST_EVENT_HEADER_SIZE = 32
    Public Const XL_MOST_EVENT_MAX_DATA_SIZE = 1024
    Public Const XL_MOST_EVENT_MAX_SIZE = (XL_MOST_EVENT_HEADER_SIZE + XL_MOST_EVENT_MAX_DATA_SIZE)

    ' Get String back of XL_HWTYPE
    Public Function GetHWTypeString(ByVal iHWType As Byte) As String
        Dim StrHWType As String
        Select Case iHWType
            Case XL_HWTYPE_VIRTUAL
                StrHWType = "Virtual"
            Case XL_HWTYPE_CANCARDX
                StrHWType = "CANcardX"
            Case XL_HWTYPE_CANCARDXL
                StrHWType = "CANcardXL"
            Case XL_HWTYPE_CANCARDY
                StrHWType = "CANcardY"
            Case XL_HWTYPE_CANCASEXL
                StrHWType = "CANcaseXL"
            Case XL_HWTYPE_CANBOARDXL
                StrHWType = "CANboardXL"
            Case XL_HWTYPE_CANBOARDXL_COMPACT
                StrHWType = "CANboardXL pxi"
            Case XL_HWTYPE_VN2600
                StrHWType = "VN2600"
            Case Else
                StrHWType = "No Hardware or Hardware unknown"
        End Select
        Return StrHWType
    End Function
End Module