0 / 0 / 0
Регистрация: 25.05.2015
Сообщений: 10

PIC16F84A Вычитание двух 2-х разрядных двоичных чисел

19.02.2018, 18:20. Показов 1523. Ответов 7
Метки нет (Все метки)

Студворк — интернет-сервис помощи студентам
Помогите с кодом для PiC16f84a со следующими функциями:
Вычитание двух 2-х разрядных двоичных чисел. Каждое число вводить через порт путем нажатия кнопок с фиксацией sb0 и sb1 факт ввода первого числа инициируется при нажатии кнопки SB2 , а второго sb3. Полученный результат прри нажатии кнопки SB4 Вывести на 7-сегментный дисплей. При этом если результат отрицательный загорается светодиод.Заранее спасибо.
С помощью смог накидать пока это :
Assembler
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
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
LIST        p=16F84A
             #DEFINE      FLAG_DIG     REG.FL,0
;
             #DEFINE      SB0          PORTA,0
             #DEFINE      SB1          PORTA,1
 
 
 
;
;
INV          MACRO        REG,BIT1
             MOVLW        1<<BIT1
             XORWF        REG,F
             ENDM
 
             CBLOCK       0x20      ;BANK0
REG.FL
REG_A,REG_B
REG_IND
 
             ENDC
;
             CBLOCK       0x70      ;ALL BANK
REG.AL
REZ.L,REZ.H
Q.REG.L
             ENDC
;
             ORG          0x00
INIT
;
;
;
;
MAIN
             BTFSC        SB2
             GOTO         M1.1
                                    ;
             MOVF         PORTA,W
             ANDLW        03H
             MOVWF        REG_A
                                    ;
M1.1         BTFSC        SB3
             GOTO         M1.2
                                    ;
             MOVF         PORTA,W
             ANDLW        03H
             MOVWF        REG_B
;
M1.2
             BTFSC        SB4
             GOTO         M2.0
                                    ; REG_A - REG_B
             MOVF         REG_B,W
             SUBWF        REG_A,W
             BCF          LED_RED
             BTFSS        STATUS,C
             BSF          LED_RED
             BTFSS        STATUS,C
             SUBLW        .0
                                    ;
             MOVWF        REG_IND
;
M2.0
             MOVF         REG_IND,W
             MOVWF        REG.AL
             CALL         BIN2BCD8
;
             INV          FLAG_DIG
             BTFSC        FLAG_DIG
             GOTO         M2.1
;
             MOVF         REZ.L,W
             ANDLW        0FH
 
             BCF          P.DIG1
             CALL         SET.SEG
             MOVWF        PORTB
             BSF          P.DIG0
             GOTO         M2.0.OUT
;
M2.1
             SWAPF        REZ.L,W
             ANDLW        0FH
;
             BCF          P.DIG0
             CALL         SET.SEG
             MOVWF        PORTB
             BSF          P.DIG1
             ;GOTO         M2.0.OUT
;
;
M2.0.OUT
;
;
;
             GOTO         MAIN
;
;
;
SET.SEG
             ANDWF        PCL,F
;
             RETLW        SEG_0
             RETLW        SEG_1
             RETLW        SEG_2
             RETLW        SEG_3
             RETLW        SEG_4
             RETLW        SEG_5
             RETLW        SEG_6
             RETLW        SEG_7
             RETLW        SEG_8
             RETLW        SEG_9
;
;
;
BIN2BCD8
 ;in: REG.AL - BIN
;out: REZ.H, REZ.L - BCD (PACKED) 
  ;
             MOVLW        .8        ; Q.BIT IN
             MOVWF        Q.REG.L
;
             CLRF         REZ.H
             CLRF         REZ.L
             GOTO         B2B1
;
ADJDEC       MOVLW        .51
             ADDWF        REZ.H,F
             ADDWF        REZ.L,F
;
             MOVLW        .3
             BTFSS        REZ.H,3
             SUBWF        REZ.H,F
             BTFSS        REZ.L,3
             SUBWF        REZ.L,F
;
             MOVLW        .48
             BTFSS        REZ.H,7
             SUBWF        REZ.H,F
             BTFSS        REZ.L,7
             SUBWF        REZ.L,F
;
B2B1         RLF          REG.AL,F
             RLF          REZ.L,F
             RLF          REZ.H,F
             DECFSZ       Q.REG.L,F
             GOTO         ADJDEC
             RETURN
;
;
0
Programming
Эксперт
39485 / 9562 / 3019
Регистрация: 12.04.2006
Сообщений: 41,671
Блог
19.02.2018, 18:20
Ответы с готовыми решениями:

PIC16f84A Сложение двух 2-х разрядных двоичных чисел
Помогите с кодом для PiC16f84a со следующими функциями: сложение двух 2-х разрядных двоичных чисел. Каждое число вводить через порт путем...

Сложение/вычитание 4-разрядных bcd-чисел
Всем доброго времени суток! Совсем запуталась с решением данной задачи, поэтому без вашей помощи не обойтись. Буду благодарна за любую...

Схема умножение двух 8-ми разрядных двоичных чисел
Здравствуйте, уважаемые форумчане! Есть задача: Построить схему умножения двух 8-ми разрядных двоичных чисел с анализом старших...

