B4R Question To and from 32bit float

[peacemaker]

Hi, All

MODBUS data exchange, it was mentioned for Android here: https://www.b4x.com/android/forum/t...nt-number-into-bytes-and-reassemble-it.42254/

But how to make it in B4R ? Bytes to 32bit float, and back.
And Little-endian and Big-endian 32bit also...

 

[peacemaker]

SOLVED:

'the digit is devided to the devider
Sub FourBytesTo32bitFloat(FourBytes() As Byte, Divider As UInt) As Float
    Dim Swapped(4) As Byte
    Swapped(0) = FourBytes(1)
    Swapped(1) = FourBytes(0)
    Swapped(2) = FourBytes(3)
    Swapped(3) = FourBytes(2)
    Dim b(4) As Byte
    Dim bc as ByteConverter
    bc.ArrayCopy2(Swapped, 0, b, 0, 4)
    Dim d() As Double = bc.DoublesFromBytes(b)
    Dim res As Float = d(0) / Divider
    Return res
End Sub

 

[peacemaker]

p.s. @emexes is really right that ByteConverter has .LittleEndian flag, Swapping bytes is not needed for B4A, B4J, B4i.
But not for B4R.