Bin --> BCD

[Julien (Gast)]

Hallo zusammen..

Habe hier eine methode für eine binär BCD Codierung.
Der Code funktioniert, ist aber meines erachtens noch einfacher zu 
schreiben.

Also wer hier noch verbesserungen hat kann diese gerne mit einbringen.

benötigte Register:

r16
r17
r18

XL
XH

Hier der CODE:

start:

  clr temp
  clr tempL
  clr tempH

hundert:

  SUBI XL, low(100)
  SBCI XH, high(100)
  BRMI 10korrektur
  inc tempH
  rjmp hundert

10korrektur:

  SUBI XL, -100

zehn:

  SUBI XL, 10
  BRMI einer
  inc tempL
  rjmp zehn

einer:
  SUBI XL, -10
  ADD temp, XL

Viel Spaß Julien

[Reinhard (Gast)]

Hallo!

Für 8bit verwende ich diesen Code (8051er). Bitte macht mich darauf
aufmerksam, falls er einen Fehler enthält. Aber eigentlich fahr ich
ganz gut damit.

HEX_TO_BCD:
mov  B,#10
div  AB
swap  A
orl  A,B
ret


mfg
Reinhard