Saving RFID Data


Closed Thread
Results 1 to 27 of 27

Hybrid View

  1. #1


    Did you find this post helpful? Yes | No

    Default

    Sorry Skimask!

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

    Regards Pesti

  2. #2
    skimask's Avatar
    skimask Guest


    Did you find this post helpful? Yes | No

    Default

    Quote Originally Posted by Pesticida View Post
    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...

  3. #3


    Did you find this post helpful? Yes | No

    Default

    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

  4. #4


    Did you find this post helpful? Yes | No

    Default

    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

  5. #5
    skimask's Avatar
    skimask Guest


    Did you find this post helpful? Yes | No

    Default

    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:
    Quote Originally Posted by Pesticida View Post
    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.

  6. #6


    Did you find this post helpful? Yes | No

    Default

    Hi Skimask,

    What you mean with out of bond!?

    Did you mean when I receive a wrong character.

    Regards Pesti

  7. #7
    skimask's Avatar
    skimask Guest


    Did you find this post helpful? Yes | No

    Default

    Quote Originally Posted by Pesticida View Post
    Hi Skimask,
    What you mean with out of bond!?
    Did you mean when I receive a wrong character.
    Regards Pesti
    What happens if you get a character that you weren't expecting? One with a value too low or too high...

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

    What happens if the value in 'Daten[N]' or 'Daten[N-1] is $30? is $20? is $0?

Similar Threads

  1. Using Nokia LCD
    By BobP in forum mel PIC BASIC Pro
    Replies: 300
    Last Post: - 3rd May 2018, 04:47
  2. Read/Write Problem
    By Tobias in forum mel PIC BASIC Pro
    Replies: 1
    Last Post: - 10th February 2010, 01:51
  3. Big characters on HD44780 4x20
    By erpalma in forum mel PIC BASIC Pro
    Replies: 23
    Last Post: - 7th January 2007, 02:21
  4. LCD + bar graph
    By DynamoBen in forum mel PIC BASIC Pro
    Replies: 13
    Last Post: - 5th October 2005, 14:50
  5. Sinus calculating !
    By Don Mario in forum mel PIC BASIC Pro
    Replies: 29
    Last Post: - 28th November 2004, 23:56

Members who have read this thread : 0

You do not have permission to view the list of names.

Posting Permissions

  • You may not post new threads
  • You may not post replies
  • You may not post attachments
  • You may not edit your posts