93 lines
2.4 KiB
OpenEdge ABL
93 lines
2.4 KiB
OpenEdge ABL
VERSION 1.0 CLASS
|
|
BEGIN
|
|
MultiUse = -1 'True
|
|
Persistable = 0 'NotPersistable
|
|
DataBindingBehavior = 0 'vbNone
|
|
DataSourceBehavior = 0 'vbNone
|
|
MTSTransactionMode = 0 'NotAnMTSObject
|
|
END
|
|
Attribute VB_Name = "clsDEBUG"
|
|
Attribute VB_GlobalNameSpace = False
|
|
Attribute VB_Creatable = True
|
|
Attribute VB_PredeclaredId = False
|
|
Attribute VB_Exposed = False
|
|
Option Explicit
|
|
|
|
Public Length As Byte
|
|
Public AppCODE As Byte
|
|
Public Counter As Byte
|
|
Public RadioAdr As Currency
|
|
Public Debug_Type As Byte
|
|
Public Meter_Type As Byte
|
|
Public Radio_Fw_Version As Byte
|
|
Public Fw_Version As Byte
|
|
Public Fw_Revision As Long
|
|
Public Hw_Version As Byte
|
|
Public Factory_State As Byte
|
|
Public PCB_ID As Currency
|
|
Public Temperature As Byte
|
|
Public Battery_Voltage As Long
|
|
Public Wake_Up_Interval As Byte
|
|
|
|
Public TxPower_Level_Sensus_RF As Byte
|
|
|
|
Public TxPower_Level_Flexnet As Byte
|
|
Public Frequency_Offset As Long
|
|
|
|
Public Reboot_Count As Byte
|
|
|
|
Public Watchdog_Count As Byte
|
|
Public Battery_Seconds As Currency
|
|
Public Meter_Sample_rate As Byte
|
|
Public History_Scale As Byte
|
|
Public Register_Mode As Byte
|
|
Public History_Size As Byte
|
|
Public Factory_calibration As Byte
|
|
Public Meter_Size As Byte
|
|
Public Volume_Per_LED_Pulse As Currency
|
|
Public Volume_Per_pulse As Currency
|
|
Public Offset_Factor As Currency
|
|
Public Offset_Time As Byte
|
|
Public A_CRC_MSB As Byte
|
|
Public A_CRC_LSB As Byte
|
|
|
|
|
|
Public Sub Decode(ByRef arbytes() As Byte)
|
|
Length = arbytes(7)
|
|
AppCODE = arbytes(8)
|
|
Counter = arbytes(9)
|
|
RadioAdr = NumberFromByteArray(arbytes, 10, 13)
|
|
Debug_Type = arbytes(14)
|
|
Meter_Type = arbytes(15)
|
|
Radio_Fw_Version = arbytes(16)
|
|
Fw_Version = arbytes(17)
|
|
Fw_Revision = NumberFromByteArray(arbytes, 18, 19)
|
|
Hw_Version = arbytes(20)
|
|
Factory_State = arbytes(21)
|
|
PCB_ID = NumberFromByteArray(arbytes, 22, 25)
|
|
Temperature = arbytes(26)
|
|
Battery_Voltage = NumberFromByteArray(arbytes, 27, 28)
|
|
Wake_Up_Interval = arbytes(29)
|
|
TxPower_Level_Sensus_RF = arbytes(30)
|
|
TxPower_Level_Flexnet = arbytes(31)
|
|
Frequency_Offset = NumberFromByteArray(arbytes, 30, 31)
|
|
|
|
' Reboot_Count
|
|
' Watchdog_Count
|
|
' Battery_Seconds
|
|
' Meter_Sample_rate
|
|
' History_Scale
|
|
' Register_Mode
|
|
' History_Size
|
|
' Factory_calibration
|
|
' Meter_Size
|
|
' Volume_Per_LED_Pulse
|
|
' Volume_Per_pulse
|
|
' Offset_Factor
|
|
' Offset_Time
|
|
' A_CRC_MSB
|
|
' A_CRC_LSB
|
|
End Sub
|
|
|
|
|