Deleni na x51

[Martin Zaruba]

Mam  cislo DELENEC v rozsahu 0 - 255.
Mam cislo DELITEL v rozsahu 0 - 10 s presnosti na 1 desetinne misto,
zobrazene v 1 byte jako 0 - 100.
Potrebuji ziskat podil, zbytek neni dulezity. Vymyslel jsem toto, ale
pripada mi to desne slozite. Nenapada vas jak to udelat lepe?

mov a,DELENEC
 add a,#5
 mov b,#10
 div ab
 mov r0,a    ; pomocny delitel pro zbytek
 mov a,DELENEC
 mov b,DELITEL
 div ab
 mov r1,b    ; uchovat zbytek
 mov b,#10
 mul ab
 xch a,r1    ; podil do r1, zbytek z deleni do a
 mov b,r0    ; pomocny delitel pro zbytek
 div ab
 add a,r1    ; vysledek je v a




Martin Záruba