Форум программистов
 
Расширенный поиск
Контакты: о проблемах с регистрацией, почтой и по другим вопросам пишите сюда - alarforum@yandex.ru, проверяйте папку спам! Обязательно пройдите активизацию e-mail.

Вернуться   Форум программистов > Низкоуровневое программирование > Assembler
Регистрация

Восстановить пароль
Повторная активизация e-mail

Excel VBA, CAD, Софт, ОС, Windows, Ubuntu, Android, VPS
Win Api, Assembler, C++, Java, Pascal, Lazarus, Delphi, OpenGL, DirectX
C#, Qt, .NET, ASP.NET, Windows Forms, ADO.NET, Framework, WPF, UWP, WinRT, XAML
HTML, CSS, JavaScript, Ajax, PHP, Perl, Python, Ruby, SQL, WordPress, API, XML, JSON, ActionScript, Flash

Ответ
 
Опции темы
Старый 19.12.2016, 00:29   #1
Fenris123
Новичок
 
Регистрация: 19.12.2016
Сообщений: 1
Репутация: 10
По умолчанию Что дописать в коде, чтобы нажал, отпустил стало АА, опять нажал отпустил стало 55?

Не могу понять что дописать в коде, чтобы нажал, отпустил стало АА, опять нажал отпустил стало 55

Код:

.include"tn2313def.inc"
ldi r16, RamEnd
out spl, r16
ldi r16, $FF
out ddrb, r16
ldi r16, $F0
out ddrb, r16
sbi portd, 2
ldi r16, $55
clr r17
ldi r17, $AA
l2:sbic pind, 2
rjmp l1
out portd, r16
rjmp l2
l1:out portd, r17
rjmp l2
ret

Макет:
Изображения
Тип файла: jpg qfq.jpg (53.4 Кб, 24 просмотров)

Последний раз редактировалось Arigato; 19.12.2016 в 02:24.
Fenris123 вне форума   Ответить с цитированием
Старый 21.12.2016, 09:19   #2
iborisov
Пользователь
 
Регистрация: 09.12.2016
Сообщений: 13
Репутация: 10
По умолчанию

Если речь идёт только о $55 и $AA, то может проще предварительно (до прерывания) загрузить $55 в один из регистров, например в r17, и сделать что-то типа:

Код:

...
eor r17, $FF
out portd, r17
ret

iborisov вне форума   Ответить с цитированием
Ответ



Опции темы

Ваши права в разделе
Вы не можете создавать новые темы
Вы не можете отвечать в темах
Вы не можете прикреплять вложения
Вы не можете редактировать свои сообщения

BB коды Вкл.
Смайлы Вкл.
[IMG] код Вкл.
HTML код Выкл.

Быстрый переход

Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Как определить что изначальное значение равное нулю изменилось и снова стало нулем ShevlyakoV Общие вопросы Delphi 12 25.08.2015 20:50
Как определить, что получатель нажал на спам в письме? bilibian Общие вопросы Delphi 2 05.02.2014 21:41
Страница стала намного длиннее что стало причиной? slawok HTML и CSS 7 20.05.2010 22:56
Ах, что-то с памятью моей стало (Delphi 7) alxd Помощь студентам 7 22.09.2009 13:15




21:13.


Powered by vBulletin® Version 3.8.8 Beta 2
Copyright ©2000 - 2017, Jelsoft Enterprises Ltd.

купить трафик


как улучшить посещаемость, а также решения по монетизации сайтов, видео и приложений

RusProfile.ru


Справочник российских юридических лиц и организаций.
Проекты отопления, пеллетные котлы, бойлеры, радиаторы
интернет магазин respective.ru