Отправлено Russ 17 августа 2005 г. 01:26 В ответ на: Я его тебе на мыло кинул, будь добр запости, мож пригодиться кому отправлено Russ 17 августа 2005 г. 01:20

Регистры: Temp int8, делимое rrrr0 int32, делитель rrrr4 int32,
частное rrrr8 int32, остаток rrrr12 int32.
32-> Temp
0 -> rrrr12
:L1
< rrrr8 //сдвигаем частное влево
< rrrr0 < //сдвигаем делимое влево через С
< rrrr12 < //сдвигаем остаток влево через С
rrrr12 < rrrr4 ? если меньше переходим на L2
rrrr8++ // прибавляем к частному 1
rrrr12-rrrr4
:L2
Temp-1
Temp=0 ? //если равно выход, если нет, переход на L1
фсе
ret