bin2bcd & bcd2bin, 8-6-4 digits, double dabble algorithm

[Apollo M. (Firma: @home) (majortom)]

Wer es gebrauchen kann ... frisch aus meiner Giftküche!

... bin2bcd und bcd2bin, wahlweise 8,6 oder 4 Digits ohne mul/div/mod 
mit dem double dabble Algorithmus, wenn es schnell und mit kleinem 
Footprint sein soll.

https://en.wikipedia.org/wiki/Double_dabble

[Peter M. (Gast)]

Kann man so machen.
Ich mache das so:

uint16_t convtab[4]={10,100,1000,10000};

void tobcd(volatile uint8_t *p, uint_fast16_t val){
  
  uint_fast8_t i,res;
  volatile uint8_t *bp;
  
  register uint8_t sreg;
  
  sreg = SREG;
  asm("cli");
  
  // first clear old values
  // keep signs and double informations
  bp = p;
  for(i=0; i < (DISP_BUF_MAX/2); i++)
      *bp++ &= 0xf0;
  
    
  i= ((DISP_BUF_MAX/2) - 1);    // Number of digits minus 1
  
  do {
    i--;
    
    for(res=0; val >= convtab[i]; val -= convtab[i]){
      res++;
    }
    *p |= res;
    p++;
    
    
  } while(i);
  *p |= val;
  
  clear_leading_zero();
  SREG = sreg;
}

[Wilhelm M. (wimalopaan)]

Da die Größe des Flash auf µC meistens kein Problem ist, bietet sich 
eine Lösung mit 2/4 LUTs an und einer folgenden BCD-Addition.

[Apollo M. (Firma: @home) (majortom)]

Wilhelm M. schrieb:
> Da die Größe des Flash auf µC meistens kein Problem ist

Ich denke da eher an Pic16XXX mit 2-7 kWorte und werde nachdem klarer 
ist das/wie dieser funktioniert nun den Algorithmus auch in pic-as 
umsetzen.