9 Bit binär in ASCII

[Rudi D. (rulixa)]

Hier Beitrag "8 Bit binär zu ASCII"
hat Peter Danegger seine wirklich extrem kurze Routine vorgestellt.
Nun, ich brauchte sie bis über 255 hinaus bis max. 999

Ich hätte ja auch BIN2BCD nehmen können und dann in ASCII wandeln 
können.
Aber peda's Routine ist so Spitze, dass ich sie als Basis genommen habe 
und damit Respekt ausdrücken möchte.

;********fast 8bit_in_ASCII *** max 999dez ****************
;input:  wo_lo,wo_hi = 16 bit Wert, 
;output: ASCII-digits wie von peda
;RX6=  Hunderter
;RX5=  Zehner
;RX4=  Einer
.def   wo_hi  = r29
.def   wo_lo  = r28
.equ  _100 = 0x0064

byte_asc: 
        ldi    RX6, -1 + '0'  ;gleich in ASCII , -1 wegen 1.inc RX6
_bcd1:  inc    RX6          
        subi   wo_lo, low(_100)  ;subi 100, in 16 bit
  sbci   wo_hi, high(_100)  
  brcc   _bcd1    ;so die Hunderter stimmen
              ;Rest ist minus, darum müssen die Zehner
        ldi     RX5, 10 + '0'  ;von 10 runtergezählt werden, bis Rest
_bcd2:  dec     RX5    ;wieder pos. wird, was die Einer sind
        subi    wo_lo, -10  ;also addiere 10 auf, wo_hi ist schon NULL 
        brcs    _bcd2
        sbci    wo_lo, -'0'  ;Einer nach ASCII wandeln
  mov  RX4,wo_lo  ;und nach RX4 bringen
        ret

Bei Nutzung von fertigen Routinen wäre die Vorbereitung länger als der 
Code oberhalb.
LG Rudi

[Tom Thomsen (Gast)]

Rudi D. schrieb:
> 9 Bit binär in ASCII
>
> Nun, ich brauchte sie bis über 255 hinaus bis max. 999

Da werden 9 Bit nicht reichen.

[Joachim B. (jar)]

Tom Thomsen schrieb:
> Da werden 9 Bit nicht reichen

war 9 Bit nicht mal was 512 Farben?

[Carl D. (jcw2)]

Fehlen noch 487.

[Rudi D. (rulixa)]

Tom Thomsen schrieb:
> Rudi D. schrieb:
>> 9 Bit binär in ASCII
>>
>> Nun, ich brauchte sie bis über 255 hinaus bis max. 999
>
> Da werden 9 Bit nicht reichen.

2^9,96 =+- 996 reicht euch das jetzt?