BcdDec()

BcdDec() converts a packed 16 Bit BCD value (4 Decimals) into a 16 Bit Integer value (word) resp. a packed 8 Bit BCD value (2 Decimals) into an 8 Bit Integer value (byte).

Syntax: word = BcdDec(a as word)

Example:

  dim a as byte
  dim b as word
  a=Bcdenc(23)
  b=Bcdenc(2342)
  a = BcdDec(a)
  b = BcdDec(b)