Форум программистов, компьютерный форум, киберфорум
Микроконтроллеры
Войти
Регистрация
Восстановить пароль
Блоги Сообщество Поиск Заказать работу  
 
Рейтинг 4.57/7: Рейтинг темы: голосов - 7, средняя оценка - 4.57
0 / 0 / 0
Регистрация: 12.10.2019
Сообщений: 3

Двоично-десятичная система

26.10.2019, 11:06. Показов 1526. Ответов 1
Метки нет (Все метки)

Студворк — интернет-сервис помощи студентам
Здравствуйте, у меня возникла проблема с задачей: "Заполнить РОН банка №0 двоично-десятичными числами".
Code
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
     #include p16f873a.inc
     __CONFIG _HS_OSC & _WDT_OFF;
     ORG      H'005'            ;вектор сброса 
CNT  EQU      H'A0'             ;определение регистра счётчика
                                ;с адресом А0(банк 1)
 
;запись возрастающих чисел в ОЗУ
     BCF      STATUS,RP1        ;выбираем банк регистров 1
     BSF      STATUS,RP0        ;
     MOVLW    H'20'             ;загрузка в рабочий регистр адреса            
                                ;первого POH в банке 0
     MOVWF    FSR               ;записываем начальный адрес
                                ;в регистр косв.адресации
     CLRF     CNT               ;обнуляем регистр счетчика
M10: MOVF     CNT,W             ;загружаем значение счетчика в рабочий регистр
     MOVWF    INDF              ;сохраняем очередной отсчет в косвенно адресуемый POH 
     INCF     FSR,F             ;увеличение адреса POH
                                ;в регистре косвенной адресации
     MOVF     CNT,W             ;загружаем значение счетчика в рабочий регистр
     MOVWF    INDF              ;сохраняем очередной отсчет в косвенно адресуемый POH
     INCF     CNT,F             ;увеличение счетчика на 1
     INCF     CNT,F             ;увеличение счетчика на 1
     MOVF     CNT,W             ;загружаем значение счетчика в рабочий регистр
     MOVWF    INDF              ;сохраняем очередной отсчет в косвенно адресуемый POH
     INCF     FSR,F             ;увеличение адреса POH на 1
     MOVF     CNT,W             ;загружаем значение счетчика в рабочий регистр
     MOVWF    INDF              ;сохраняем очередной отсчет в косвенно адресуемый POH
     DECF     CNT,F             ;уменьшение счетчика на 1
     
    
     MOVF     CNT,W             ;загружаем значение счетчика в рабочий регистр
     MOVWF    INDF              ;сохраняем очередной отсчет в косвенно адресуемый POH
     ANDLW    h'0F'             ; побитное И с 0A
     XORLW    h'0A'             ; сравнение с 0A
     BTFSS    STATUS,Z          ; если не совпадают, скачок через команду
     GOTO     M2                ; вызов подпрограммы М2   
     MOVF      CNT,W                ; загружаем счетчик в W
     ADDLW    H'6'
     MOVWF    CNT
M2:     
     MOVF     CNT,W             ;загружаем значение счетчика в рабочий регистр
     MOVF     FSR,W
     XORLW    H'80'             ;сравниваем его с последним значение +1
     BTFSS    STATUS,Z          ;если не совпадают, то скачек через одну команду
     GOTO     M10               ;если не совпадают, то возврат
                                ;к записи следующей ячейки
У меня получается перевести в двоично-десятичный код, но он почему-то пропускает несколько значений(объедены в черный круги). Как это исправить?
Миниатюры
Двоично-десятичная система  
0
cpp_developer
Эксперт
20123 / 5690 / 1417
Регистрация: 09.04.2010
Сообщений: 22,546
Блог
26.10.2019, 11:06
Ответы с готовыми решениями:

