Добрый день, радиолюбители.
Есть маленькая проблемка. Код программы деления:

;=====деление======================
;==============
; ПОДПРОГРАММА ДЕЛЕНИЯ 5-РАЗРЯДНОГО СЛОВА (TEMP_1L1) НА 4-Х РАЗРЯДНОЕ (TEMP_1L)
; Результат - TEMP_1L1, остаток - TEMP_1L2
;=================
DIV_5_4 ;TEMP_1L1 / TEMP_1L = TEMP_1L1; TEMP_1L2 - остаток
;проверка делителя на 0


movf TEMP_2H,F,1 ;
btfss STATUS,Z,0 ;


movf TEMP_1H,F,1 ;
btfss STATUS,Z,0 ;
goto Div_5_4 ;
movf TEMP_1M,F,1 ;
btfss STATUS,Z,0 ;
goto Div_5_4 ;
movf TEMP_1L,F,1 ;
btfsc STATUS,Z,0 ;
retlw 0 ;
Div_5_4
call Setup40 ;перенос делимого во временный регистр
clrf TEMP_2H2 ;сброс остатка
clrf TEMP_1H2 ;сброс остатка
clrf TEMP_1M2 ;
clrf TEMP_1L2
Dloop40
bcf STATUS,C,0
rlcf TEMP_1L3,F,1 ;сдвиг влево младшего делимого
rlcf TEMP_1M3,F,1
rlcf TEMP_1H3,F,1 ;
rlcf TEMP_2H3,F,1 ;
rlcf TEMP_3H3,F,1 ;
rlcf TEMP_1L2,F,1 ;сдвиг влево младшего остатка
rlcf TEMP_1M2,F,1
rlcf TEMP_1H2,F,1
rlcf TEMP_2H2,F,1


movf TEMP_2H,W,1 ;проверяем, превышает старший остаток делитель
subwf TEMP_2H2,W,1 ; проверка
btfss STATUS,Z,0
goto Nochk40
movf TEMP_1H,W,1 ;
subwf TEMP_1H2,W,1 ; проверка
btfss STATUS,Z,0
goto Nochk40
movf TEMP_1M,W,1
subwf TEMP_1M2,W,1 ; проверка
btfss STATUS,Z,0
goto Nochk40
movf TEMP_1L,W,1 ;если равен, проверяем младший
subwf TEMP_1L2,W
Nochk40
btfss STATUS,C,0 ; перенос если
goto Nogo40 ; если остаток больше делителя
movf TEMP_1L,W,1 ;
subwf TEMP_1L2,F,1 ;
btfss STATUS,C,0
decf TEMP_1M2,F,1
movf TEMP_1M,W,1
subwf TEMP_1M2,F,1
btfss STATUS,C,0
decf TEMP_1H2,F,1
movf TEMP_1H,W,1
subwf TEMP_1H2,F,1
btfss STATUS,C,0
decf TEMP_2H2,F,1
movf TEMP_2H,W,1
subwf TEMP_2H2,F,1
bsf STATUS,C,0 ; переместить
Nogo40
rlcf TEMP_1L1,F,1
rlcf TEMP_1M1,F,1
rlcf TEMP_1H1,F,1
rlcf TEMP_2H1,F,1
rlcf TEMP_3H1,F,1 ;!!!!!!!!!!!!!!!
decfsz Temp,F,0 ; цикл пока все биты не проверим
goto Dloop40
retlw 0
Setup40
movlw .40 ; установки для 40 циклов
movwf Temp,0
movff TEMP_3H1,TEMP_3H3 ;
movff TEMP_2H1,TEMP_2H3 ;
movff TEMP_1H1,TEMP_1H3 ;
movff TEMP_1M1,TEMP_1M3 ;
movff TEMP_1L1,TEMP_1L3 ;
clrf TEMP_3H1,1
clrf TEMP_2H1,1
clrf TEMP_1H1,1
clrf TEMP_1M1,1
clrf TEMP_1L1,1
retlw 0
;=====деление======================

Вроде бы делит нормально. Но !!!!!!!!!!
Два числа 43024784875 / 100 000 делит неправильно. Должно быть 430 247 а получается 430 331 ???
Помогите найти ошибку.

Разрядность делимого и делителя по какому основанию считалась?
Во первых, код нужно оформлять в тегах кода. С положенным для кода форматированием.
Во вторых, у меня ощущение, что вы этот код не писали. Патамушта с именами регистров переменных какой то рандомный бред. Лично у меня разбираться в этой каше нет никакого желания.

Чтобы разбираться в этой каше надо соображать..!!! Кто не соображает, не пишите.

PCBWay - всего $5 за 10 печатных плат, первый заказ для новых клиентов БЕСПЛАТЕН

Сборка печатных плат от $30 + БЕСПЛАТНАЯ доставка по всему миру + трафарет

Онлайн просмотровщик Gerber-файлов от PCBWay + Услуги 3D печати

Вот и не пишет ни кто уже 6 дней.

Организация питания на основе надежных литиевых аккумуляторов EVE и микросхем азиатского производства

Качественное и безопасное устройство, работающее от аккумулятора, должно учитывать его физические и химические свойства, профили заряда и разряда, их изменение во времени и под влиянием различных условий, таких как температура и ток нагрузки. Мы расскажем о литий-ионных аккумуляторных батареях EVE и нескольких решениях от различных китайских компаний, рекомендуемых для разработок приложений с использованием этих АКБ. Представленные в статье китайские аналоги помогут заменить продукцию западных брендов с оптимизацией цены без потери качества.

Подробнее>>

Смешно. Вы пришли с вопросом ровно потому, что не понимаете как работает этот код. Вывалили код, в котором имена регистров выбраны так, чтобы максимально усложнить разбор кода. Мало этого, вы говорите о 4 и 5 разрядах операндов и не в состоянии ответить на вопрос об основании счисления. Можно только догадываться, что речь идет о шестнадцатиричном основании, то есть 16 и 20 бинарных разрядах, но тогда операнды выходят за диапазон...
Ну и нахрена мне тратить время на всю эту галиматью студня-недоучки?

Новый аккумулятор EVE серии PLM для GSM-трекеров, работающих в жёстких условиях (до -40°С)

Компания EVE выпустила новый аккумулятор серии PLM, сочетающий в себе высокую безопасность, длительный срок службы, широкий температурный диапазон и высокую токоотдачу даже при отрицательной температуре. Эти аккумуляторы поддерживают заряд при температуре от -40/-20°С (сниженным значением тока), безопасны (не воспламеняются и не взрываются) при механическом повреждении (протыкание и сдавливание), устойчивы к вибрации. Они могут применяться как для автотранспорта (трекеры, маячки, сигнализация), так и для промышленных устройств мониторинга, IoT-устройств.

Подробнее>>

Тему можно закрыть, надоело читать этот безграмотный бред с оскорблениями.

Вообще-то для подобной тестировки есть СИМУЛЯТОР -делаем пошаговое выполнение и анализируем результат.

Феерично...

Мало того, что не в состоянии ответить ни на один вопрос, так еще и хамит...


Добавлено after 1 minute 21 second:

Зато сильно "грамотный"...

Не судите строго...
Не всем же САМОСТОЯТЕЛЬНО пробиваться.
По своему опыту - иногда действительно на ошибочном решении можно зациклиться до "поцарапса" - тогда единственно разумное решение - начать всю прожку ЗАНОВО (через одну-две недельки).