Division von 32 Bitzahl durch Subtraktion

[Lukas G. (lukas88)]

Hallo users,

Für eine Geschwindigkeitsmessung/Berechnung brauche ich eine Division. 
Nähmlich den Radumfang von 216.769893cm durch die gemessene Zeit 
200.7040ms das Resultat wird alle 1 sec per UART gesendet...

Meine momentaner testcode zur division:

;Register

.def    mcover  = r16 ; Mainclock overflow bei 1 sec (255)
.def    t1      = r17 ; temp Register
.def    stat    = r18 ; Statusregister
.def    z2      = r19 ; Timer für Warteschleifen
.def    z3      = r20 ; Impulszähler
.def    zeichen = r21 ; UART senderegister
.def    mcl     = r24 ; Mainclock low
.def    mch     = r25 ; Mainclock high


;Konstanten
.equ    PD          = PORTD
.equ    DD          = DDRD

.equ    PB          = PORTB
.equ    DB          = DDRB

.equ    F_CPU       = 4000000 ; Systemtakt in Hz
.equ    BAUD        = 9600    ; Baudrate




; Berechnungen 
.equ UBRR_VAL   = ((F_CPU+BAUD*8)/(BAUD*16)-1)  ; clever runden
.equ BAUD_REAL  = (F_CPU/(16*(UBRR_VAL+1)))     ; Reale Baudrate
.equ BAUD_ERROR = ((BAUD_REAL*1000)/BAUD-1000)  ; Fehler in Promille
 
.if ((BAUD_ERROR>10) || (BAUD_ERROR<-10))       ; max. +/-10 Promille Fehler
  .error "Systematischer Fehler der Baudrate grösser 1 Prozent und damit zu hoch!"
.endif

;Vektoren
.org 0x0000
    rjmp    configurations
.org 0x0004
    rjmp    timer2_overflow

;Interrupts


    
timer2_overflow:

    cpi         mcl,low(15625)
    brsh        highbit
    rjmp        next_i
highbit:
    cpi         mch,high(15625)
    brsh        one_second_done
    rjmp        next_i
one_second_done:
    ldi         stat,1
    cbi         PB,1
    cpi         mcover,255 ; Maximal 255 sekunden (4.25 min)
    breq        mcover_zero
    inc         mcover
    rjmp        set_zero
mcover_zero:
    clr         mcover
    inc         mcover
set_zero:
    ldi         mcl,low(1) ; Mainclock zähler auf 1
    ldi         mch,high(0)
    sbi         PB,1
next_i:
    adiw        mcl,1
reti

;Sprungprgramme:

   
lcd_number16:
; Million

; Million

lcd_100mil:

        ldi     t1, '0'-1
lcd_mil100:
        inc     t1
        subi    R26,low(100000000)
        sbci    R27,BYTE2(100000000)
        sbci    R28,BYTE3(100000000)
        sbci    R29,BYTE4(100000000)
        brcc    lcd_mil100
        subi    R26,low(-100000000)
        sbci    R27,BYTE2(-100000000)
        sbci    R28,BYTE3(-100000000)
        sbci    R29,BYTE4(-100000000)
        mov     zeichen,t1
        rcall   serout


lcd_10mil:

        ldi     t1, '0'-1
lcd_mil10:
        inc     t1
        subi    R26,low(10000000)
        sbci    R27,BYTE2(10000000)
        sbci    R28,BYTE3(10000000)
        sbci    R29,BYTE4(10000000)
        brcc    lcd_mil10
        subi    R26,low(-10000000)
        sbci    R27,BYTE2(-10000000)
        sbci    R28,BYTE3(-10000000)
        sbci    R29,BYTE4(-10000000)
        mov     zeichen,t1
        rcall   serout

lcd_mil:

        ldi     t1, '0'-1
lcd_mil1:
        inc     t1
        subi    R26,low(1000000)
        sbci    R27,BYTE2(1000000)
        sbci    R28,BYTE3(1000000)
        sbci    R29,BYTE4(10000000)
        brcc    lcd_mil1
        subi    R26,low(-1000000)
        sbci    R27,BYTE2(-1000000)
        sbci    R28,BYTE3(-1000000)
        sbci    R29,BYTE4(-10000000)
        mov     zeichen,t1
        rcall   serout



; Hunderttausender
lcd_ht:

        ldi     t1, '0'-1

lcd_ht1:
        inc     t1
        subi    R26,low(100000)
        sbci    R27,BYTE2(100000)
        sbci    R28,BYTE3(100000)
        brcc    lcd_ht1
        subi    R26,low(-100000)
        sbci    R27,BYTE2(-100000)
        sbci    R28,BYTE3(-100000)
        mov     zeichen,t1
        rcall   serout

zt:
; ** Zehntausender **
           ldi   t1, '0'-1
lcd_number1:
           inc   t1
           subi  R26, low(10000)
           sbci  R27, high(10000)
           sbci  R28, BYTE3(10000)
           brcc  lcd_number1
           subi  R26, low(-10000)
           sbci  R27, high(-10000)
           sbci  R28, BYTE3(-10000)
           mov   zeichen,t1
           rcall serout
          
 
; ** Tausender **
           ldi   t1, '0'-1
lcd_number2:
           inc   t1
           subi  R26, low(1000)
           sbci  R27, high(1000)
           brcc  lcd_number2
           subi  R26, low(-1000)
           sbci  R27, high(-1000)
           mov   zeichen,t1
           rcall serout
           
 