двоично-десятичная система счисления
нужно вывести список чисел 1-50 в двоично-десятичной системе счисления var x:Integer; begin for x:=0 to 50 do writeln(x,' ',1...

Двоично-десятичная система счисления с весом 1,2,3,4
Сразу извиняюсь, не нашел куда правильно добавить мой вопрос. Такая задачка: Перевести десятеричное значения числа 132,587 в...

BCD - двоично-десятичная система, посчитайте кто-нибудь пжлст
A = 66D = 0110 0110 BCD ПК 0101 1000 ОК 1010 0111 ДК 1010 1000 B = 58D = 0101 1000 BCD ПК 0110 0110 ОК 1001 1001 ДК 1001...

1
1184 / 673 / 113
Регистрация: 15.05.2012
Сообщений: 4,085
28.10.2019, 14:02
Assembler
1
BTFSS     STATUS,Z          ; если не совпадают, скачок через команду
А если на больше, меньше, а не равно?
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
raxper
Эксперт
30234 / 6612 / 1498
Регистрация: 28.12.2010
Сообщений: 21,154
Блог
28.10.2019, 14:02
Помогаю со студенческими работами здесь

Десятичная система счисления
Здравствуйте Вопрос такой: почему результат выводится в десятичном виде? Хоть я считаю числа двоичные?

Десятичная система исчесления
Вычислить количество n значных чисел, которые делятся на 5 и содержат только 1 цифру 5 и хотя бы один нуль. Решение этой задачи у меня...

Строки, десятичная система, шестнадцатеричная
В строке найти все числа в десятичной системе счисления, сформировать новую строку, в которой заменить их на соответствующим представлением...

Десятичная и шестнадцатиричная система перевод
Перевести 10 --- > 16 Перевести 16 ---> 10

Сломалась десятичная система счисления в консоли
Я все с тем же самым IP кривым IP калькулятором через циклы. Программа вообще при вводе любого ip-адреса и при выборе маски выводит...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
2
Ответ Создать тему
Новые блоги и статьи
Сумматор с применением элементов трёх состояний.
Hrethgir 26.03.2026
Тут. https:/ / fips. ru/ EGD/ ab3c85c8-836d-4866-871b-c2f0c5d77fbc Первый документ красиво выглядит, но без схемы. Это конечно не даёт никаких плюсов автору, но тем не менее. . . всё может быть. . .
Автозаполнение реквизитов при создании документа
Maks 26.03.2026
Код из решения ниже размещается в модуле объекта документа, в процедуре "ПриСозданииНаСервере". Алгоритм проверки заполнения реализован для исключения перезаписи значения реквизита, которое может. . .
Команды "Заполнить" и "Очистить" на форме документа
Maks 26.03.2026
1. Команда формы "ЗаполнитьЗапчасти". На примере нетипового документа разработанного в конфигурации КА2. В качестве источника данных указан регистр накопления, в который записываются данные о. . .
Кому нужен AOT?
DevAlt 26.03.2026
Решил сделать простой ланчер Написал заготовку: dotnet new console --aot -o UrlHandler var items = args. Split(":"); var tag = items; var id = items; var executable = args;. . .
Отправка уведомления на почту при изменении наименования справочника
Maks 24.03.2026
Программная отправка письма электронной почты на примере изменения наименования типового справочника "Склады" в конфигурации БП3. Перед реализацией необходимо выполнить настройку системной учетной. . .
модель ЗдравоСохранения 5. Меньше увольнений- больше дохода!
anaschu 24.03.2026
Теперь система здравосохранения уменьшает количество увольнений. 9TO2GP2bpX4 a42b81fb172ffc12ca589c7898261ccb/ https:/ / rutube. ru/ video/ a42b81fb172ffc12ca589c7898261ccb/ Слева синяя линия -. . .
Midnight Chicago Blues
kumehtar 24.03.2026
Такой Midnight Chicago Blues, знаешь?. . Когда вечерние улицы становятся ночными, а ты не можешь уснуть. Ты идёшь в любимый старый бар, и бармен наливает тебе виски. Ты смотришь на пролетающие. . .
SDL3 для Desktop (MinGW): Вывод текста со шрифтом TTF с помощью библиотеки SDL3_ttf на Си и C++
8Observer8 24.03.2026
Содержание блога Финальные проекты на Си и на C++: finish-text-sdl3-c. zip finish-text-sdl3-cpp. zip
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2026, CyberForum.ru