BcdEnc()

BcdEnc() konvertiert einen 16 Bit Integerwert in einen gepackten 16 Bit Bcd-Wert (4 Dezimalstellen) bzw. einen 8 Bit Integerwert in einen gepackten 8 Bit Bcd-Wert (2 Dezimalstellen).

Syntax: byte = BcdEnc( a as word )

Beispiel:

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

Siehe auch: BcdDec(), Aufbau des BCD-Wertes