B4J Question Negative value from HEX

teddybear said:

The first bit is the sign bit, that is, the first hex number is 8-F, the value is a negative, the number = number - 2^32.
it should be 4038068830-4294967296=-256898466‬

Click to expand...

Declan said:

Yes, many thanks.
How would I calculate this in B4J?

Click to expand...

    Dim Latitude As Int = 0x10D27FBC
    Dim Longitude As Int = 0xF0B00A5E
    Log(Latitude)  '282230716
    Log(Longitude) '-256898466

teddybear said:

In B4J it just is a sign int

B4X:

    Dim Latitude As Int = 0x10D27FBC
    Dim Longitude As Int = 0xF0B00A5E
    Log(Latitude)  '282230716
    Log(Longitude) '-256898466

Click to expand...

(NumberFormatException) java.lang.NumberFormatException: For input string: "10D2831F"

Declan said:

Great, it works
But I get this error:

B4X:

(NumberFormatException) java.lang.NumberFormatException: For input string: "10D2831F"

I must have the 0x before the 10D2831F (0x10D2831F)

Click to expand...

    Dim bc As ByteConverter
    Dim b() As Byte=bc.HexToBytes("F0B00A5E")
    Dim Longitude() As Int=bc.IntsFromBytes(b)
    Log(Longitude(0))

teddybear said:

If you want to use a hexstring as input, you should convert the hexstring to int

B4X:

    Dim bc As ByteConverter
    Dim b() As Byte=bc.HexToBytes("F0B00A5E")
    Dim Longitude() As Int=bc.IntsFromBytes(b)
    Log(Longitude(0))

Click to expand...

                Dim myLon As String
                myLon = raw.SubString2(66,74)
                
                Dim bc As ByteConverter
                Dim b() As Byte=bc.HexToBytes(myLon)
                Dim Longitude() As Int=bc.IntsFromBytes(b)
                Log(Longitude(0))

B4J Version: 9.80
Parsing code.    (0.01s)
    Java Version: 14
Building folders structure.    (0.02s)
Compiling code.    Error
Error compiling program.
Error description: Current declaration does not match previous one.
Previous: {Type=Int,Rank=0, RemoteObject=True}
Current: {Type=Int,Rank=1, RemoteObject=True}
Error occurred on line: 212
Dim Longitude() As Int=bc.IntsFromBytes(b)

Declan said:

I have the following:

B4X:

                Dim myLon As String
                myLon = raw.SubString2(66,74)
               
                Dim bc As ByteConverter
                Dim b() As Byte=bc.HexToBytes(myLon)
                Dim Longitude() As Int=bc.IntsFromBytes(b)
                Log(Longitude(0))

I get the following error on compile:

B4X:

B4J Version: 9.80
Parsing code.    (0.01s)
    Java Version: 14
Building folders structure.    (0.02s)
Compiling code.    Error
Error compiling program.
Error description: Current declaration does not match previous one.
Previous: {Type=Int,Rank=0, RemoteObject=True}
Current: {Type=Int,Rank=1, RemoteObject=True}
Error occurred on line: 212
Dim Longitude() As Int=bc.IntsFromBytes(b)

Click to expand...

                Dim myLat As String
                Dim myLon As String
                myLat = raw.SubString2(58,66)
                myLon = raw.SubString2(66,74)
                    
                Dim b() As Byte=bc.HexToBytes(myLat)
                Dim Latitude() As Int=bc.IntsFromBytes(b)
                Log(Latitude(0))

                Dim b() As Byte=bc.HexToBytes(myLon)
                Dim Longitude() As Int=bc.IntsFromBytes(b)
                Log(Longitude(0))

                Log("Latitude: " & Latitude(0))
                Log("Longitude: " & Longitude(0))