7
38 / 38 / 11
Регистрация: 27.09.2014
Сообщений: 486
19.02.2018, 19:02
Так на {del} уже написали...
Или это тест, какой форум лучше?
0
0 / 0 / 0
Регистрация: 25.05.2015
Сообщений: 10
19.02.2018, 19:15  [ТС]
Нет).Просто интересно узнать может что то не так.
0
38 / 38 / 11
Регистрация: 27.09.2014
Сообщений: 486
19.02.2018, 19:27
А самому начать разбираться в готовом, запустив отладичк слабо?
0
0 / 0 / 0
Регистрация: 25.05.2015
Сообщений: 10
19.02.2018, 19:28  [ТС]
Хорошо,подскажите хороший отладчик
0
20.02.2018, 07:41

Не по теме:

Цитата Сообщение от toha060999 Посмотреть сообщение
смог накидать
Да, освоить Ctrl+C и Ctrl+V тоже надо суметь.

0
0 / 0 / 0
Регистрация: 25.05.2015
Сообщений: 10
20.02.2018, 17:18  [ТС]
Топ форум тролей(учитесь шутить юмор плоский как забор)
0
пофигист широкого профиля
4765 / 3201 / 861
Регистрация: 15.07.2013
Сообщений: 18,584
21.02.2018, 01:49
toha060999, вы бы честно попросили разъяснить сей "надыбанный" вами на просторах рунета код. Уверен, что вам наверняка помогли бы.
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
inter-admin
Эксперт
29715 / 6470 / 2152
Регистрация: 06.03.2009
Сообщений: 28,500
Блог
21.02.2018, 01:49
Помогаю со студенческими работами здесь

Устройство сложения 4-х разрядных двоичных чисел
Здравствуйте, проблема следующая Необходимо разработать устройство, позволяющее производить сложение четырехразрядных двоичных чисел....

Вычитание двух 32-разрядных двоичных чисел
Добрый день! Понимаю, что задача простейшая, но все же вызывает затруднения. Мне надо написать программу вычитания двух 32-разрядных...

Сложение двух 16-ти разрядных двоичных чисел
Разработать ассемблерную программу сложения двух 16-ти разрядных двоичных чисел, пользуясь относительной адресацией. Буду благодарна за...

Реализовать вычитание двух 64-разрядных чисел.
Всем привет:) Ребят подскажите, пожалуйста, в чём проблема?? Есть следующая задача: &quot;Реализовать вычитание двух 64-разрядных...

Рекурсия: вычитание двух n-разрядных чисел
мне нужно вычесть два n-разрядные числа рекурсией, помогите пожалуйста мені потрібно відняти два n-розрядні числа рекурсією, допоможіть...


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

Или воспользуйтесь поиском по форуму:
8
Ответ Создать тему
Опции темы

Новые блоги и статьи
Blazor и контроллер сервопривода IoT Meadow Maple
Wired 11.07.2025
Я решил разобраться, как можно соединить современные веб-технологии с миром "железа". Интересная комбинация получилась из Blazor в качестве веб-интерфейса и микроконтроллера Meadow с его веб-сервером. . .
Генерация OpenQASM из кода Q#
EggHead 10.07.2025
Летом 2024-го я начал эксперименты с библиотекой Q# Bridge, и знаете что? Она оказалась просто находкой для тех, кто работает на стыке разных квантовых экосистем. Основная фишка этой библиотеки -. . .
Изучаем новый шаблон ИИ-чата .NET AI Chat Web App
stackOverflow 10.07.2025
В . NET появилось интересное обновление - новый шаблон ИИ-чата под названием . NET AI Chat Web App. Когда я впервые наткнулся на анонс этого шаблона, то сразу понял, что Microsoft наконец-то. . .
Результаты исследования от команды ARP (июль 2025 г.)
Programma_Boinc 10.07.2025
Результаты исследования от команды ARP (июль 2025 г. ) Африканский проект по дождям (ARP) World Community Grid снова запущен! Мы рады поделиться обновленной информацией о нашем прогрессе с осени. . .
Angular vs Svelte - что лучше?
Reangularity 09.07.2025
Сегодня рынок разделился на несколько четких категорий: тяжеловесы корпоративного уровня (Angular), гибкие универсалы (React), прогрессивные решения (Vue) и новая волна компилируемых фреймворков. . .
Code First и Database First в Entity Framework
UnmanagedCoder 09.07.2025
Entity Framework дает нам свободу выбора, предлагая как Code First, так и Database First подходы. Но эта свобода порождает вечный вопрос — какой подход выбрать? Entity Framework — это. . .
Как использовать Bluetooth-модуль HC-05 с Arduino
Wired 08.07.2025
Bluetooth - это технология, созданная чтобы заменить кабельные соединения. Обычно ее используют для связи небольших устройств: мобильных телефонов, ноутбуков, наушников и т. д. Работает она на частоте. . .
Руководство по структурам данных Python
AI_Generated 08.07.2025
Я отчетливо помню свои первые серьезные проекты на Python - я писал код, он работал, заказчики были относительно довольны. Но однажды мой наставник, взглянув на мою реализацию поиска по огромному. . .
Тестирование энергоэффективности и скорости вычислений видеокарт в BOINC проектах
Programma_Boinc 08.07.2025
Тестирование энергоэффективности и скорости вычислений видеокарт в BOINC проектах Опубликовано: 07. 07. 2025 Рубрика: Uncategorized Автор: AlexA Статья размещается на сайте с разрешения. . .
Раскрываем внутренние механики Android с помощью контекста и манифеста
mobDevWorks 07.07.2025
Каждый Android-разработчик сталкивается с Context и манифестом буквально в первый день работы. Но много ли мы задумываемся о том, что скрывается за этими обыденными элементами? Я, честно говоря,. . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2025, CyberForum.ru