Saving RFID Data

[skimask]

Hi
Yes I now what is happen the rfid send ascii,the pic receive the ascii and convert all the characters in decimal values 0 is 30 ,4 is 34 and so on.
Than I have more than 8 bytes I have 16 bytes.
I must now convert the decimals in hex,while i need hex data.
I try with hex but dont work!
Regards Pesti

Re-Read Post #16...then refer to your PBP on the proper use of SERIN/SEROUT/(etc) available modifiers and you WILL have your answer. I understand what you want, but I'm not going to give you the answer you need because you have all of the resources you need to get that answer...and you might learn something.

[Pesticida]

Sorry Skimask!

When I have 30 34 30 31 thats mean i need a modifier with 4 to have 04 and 01.

Regards Pesti

[skimask]

Sorry Skimask!
When I have 30 34 30 31 thats mean i need a modifier with 4 to have 04 and 01.
Regards Pesti

Yes, I know...and your answer awaits...

[Pesticida]

Hi,:-)

I Use this:

DEBUGIN [WAIT("E0"),dec4 Daten[14], dec4 Daten[13], dec4 Daten[12], dec4 Daten[11], dec4 Daten[10], dec4 Daten[9], dec4 Daten[8],dec4 Daten[7], dec4 Daten[6], dec4 Daten[5], dec4 Daten[4], dec4 Daten[3], dec4 Daten[2], dec4 Daten[1],dec4 Daten[0]]

While DEBUGIN more fast is,but i have now more bytes this is not what I want.

And that with Raw data what you have mean is working: :-)

HSEROUT ["E0",Daten[14], Daten[13],Daten[12], Daten[11], Daten[10], Daten[9], Daten[8], Daten[7], Daten[6], Daten[5], Daten[4], Daten[3], Daten[2], Daten[1],Daten[0],13,10]

What is if I use instead dec4 hex modifier,can I reduce my bytes!?

Thank you Skimask

Regards Pesti

[Pesticida]

This is the Solution :-)

DEBUGIN [WAIT("E0"),Daten[13],Daten[12],Daten[11], Daten[10], Daten[9],Daten[8], Daten[7],Daten[6], Daten[5], Daten[4], Daten[3], Daten[2], Daten[1], Daten[0]]
Pause 50
for N = 13 to 1 step - 2
Daten[N]= ((Daten[N]-$30) *10) + (Daten[N-1]-$30)
Pause 5
next N
High Led_Tag
Gosub ReadTime
Gosub Read_BCD

HSEROUT ["E0",hex2 Daten[13],hex2 Daten[11],hex2 Daten[9],hex2 Daten[7],hex2 Daten[5],hex2 Daten[3],hex2 Daten[1],13,10]

Regards Pesti

[skimask]

That wasn't quite the solution I was going for, but what you've got will work just fine.

One thiing to note...in the first line below:

Daten[N]= ((Daten[N]-$30) *10) + (Daten[N-1]-$30)

You might want to put in some code for checking an out-of-bounds condition.

[Pesticida]

Hi Skimask,

What you mean with out of bond!?

Did you mean when I receive a wrong character.

Regards Pesti