iOS Question iExternalAccessory ReadData

[mrossen]

Hi,

You can send data in text and hex format, but only recieve in hex format.

Is it possible to recieve in text format?

Thanks
Mogens

 

[Alberto Iglesias]

The protocol send to you a array of bytes, you can transform when arrived.

 

[mrossen]

Hi Alberto,

Thanks for your answer.

I have tried this

Dim d() As String
       
    d = Array As String(BytesReceived)
   
    Log(d.Length)

But i seems to get the same result as I read the BytesReceived string

How do I get the byte into the array right?

Mogens

 

[Alberto Iglesias]

Hi Alberto,

Thanks for your answer.

I have tried this

Dim d() As String
      
    d = Array As String(BytesReceived)
  
    Log(d.Length)

But i seems to get the same result as I read the BytesReceived string

How do I get the byte into the array right?

Mogens

Hi Mogens, Im in the street right now, but when I arrive in office I send to you a project I do

 

[Alberto Iglesias]

Hello again Mogens, look this example:

Sub objEA_ReadData(BytesReceived() As Byte)

     SU_Log("[objEA_ReadData]:Size => " & BytesReceived.Length)    
     Dim bc As ByteConverter

     Dim strDataHex As String = bc.HexFromBytes(BytesReceived)
    SU_Log("[objEA_ReadData]:Hex:" & strDataHex)    

     Dim strBytesDec As String 
     Dim strBytesAsc As String 
     For a = 0 To BytesReceived.Length-1
        strBytesAsc = strBytesAsc & Chr(BytesReceived(a)) & ","
        strBytesDec = strBytesDec & BytesReceived(a) & ","
     Next
    SU_Log("[objEA_ReadData]:BytesDec:" & strBytesDec)    
    SU_Log("[objEA_ReadData]:BytesAsc:" & strBytesAsc)    
     
 
End Sub

 

[mrossen]

Hello Alberto,

Thanks for the reply, but I still not get it to Work,

A screendumb with you code snip, with the error

Mogens

 

[Alberto Iglesias]

I dont know you spected receive! can you send me the bytes you reveive?

i want to help convert this

 

[mrossen]

Hi Alberto

This is a sample on what I recieve as string

[stream]:NSStreamEventHasBytesAvailable
-[B4iExternalAccessory _readData]
[_readData]:Bytes:1
[objEA_onStream]:NSStreamEventHasBytesAvailable
[objEA_ReadData]:<6f6c>
[stream]:NSStreamEventHasBytesAvailable
-[B4iExternalAccessory _readData]
[_readData]:Bytes:3
[objEA_onStream]:NSStreamEventHasBytesAvailable
[objEA_ReadData]:<6f6c7070 70>

Mogens

 

[Alberto Iglesias]

I think if your data is "6f6c707070" is correct?

Then you need to convert to hex then convert to ascii.

the first byte for example:
6F = 111 = "o"
6C = 108 = "l"
70 = 112 = "p"
70 = 112 = "p"
70 = 112 = "p"

Result: olppp

Check
https://www.branah.com/ascii-converter

 

[mrossen]

Hi Alberto,

That is correct.

But is there a way to get the data as array.

Now I have make the recieved into pairs and then convert to ascii.

But there another problem with that. In the string there i a space I have to deal with.

[objEA_ReadData]:<6f6c7070 70>

Any idea where that come from?

Mogens

 

[Alberto Iglesias]

is curious because I send like I got, a array of bytes, look the readdata inside:

   B4IArray* arr = [B4IArraynew];
   arr.bytesData = _readData;
   [B4IObjectWrapperraiseEventFromDifferentThread:self :@"_readdata:" :@[arr]];

I test with some devices and I get an array.

Wich device you testing?


I thought about creating a property for you to get the contents of readdata, but it would be the same, ie a B4iArray

 

[mrossen]

Hi Alberto,

I am testing with a RN-42 bluetooth module connected to a Cruise Control for a car we produce.

I have made the same app for android and it is working without problems.

In android I recieve characters like "olppp" and then convert from asciii to dec, and then I have my values.

When I use "Sub objEA_ReadData(BytesReceived() As Byte)" I can debug BytesReceived, but it looks like a string contains the hex values, not an array.

Mogens

 

[Alberto Iglesias]

ok... I will do some tests today in a device with Mfi I have and tell you all I receive in B4i.

I needed to fix some thing, don´t worry . I do today!

I´m in Spain GMT+3, I think you is in the same no time?

 

[mrossen]

Yes, I am in Copenhagen, Denmark

 

[Alberto Iglesias]

Look this video I do right now:


This is connected with SPHERO

Is working very well and receive bytes, not string.

after that I get this bytes and log it.

 

[mrossen]

Hi Alberto

How are you making this video. I will make one for you to see my content of the array

Mogens

 

[Alberto Iglesias]

I recording my screen with camtasia studio and to put my phone in screen, I used Reflector (http://www.airsquirrels.com/reflector/).

I create this library to use in our projects with cars too. I working in a project in PSA (Citroen/Peugeot).

 

[mrossen]

Hi Alberto,

I made screendumps from B4i

As you can see there is no differnce between byte and string

1. The way I think a array will be present

2. BytesReceived() As Byte

3. BytesReceived() As String

Mogens

 

[mrossen]

Another thing,

How do I clear the bytesreceived array ?

Mogens

 

[Alberto Iglesias]

Mogens, I little gift for you:

you have now 2 more events readData2 and readData3

Sub objEA_ReadData3(DecReceived() As String)
   
    Dim strDec As String
    For a = 0 To DecReceived.Length-1
       strDec = DecReceived(a)
        LogColor("strDec=" & strDec,Colors.Blue)
    Next

End Sub

Sub objEA_ReadData2(HexReceived() As String)
   
    Dim strHex As String
    For a = 0 To HexReceived.Length-1
        strHex = HexReceived(a)
        LogColor("strHex=" & strHex,Colors.Blue)
     Next
     
End Sub

Get the new version v1.0.3 in my Store

http://worknhouse.com/store/product...ble-and-customize-way-to-connect-mfi-devices/