DEC-to-BCD and BCD-to-DEC conversions
Posted: Thu Feb 16, 2017 10:01 am
In the process of working on a new Driver Tutorial for the ESPBasic Series I am looking today to implement some Decimal-to-BCD and BCD-to-Decimal subroutines.
What I have done so far:
1. BCD-to-Decimal subroutine:
2. Decimal-to-BCD subroutine:
If you have any other idea please feel free to share it, looking forward to see smarter solutions that that. I'm sure they are!
Happy breadboarding,
TJ.
Original Article with Test Program Code: ESPBasic Series - DEC to BCD and BCD to DEC conversions
What I have done so far:
1. BCD-to-Decimal subroutine:
Code: Select all
[DEC]
hv = val >> 4
hl = val and 15
val = hv*10 + hl
wait
2. Decimal-to-BCD subroutine:
Code: Select all
[BCD]
d = int( val / 10 )
d1 = d * 10
d2 = val - d1
val = d*16 + d2
wait
If you have any other idea please feel free to share it, looking forward to see smarter solutions that that. I'm sure they are!
Happy breadboarding,
TJ.
Original Article with Test Program Code: ESPBasic Series - DEC to BCD and BCD to DEC conversions