; ** Hunderter **
           ldi   t1, '0'-1
lcd_number3:
           inc   t1
           subi  R26, low(100)
           sbci  R27, high(100)
           brcc  lcd_number3
           subi  R26, (-100)
           mov   zeichen,t1          ; + 100 High-Byte nicht mehr erforderlich
           rcall serout
           
 
; ** Zehner **
           ldi   t1, '0'-1
lcd_number4:
           inc   t1
           subi  R26, 10
           brcc  lcd_number4
           subi  r26, -10
           mov   zeichen,t1
           rcall serout
        
 
; ** Einer **
           ldi   t1, '0'
           add   t1, R26
           mov   zeichen,t1
           rcall serout

           ldi  zeichen,0x7C
           rcall serout

serout:

    sbis    UCSRA,UDRE                  ; Warten bis UDR für das nächste
                                        ; Byte bereit ist
    rjmp    serout
    out     UDR, zeichen
    ret  ; zurück zum Hauptprogramm


divi:

divid_init:

    push    R24
    push    R25
    push    R26
    push    R27

    push    R28
    push    R29
    push    R30
    push    R31
   
    ldi     R24,low(216769893)
    ldi     R25,BYTE2(216769893)
    ldi     R26,BYTE3(216769893)
    ldi     R27,BYTE4(216769893)


    ldi     R28,low(2007040)
    ldi     R29,BYTE2(2007040)
    ldi     R30,BYTE3(2007040)
    ldi     R31,BYTE4(2007040)

    ldi     t1,'0'-1
   
div_1:
    inc     t1
    sub     R24,R28
    sbc     R25,R29
    sbc     R26,R30
    sbc     R27,R31
    brcc    div_1
    mov     R26,t1
    clr     R27
    clr     R28
    clr     R29
    rcall   lcd_number16

    pop     R31
    pop     R30
    pop     R29
    pop     R28

    pop     R27
    pop     R26
    pop     R25
    pop     R24

    
    ldi     stat,0
    rjmp    main

brucke:
    rjmp    divi
    

configurations:

    ldi         t1,HIGH(RAMEND) ;Stackpointer HIGH
    out         SPH,t1

    ldi         t1,LOW(RAMEND)  ;Stackpointer LOW
    out         SPL,t1
    
    ldi         t1,0x00 ;PortD als Eingang
    out         DD,t1

    ldi         t1,0xFF ;Pullups PortD aktivieren 
    out         PD,t1   

    ldi         t1,0xFF ;PortB als Ausgang
    out         DB,t1

    ldi         t1,0xFF ;PortB Pullups deaktiviert
    out         PB,t1

    ldi         t1,(1<<ISC01)|(1<<ISC00) ; Interrupt auf steigende flanke
    out         MCUCR,t1

    ldi         t1, HIGH(UBRR_VAL)
    out         UBRRH, t1
    ldi         t1, LOW(UBRR_VAL)
    out         UBRRL, t1
 
    ldi         t1,(1<<URSEL)|(1<<UCSZ1)|(1<<UCSZ0) ;Senden aktivieren UART
    out         UCSRC,t1
    
    sbi         UCSRB,TXEN
    

    ldi         t1,(0<<CS22)|(0<<CS21)|(1<<CS20) ; Timer2 teiler  1
    out         TCCR2,t1

    ldi         t1,(1<<TOIE2) ; Interrupt bei Timer Interrupt
    out         TIMSK,t1

    ldi         mcl,low(1) ; Mainclock zähler mit 1 vorladen
    ldi         mch,high(0)
       
    sei ; Aktiviere Interrupts
    
main:
    cpi         stat,1
    breq        brucke
    rjmp        main

Nun zum eigentlichen Problem. Bei der Ausgabe beim UART ist der Wert um 
48 zu hoch. Also anstatt 108 bekomme ich 156. Bis jetzt habe ich noch 
nicht nachvollziehen können ,WO sich diese 48 dazuaddieren...

Hab schon gedacht das der Timer mir die Zahlen durcheinander bringt, da 
ich die selben Register verwende, aber ist auch ohne Aktivierten Timer 
so.


Man könnte zwar jedes mal 48 subtrahieren, das wäre das Resultat auch 
korrekt, möchte aber schon wissen, woran es liegt...

mfg Wukas

[Nase (Gast)]

Lukas G. schrieb:
> das Resultat wird alle 1 sec per UART gesendet...

Am Rande: Geht es dir explizit darum, in Assembler zu programmieren? 
Falls nicht, würde ich das angesichs der geforderten atemberaubenden 
Performance von 1 Übertragung/Sekunde in drei Zeilen C verpacken, 
einschließlich printf().

[Yalu X. (yalu) (Moderator)]

Lukas G. schrieb:
> ldi     t1,'0'-1

Der ASCII-Code von '0' ist 48.

Dämmert was? :)

[Lukas G. (lukas88)]

Yalu X. schrieb:
> Der ASCII-Code von '0' ist 48.
>
> Dämmert was? :)

Jep, es lag daran. War ja echt trivial. Sch wieder was gelernt...
 Danke vielmals

mfg Lukas

[Lukas G. (lukas88)]

Nase schrieb:
> Am Rande: Geht es dir explizit darum, in Assembler zu programmieren?


Nein, aber ich habe mehr Erfahrung mit Assembler aus als mit C