add m8uH,mc8u
noad80: ror m8uH
ror m8uL
brcc noad81
add m8uH,mc8u
noad81: ror m8uH
ror m8uL
brcc noad82
add m8uH,mc8u
noad82: ror m8uH
ror m8uL
brcc noad83
add m8uH,mc8u
noad83: ror m8uH
ror m8uL
brcc noad84
add m8uH,mc8u
noad84: ror m8uH
ror m8uL
brcc noad85
add m8uH,mc8u
noad85: ror m8uH
ror m8uL
brcc noad86
add m8uH,mc8u
noad86: ror m8uH
ror m8uL
brcc noad87
add m8uH,mc8u
noad87: ror m8uH
ror m8uL
ret
;текст программы mpu8u_s, умножения 8-и разрядных целых знаковых чисел, Алгоритм Бауса
.include "1200def.inc"
.def mc8s =r16 ;множимое
.def mp8s =r17 ;множитель
.def m8sL =r17 ;младший байт результата
.def m8sH =r18 ;старший байт результата
.def mcnt8s =r19 ;счетчик цикла
mpu8s: sub m8sH,m8sH ;
ldi mcnt8s,8 ;
m8s_1: brcc m8s_2 ;
add m8sH,mc8s ;
m8s_2: sbrc mp8s,0 ;
sub m8sH,mc8s
asr m8sH ;
ror m8sL
dec mcnt8s
brne m8s_1
ret
Вывод: По ходу выполнения данной работы я ознакомился с выполнением арифметических операций над целыми числами, и различными алгоритмами реализации данных операций.
Уважаемый посетитель!
Чтобы распечатать файл, скачайте его (в формате Word).
Ссылка на скачивание - внизу страницы.