Subroutine 4stellige Zahl in 2 2stelligen Zahlen wandeln. was ist falsch?

[Olli R. (downunderthunder42)]

Hallo,

die angehängte Subroutine soll eine 4stellige Zahl in 2 2stellige Zahlen 
wandeln.

Irgenwo ist aber noch ein Fehler!

wenn ich die Zahl "2011" übergebe, kommt "02" und "C2" heraus?

[Spess53 (Gast)]

Hi

Formatiere erst mal deinen Code. Da verdirbt man sich ja die Augen.

Tabulatoren haben nichts im Quelltext zu suchen!

MfG Spess

[Olli R. (downunderthunder42)]

Ok ich habe mal den Code formatiert.
Werde ich in Zukunft mal besser drauf achten.

[Olli R. (downunderthunder42)]

Ok einen Fehler habe nun selbst gefunden:

ich habe zum Schluss

pop r18 geschrieben statt pop r16

[Spess53 (Gast)]

HI

>Ok ich habe mal den Code formatiert.
>Werde ich in Zukunft mal besser drauf achten.

Na, geht doch

>   ldi    r20, 10
>   mul    r16, r20                           ; multipliziere r16 (die
>   add    r16, r17                           ; add
>   mov    r19, r16                           ; kopiere die

Das Ergebnis einer Multiplikation ist in r1:r0.

Aber das kannst du dir sparen, wenn du nur durch 100 teilst.

MfG Spess

[Olli R. (downunderthunder42)]

Jo Danke,
jetzt geht's

[Spess53 (Gast)]

Hi

>Jo Danke,
>jetzt geht's

Wie gesagt, die Multiplikation ist eigentlich unnötig:

year_transform:
                     push   r17

                     clr    r17
                     rjmp year_transform_04
year_transform_03:
                     inc    r17
year_transform_04:
                     subi   r18, Low(100)
                     sbci   r19, High(100)
                     brcc   year_transform_03
                     subi   r18, -100
                     mov    r19, r16

                     pop    r17
                     ret

Der Code hat das gleiche Ergebnis.

MfG Spess

[Spess53 (Gast)]

Hi

Korrektur:

 mov r19, r16 ->  mov r19, r17

MfG Spess