ml
27 lines
575 B
Go
27 lines
575 B
Go
package numbers
|
|
|
|
// ToBinaryCodedDecimal converts given integer value to a 4-digit BCD value.
|
|
func ToBinaryCodedDecimal(value uint16) (bcd uint16) {
|
|
factors := []uint16{1000, 100, 10, 1}
|
|
value %= 10000
|
|
|
|
for _, factor := range factors {
|
|
bcd = (bcd << 4) | (value / factor)
|
|
value %= factor
|
|
}
|
|
|
|
return
|
|
}
|
|
|
|
// FromBinaryCodedDecimal converts given 4-digit BCD value into an integer.
|
|
func FromBinaryCodedDecimal(bcd uint16) (value uint16) {
|
|
factors := []uint16{1, 10, 100, 1000}
|
|
|
|
for _, factor := range factors {
|
|
value += (bcd & 0xF) * factor
|
|
bcd >>= 4
|
|
}
|
|
|
|
return
|
|
}
|